LSTUTIL GApqJPCJUSERID  0
BEGIN DECLARE SECTION
END DECLARE SECTION
WHENEVER SQLERROR GOTO ERROR
WHENEVER NOT FOUND GOTO ERROR
DECLARE firstrec CURSOR WITH HOLD FOR               SELECT 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 firstrec
FETCH firstrec               INTO :Start
CLOSE firstrec
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
DECLARE somerec CURSOR WITH HOLD FOR            SELECT DATE_LOGGED, TIME_LOGGED,                   INTERVAL_SECONDS, UTILIZATION,                   SECONDS_TIMESTAMP              FROM LANM.RING_PERFORMANCE             WHERE SEGMENT_NUMBER = :segment               AND SECONDS_TIMESTAMP           BETWEEN :Start               AND :Finish             ORDER BY SECONDS_TIMESTAMP               FOR FETCH ONLY
OPEN somerec
FETCH somerec               INTO :Log_Date,                    :Log_Time,                    :interval_seconds,                    :utilization
CLOSE somerec
BeginTime
BeginDate
EndTime
EndDate
Log_Time
Log_Date
interval_seconds
utilization
segment
Start
Finish