Merge remote-tracking branch 'origin/dev' into dev

lihongji

2024-07-31 8801592d280ff58beb5677a86c263f7c05c0b7c0

 _Main/BL/Type_LibCal_SubscriberEventTable/Method_InitializeTable.qbl

@@ -16,13 +16,13 @@
        
        row := selectobject( this, LibCal_SubscriberEventRow, row, row.Subscriber() = subscriber.CalendarID() 
                             and row.Event() = event.Subject() 
                             and row.EventType() = event.EventType().Name() 
                             and row.EventType() = guard( event.EventType().Name(), '' )
                             );
        
        if( isnull( row ) ){
          row := this.LibCal_SubscriberEventRow( relnew, RowNr := rownr, Subscriber := subscriber.CalendarID(), 
                                                 Event := event.Subject(), 
                                                 EventType := event.EventType().Name() );
                                                 EventType := guard( event.EventType().Name(), '' ) );
          
          rownr := rownr + 1;
        }