MAXUTIL fBCrOICJUSERID 0 BEGIN DECLARE SECTION END DECLARE SECTION WHENEVER SQLERROR GOTO ERROR WHENEVER NOT FOUND GOTO ERROR DECLARE gettime CURSOR WITH HOLD FOR SELECT TIME_LOGGED, SECONDS_TIMESTAMP FROM LANM.RING_PERFORMANCE WHERE SEGMENT_NUMBER = :segment AND ((DATE_LOGGED = :BeginDate AND TIME_LOGGED >= :BeginTime) OR (DATE_LOGGED > :BeginDate)) ORDER BY SECONDS_TIMESTAMP FOR FETCH ONLY OPEN gettime FETCH gettime INTO :BeginTime, :Start CLOSE gettime DECLARE lastrec CURSOR WITH HOLD FOR SELECT SECONDS_TIMESTAMP FROM LANM.RING_PERFORMANCE WHERE SEGMENT_NUMBER = :segment AND ((DATE_LOGGED = :EndDate AND TIME_LOGGED <= :EndTime) OR (DATE_LOGGED < :EndDate)) ORDER BY SECONDS_TIMESTAMP DESC FOR FETCH ONLY OPEN lastrec FETCH lastrec INTO :Finish CLOSE lastrec SELECT MAX(SECONDS_TIMESTAMP) INTO :Finish FROM LANM.RING_PERFORMANCE WHERE SEGMENT_NUMBER = :segment SELECT MAX(UTILIZATION) INTO :maximum FROM LANM.RING_PERFORMANCE WHERE SEGMENT_NUMBER = :segment AND SECONDS_TIMESTAMP BETWEEN :Start AND :Finish DECLARE maxtime CURSOR WITH HOLD FOR SELECT DATE_LOGGED, TIME_LOGGED, SECONDS_TIMESTAMP FROM LANM.RING_PERFORMANCE WHERE SEGMENT_NUMBER = :segment AND SECONDS_TIMESTAMP BETWEEN :Start AND :Finish ORDER BY SECONDS_TIMESTAMP DESC FOR FETCH ONLY OPEN maxtime FETCH maxtime INTO :MaxDate, :MaxTime CLOSE maxtime BeginTime BeginDate EndTime EndDate MaxTime MaxDate maximum segment Start Finish