日历不可用事件界面产线筛选

lazhen

2024-05-29 1aa50242db4bd962c4bbf68e7f8eb8c003bbde9a

 _Main/BL/Type_LibCal_SubscriberEventTable/Method_InitializeMonth.qbl

@@ -10,14 +10,14 @@
  TextBody:
  [*
    // 甄兰鸽 May-29-2024 (created)
    for(  startTime := starttime; startTime < endtime; startTime := startTime.StartOfMonth() ){
      time := startTime.Format( 'M/D/Y' );
    for(  startTime := starttime; startTime < endtime; startTime := startTime.StartOfNextMonth() ){
      time := startTime;
      if( starttime = startTime ){
        time := startTime.StartOfMonth().Format( 'M/D/Y' );
        time := startTime.StartOfMonth();
      }
      column := selectobject( table, LibCal_SubscriberEventColumn, column, column.Name() = time );
      column := selectobject( table, LibCal_SubscriberEventColumn, column, column.Name() = time.Format( 'M/D/Y' ) );
      if( isnull( column ) ){
        column := table.LibCal_SubscriberEventColumn( relnew, Name := time );
        column := table.LibCal_SubscriberEventColumn( relnew, Name := time.Format( 'M/D/Y' ), Period := time.Date() );
      }
      
      duration := startTime.StartOfNextMonth() - startTime;