Manualshelf

TS/MP Management Programming Manual (H06.05+, J06.03+)

ManualsBrandsHP ManualsServerHP Integrity NonStop H-Series
571572573574575576577578579580
Error Handling Example Program
HP NonStop TS/MP Management Programming Manual—540082-005
18-4
05 FILLER PIC X(12) VALUE "SCTERM".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TCP".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TCPLINK".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TCPSC".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TCPTERM".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TELL".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "TERM".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
05 FILLER PIC X(12) VALUE "SCDEFINE".
05 FILLER PIC 9 VALUE 1.
05 FILLER NATIVE-4.
05 FILLER NATIVE-4.
01 WS-OBJECT-TYPE-NAMES REDEFINES WS-OBJECT-TYPE-NAME-TABLE.
05 OBJECT-ENTRY OCCURS 22 TIMES.
10 OBJECT-TYPE-NAME PIC X(12).
10 OBJECT-FLAG PIC 9.
10 REQ-NAME-TKN NATIVE-4.
10 NAME-TKN NATIVE-4.
/
01 WS-TNM-NAME-TABLE.
05 FILLER PIC X(23) VALUE "DEF-PATHCTL".
05 FILLER PIC X(23) VALUE "DEF-PATHWAY".
05 FILLER PIC X(23) VALUE "DEF-PROG".
05 FILLER PIC X(23) VALUE "DEF-PROGTERM".
05 FILLER PIC X(23) VALUE "DEF-SC".
05 FILLER PIC X(23) VALUE "DEF-SCASSIGN".
05 FILLER PIC X(23) VALUE "DEF-SCPARAM".
05 FILLER PIC X(23) VALUE "DEF-SCPROCESS".
05 FILLER PIC X(23) VALUE "DEF-SCSTARTUP".
05 FILLER PIC X(23) VALUE "DEF-TCP".
05 FILLER PIC X(23) VALUE "DEF-TELL".
05 FILLER PIC X(23) VALUE "DEF-TERM".
05 FILLER PIC X(23) VALUE "DESCRIPTOR".
05 FILLER PIC X(23) VALUE "DEVICESUBTYPE".
05 FILLER PIC X(23) VALUE "DUMPERROR".
05 FILLER PIC X(23) VALUE "EADDR".
05 FILLER PIC X(23) VALUE "EID".
05 FILLER PIC X(23) VALUE "ERRINFO".
05 FILLER PIC X(23) VALUE "ERROBJECTTYPE".
05 FILLER PIC X(23) VALUE "ERROR".
05 FILLER PIC X(23) VALUE "EVENTCLASS".
05 FILLER PIC X(23) VALUE "FIELDLENGTH".
05 FILLER PIC X(23) VALUE "FIELDOFFSET".
Example 18-1. Handling Errors (page 4 of 26)