26. Mai 2010 11:19
26. Mai 2010 12:10
26. Mai 2010 13:24
IF JobQueueEntry."No. of Minutes between Runs" > 0 THEN BEGIN
  //NewRunTime := TIME + 60000 * JobQueueEntry."No. of Minutes between Runs";
  NewRunTime := TIME + 10000 * JobQueueEntry."No. of Minutes between Runs";
  IF (JobQueueEntry."Ending Time" = 0T) AND (NewRunTime >= 235900T) OR
     (JobQueueEntry."Ending Time" <> 0T) AND (NewRunTime > JobQueueEntry."Ending Time")
  THEN BEGIN
    NewRunTime := JobQueueEntry."Starting Time";
    NoOfDays := 1;
  END;
END ELSE BEGIN
  NewRunTime := DT2TIME(JobQueueEntry."Earliest Start Date/Time");
  NoOfDays := 1;
END;                                                   ;