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; ;