lazhen
2024-05-29 1aa50242db4bd962c4bbf68e7f8eb8c003bbde9a
_Main/BL/Type_LibCal_SubscriberEventTable/Method_InitializeDay.qbl
@@ -14,14 +14,14 @@
      time := startTime.Format( 'M/D/Y' );
      column := selectobject( table, LibCal_SubscriberEventColumn, column, column.Name() = time );
      if( isnull( column ) ){
        column := table.LibCal_SubscriberEventColumn( relnew, Name := time );
        column := table.LibCal_SubscriberEventColumn( relnew, Name := time, Period := startTime.Date() );
      }
      
      duration := startTime.StartOfNextDay() - startTime;
      if( startTime.StartOfNextDay() > endtime ){
        duration := endtime - startTime;
      }
      info( startTime, column.Name(), duration.AsQUILL(), duration.HoursAsReal() );
    //  info( startTime, column.Name(), duration.AsQUILL(), duration.HoursAsReal() );
      cell := column.LibCal_SubscriberEventCell( relnew, Value := [String]duration.HoursAsReal() );
      row.LibCal_SubscriberEventCell( relinsert, cell );
    }