DECLARE caursvd1sall CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, SEGMENT_NO FROM LANM.CAU ORDER BY SEGMENT_NO ASC FOR FETCH ONLY
OPEN caursvd1sall
DECLARE caursvd1s CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, SEGMENT_NO FROM LANM.CAU WHERE SEGMENT_NO =:h_ach3SegmentNo ORDER BY SEGMENT_NO ASC FOR FETCH ONLY
OPEN caursvd1s
DECLARE caursvd1nall CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, CAU_ID FROM LANM.CAU ORDER BY CAU_ID ASC FOR FETCH ONLY
OPEN caursvd1nall
DECLARE caursvd1n CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, CAU_ID FROM LANM.CAU WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY CAU_ID ASC FOR FETCH ONLY
OPEN caursvd1n
DECLARE nicaursvd1nall CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, CAU_ID FROM LANM.CAU ORDER BY CAU_ID ASC FOR FETCH ONLY
OPEN nicaursvd1nall
DECLARE nicaursvd1n CURSOR WITH HOLD FOR SELECT RESERVED, CAU_STATUS, CAU_ID FROM LANM.CAU WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY CAU_ID ASC FOR FETCH ONLY
OPEN nicaursvd1n
DECLARE alertfilters CURSOR WITH HOLD FOR SELECT PRIORITY, ALERT_BP, ALERT_ID, RESOURCE_NAME, ERROR_TYPE FROM LANM.ALERT_FILTERS ORDER BY PRIORITY DESC FOR FETCH ONLY
OPEN alertfilters
DECLARE brgdef1n CURSOR WITH HOLD FOR SELECT BRIDGE_NAME, BRIDGE_NO, AUTOLINK_FLAG, SEGMENT1, SEGMENT1_TYPE, ADDRESS1, SEGMENT2, SEGMENT2_TYPE, ADDRESS2, NOTIFICATION_INT, USER_COMMENT, INTERNAL_USE, BRIDGE_TYPE FROM LANM.BRIDGE_DEFINITIONS ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef1n
DECLARE brgdef1nc CURSOR WITH HOLD FOR SELECT BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS WHERE AUTOLINK_FLAG = '1' ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef1nc
DECLARE brgdef1s CURSOR WITH HOLD FOR SELECT BRIDGE_NAME, BRIDGE_NO, AUTOLINK_FLAG, SEGMENT1, SEGMENT1_TYPE, ADDRESS1, SEGMENT2, SEGMENT2_TYPE, ADDRESS2, NOTIFICATION_INT, USER_COMMENT, INTERNAL_USE, BRIDGE_TYPE FROM LANM.BRIDGE_DEFINITIONS ORDER BY SEGMENT1, SEGMENT2, BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef1s
DECLARE brgdef3n CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef3n
DECLARE nibrgdef3n CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN nibrgdef3n
DECLARE brgdef4nall CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef4nall
DECLARE brgdef4n CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) AND ((SEGMENT1 = :h_ach28SegmentNo) OR (SEGMENT2 = :h_ach28SegmentNo)) ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef4n
DECLARE nibrgdef4nall CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN nibrgdef4nall
DECLARE nibrgdef4n CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) AND ((SEGMENT1 = :h_ach28SegmentNo) OR (SEGMENT2 = :h_ach28SegmentNo)) ORDER BY BRIDGE_NAME ASC FOR FETCH ONLY
OPEN nibrgdef4n
DECLARE brgdef3s CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME, SEGMENT1, SEGMENT2 FROM LANM.BRIDGE_DEFINITIONS ORDER BY SEGMENT1 ASC, SEGMENT2 ASC, BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef3s
DECLARE brgdef4sall CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME, SEGMENT1, SEGMENT2 FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) ORDER BY SEGMENT1, SEGMENT2, BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef4sall
DECLARE brgdef4s CURSOR WITH HOLD FOR SELECT RESERVED, BRIDGE_NAME, SEGMENT1, SEGMENT2 FROM LANM.BRIDGE_DEFINITIONS WHERE (AUTOLINK_FLAG = :hfch1 OR AUTOLINK_FLAG = :hfch2) AND (NOTIFICATION_INT BETWEEN :hach2_1 AND :hach2_2) AND ((SEGMENT1 = :h_ach28SegmentNo) OR (SEGMENT2 = :h_ach28SegmentNo)) ORDER BY SEGMENT1, SEGMENT2, BRIDGE_NAME ASC FOR FETCH ONLY
OPEN brgdef4s
DECLARE brgperfm CURSOR WITH HOLD FOR SELECT BRIDGE_NAME, PERFORM_DATE, PERFORM_TIME, INTERVAL_SECONDS, SEGMENT1, SEGMENT2, BRIDGE_NUM, BC_FRAMES_FORWARD1, BC_BYTES_FORWARD1, NBC_FRAME_FORWARD1, NBC_BYTES_FORWARD1, FRAMES_DISC_SEG1, FRAMES_NR_CONGEST1, FRAMES_DISC_LINK1, BYTES_DISC_LINK1, FRAMES_DISC_OTHER1, FRAMES_NR_FILTER1, BC_FRAMES_FORWARD2, BC_BYTES_FORWARD2, NBC_FRAME_FORWARD2, NBC_BYTES_FORWARD2, FRAMES_DISC_SEG2, FRAMES_NR_CONGEST2, FRAMES_DISC_LINK2, BYTES_DISC_LINK2, FRAMES_DISC_OTHER2, FRAMES_NR_FILTER2, SEQUENCE_NO, LONG_SECONDS FROM LANM.BRIDGE_PERFORMANCE WHERE BRIDGE_NAME = :h_ach12BridgeName FOR FETCH ONLY
OPEN brgperfm
DECLARE brgperfm2 CURSOR WITH HOLD FOR SELECT BRIDGE_NAME, PERFORM_DATE, PERFORM_TIME, INTERVAL_SECONDS, SEGMENT1, SEGMENT2, BRIDGE_NUM, BC_FRAMES_FORWARD1, BC_BYTES_FORWARD1, NBC_FRAME_FORWARD1, NBC_BYTES_FORWARD1, FRAMES_DISC_SEG1, FRAMES_NR_CONGEST1, FRAMES_DISC_LINK1, BYTES_DISC_LINK1, FRAMES_DISC_OTHER1, FRAMES_NR_FILTER1, BC_FRAMES_FORWARD2, BC_BYTES_FORWARD2, NBC_FRAME_FORWARD2, NBC_BYTES_FORWARD2, FRAMES_DISC_SEG2, FRAMES_NR_CONGEST2, FRAMES_DISC_LINK2, BYTES_DISC_LINK2, FRAMES_DISC_OTHER2, FRAMES_NR_FILTER2, SEQUENCE_NO, LONG_SECONDS FROM LANM.BRIDGE_PERFORMANCE WHERE BRIDGE_NAME = :h_ach54BridgeName AND PERFORM_TIME BETWEEN :h_ach54StartTime AND :h_ach54EndTime AND PERFORM_DATE BETWEEN :h_ach54StartDate AND :h_ach54EndDate ORDER BY LONG_SECONDS ASC FOR FETCH ONLY
OPEN brgperfm2
DECLARE brgsegs CURSOR WITH HOLD FOR (SELECT DISTINCT SEGMENT1 FROM LANM.BRIDGE_DEFINITIONS UNION SELECT DISTINCT SEGMENT2 FROM LANM.BRIDGE_DEFINITIONS) FOR FETCH ONLY
OPEN brgsegs
DECLARE causegs CURSOR WITH HOLD FOR SELECT DISTINCT SEGMENT_NO FROM LANM.CAU ORDER BY SEGMENT_NO ASC FOR FETCH ONLY
OPEN causegs
DECLARE causonseg CURSOR WITH HOLD FOR SELECT CAU_ID, COMM_ADDR FROM LANM.CAU WHERE SEGMENT_NO=:h_ach3SegmentNo FOR FETCH ONLY
OPEN causonseg
DECLARE causprevact CURSOR WITH HOLD FOR SELECT CAU_ID FROM LANM.CAU WHERE SEGMENT_NO = :h_ach36SegmentNo FOR FETCH ONLY
OPEN causprevact
DECLARE cauqualifier CURSOR WITH HOLD FOR SELECT SEGMENT FROM LANM.CAU_QUALIFIERS FOR FETCH ONLY
OPEN cauqualifier
DECLARE config1s CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, SEQUENCE_NO FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY SEQUENCE_NO ASC FOR FETCH ONLY
OPEN config1s
DECLARE config2s CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, ADAPT_ADDR, SEQUENCE_NO FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY SEQUENCE_NO ASC FOR FETCH ONLY
OPEN config2s
DECLARE niconfig1s CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, SEQUENCE_NO FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY SEQUENCE_NO ASC FOR FETCH ONLY
OPEN niconfig1s
DECLARE niconfig2s CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, ADAPT_ADDR, SEQUENCE_NO FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY SEQUENCE_NO ASC FOR FETCH ONLY
OPEN niconfig2s
DECLARE config2sd CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, ADAPT_ADDR, SEQUENCE_NO FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY SEQUENCE_NO DESC FOR FETCH ONLY
OPEN config2sd
DECLARE config2n CURSOR WITH HOLD FOR SELECT C.RESERVED, C.FUNCTIONAL_ADDR, C.ADAPT_ADDR, SD.ADAPT_NAME FROM LANM.CONFIGURATION C, LANM.STATION_DEFINITION SD WHERE SEGMENT_NO = :h_ach3SegmentNo AND C.ADAPT_ADDR = SD.ADAPT_ADDR ORDER BY ADAPT_NAME ASC FOR FETCH ONLY
OPEN config2n
DECLARE config2aa CURSOR WITH HOLD FOR SELECT DISTINCT RESERVED, FUNCTIONAL_ADDR, ADAPT_ADDR FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo AND ADAPT_ADDR NOT IN ( SELECT ADAPT_ADDR FROM LANM.STATION_DEFINITION ) ORDER BY ADAPT_ADDR ASC FOR FETCH ONLY
OPEN config2aa
DECLARE config2a CURSOR WITH HOLD FOR SELECT RESERVED, FUNCTIONAL_ADDR, ADAPT_ADDR FROM LANM.CONFIGURATION WHERE SEGMENT_NO = :h_ach3SegmentNo ORDER BY ADAPT_ADDR ASC FOR FETCH ONLY
OPEN config2a
COMMIT
BEGIN DECLARE SECTION
END DECLARE SECTION
FETCH alertfilters INTO :h_chAlertFilterPriority, :h_chAlertFilterAlertBp, :h_achAlertFilterAlertId:hni1, :h_achAlertFilterResourceName:hni1, :h_chAlertFilterErrorType:hni1