TS/MP Management Programming Manual (G06.24+, H06.03+)

Error Handling Example Program
NonStop TS/MP Management Programming Manual—540082-001
17-5
05 FILLER PIC X(23) VALUE "FNAME".
05 FILLER PIC X(23) VALUE "INSTRUCTION".
05 FILLER PIC X(23) VALUE "IOPROTOCOL".
05 FILLER PIC X(23) VALUE "LADDR".
05 FILLER PIC X(23) VALUE "LMNAME".
05 FILLER PIC X(23) VALUE "MAXINPUTMSGS".
05 FILLER PIC X(23) VALUE "MESSAGELENGTH".
05 FILLER PIC X(23) VALUE "NESTEDMSGNUMBER".
05 FILLER PIC X(23) VALUE "NEWPROCERROR".
05 FILLER PIC X(23) VALUE "PADDR".
05 FILLER PIC X(23) VALUE "PAR-CONTROL-PM".
05 FILLER PIC X(23) VALUE "PAR-CONTROL-TCP".
05 FILLER PIC X(23) VALUE "PAR-FREEZE-SC".
05 FILLER PIC X(23) VALUE "PAR-INSPECT-TERM".
05 FILLER PIC X(23) VALUE "PAR-START-PATHWAY".
05 FILLER PIC X(23) VALUE "PAR-START-PROG".
05 FILLER PIC X(23) VALUE "PAR-START-TERM".
05 FILLER PIC X(23) VALUE "PAR-STATS-SCLM".
05 FILLER PIC X(23) VALUE "PAR-STATS-SCTCP".
05 FILLER PIC X(23) VALUE "PAR-STATS-TCP".
05 FILLER PIC X(23) VALUE "PAR-STATS-TCPSC".
05 FILLER PIC X(23) VALUE "PAR-STATS-TCPTERM".
05 FILLER PIC X(23) VALUE "PAR-STATS-TERM".
05 FILLER PIC X(23) VALUE "PAR-STATUS-SC".
05 FILLER PIC X(23) VALUE "PAR-SUSPEND-TERM".
05 FILLER PIC X(23) VALUE "PAR-TELL-TERM".
05 FILLER PIC X(23) VALUE "PMNAME".
05 FILLER PIC X(23) VALUE "PMREQUESTERNAME".
05 FILLER PIC X(23) VALUE "PROGNAME".
05 FILLER PIC X(23) VALUE "PROGTERMNAME".
05 FILLER PIC X(23) VALUE "PUNAME".
05 FILLER PIC X(23) VALUE "PUOFFSET".
05 FILLER PIC X(23) VALUE "PUVERSION".
05 FILLER PIC X(23) VALUE "REQCOMMAND".
05 FILLER PIC X(23) VALUE "REQLMNAME".
05 FILLER PIC X(23) VALUE "REQOBJECTTYPE".
05 FILLER PIC X(23) VALUE "REQPMREQUESTERNAME".
05 FILLER PIC X(23) VALUE "REQPROGNAME".
05 FILLER PIC X(23) VALUE "REQPROGTERMNAME".
05 FILLER PIC X(23) VALUE "REQSCASSIGNNAME".
05 FILLER PIC X(23) VALUE "REQSCLMNAME".
05 FILLER PIC X(23) VALUE "REQSCNAME".
05 FILLER PIC X(23) VALUE "REQSCPARAMNAME".
05 FILLER PIC X(23) VALUE "REQSCPROCESSNAME".
05 FILLER PIC X(23) VALUE "REQSCSTARTUPNAME".
05 FILLER PIC X(23) VALUE "REQSCTCPNAME".
05 FILLER PIC X(23) VALUE "REQSCTERMNAME".
05 FILLER PIC X(23) VALUE "REQTCPLINKNAME".
05 FILLER PIC X(23) VALUE "REQTCPNAME".
05 FILLER PIC X(23) VALUE "REQTCPSCNAME".
05 FILLER PIC X(23) VALUE "REQTCPTERMNAME".
05 FILLER PIC X(23) VALUE "REQTELLNAME".
05 FILLER PIC X(23) VALUE "REQTERMNAME".
05 FILLER PIC X(23) VALUE "SADDR".
05 FILLER PIC X(23) VALUE "SCASSIGNNAME".
05 FILLER PIC X(23) VALUE "SCLMNAME".
05 FILLER PIC X(23) VALUE "SCNAME".
05 FILLER PIC X(23) VALUE "SCPARAMNAME".
05 FILLER PIC X(23) VALUE "SCPROCESSNAME".
05 FILLER PIC X(23) VALUE "SCREEN".
05 FILLER PIC X(23) VALUE "SCSTARTUPNAME".
05 FILLER PIC X(23) VALUE "SCTCPNAME".
05 FILLER PIC X(23) VALUE "SCTERMNAME".
05 FILLER PIC X(23) VALUE "SEL-LM".
Example 17-1. Handling Errors (page 5 of 26)