HP NonStop Pathway/iTS Programming Manual page 652

Error Handling Example Program
Example 14-1. Handling Errors (page 7 of 26)
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
01 WS-TNM-NAMES REDEFINES WS-TNM-NAME-TABLE.
05 TNM-ENTRY
/
01 WS-SPI-ERROR-NAME-TABLE.
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
NonStop Pathway/iTS Management Programming Manual—426749-002
PIC X(23) VALUE "DEF-SCPROGRAMOSS".
PIC X(23) VALUE "DEF-SCCWD".
PIC X(23) VALUE "DEF-SCSTDERR".
PIC X(23) VALUE "DEF-SCSTDIN".
PIC X(23) VALUE "DEF-SCSTDOUT".
PIC X(23) VALUE "DEF-SCENV".
PIC X(23) VALUE "DEF-SCARGLIST".
PIC X(23) VALUE "QUAL-SC".
PIC X(23) VALUE "OSSERRNO".
PIC X(23) VALUE "TPCERROR".
PIC X(23) VALUE "TPCDETAIL".
PIC X(23) VALUE "PAR-INFO".
PIC X(23) OCCURS 162 TIMES.
PIC X(19) VALUE "EXTRATOKEN".
PIC S9(4) VALUE 4001.
PIC X(19) VALUE "INVALIDTOKEN".
PIC S9(4) VALUE 4002.
PIC X(19) VALUE "WRONGTOKEN".
PIC S9(4) VALUE 4003.
PIC X(19) VALUE "MISSINGTOKEN".
PIC S9(4) VALUE 4004.
PIC X(19) VALUE "INVALIDFIELD".
PIC S9(4) VALUE 4005.
PIC X(19) VALUE "MISSINGFIELD".
PIC S9(4) VALUE 4006.
PIC X(19) VALUE "NUMSTATICTOOBIG".
PIC S9(4) VALUE 4007.
PIC X(19) VALUE "TOOMANYDEFSERVERS".
PIC S9(4) VALUE 4008.
PIC X(19) VALUE "INVALIDBUFFER".
PIC S9(4) VALUE 4009.
PIC X(19) VALUE "BADCHECKSUM".
PIC S9(4) VALUE 4010.
PIC X(19) VALUE "SSPUT".
PIC S9(4) VALUE 4011.
PIC X(19) VALUE "SSGET".
PIC S9(4) VALUE 4012.
PIC X(19) VALUE "SSINIT".
PIC S9(4) VALUE 4013.
PIC X(19) VALUE "SSNULL".
PIC S9(4) VALUE 4014.
PIC X(19) VALUE "WRONGSUBSYS".
PIC S9(4) VALUE 4015.
PIC X(19) VALUE "RESERVEDWORD".
PIC S9(4) VALUE 4016.
PIC X(19) VALUE "INVALIDCONTEXT".
PIC S9(4) VALUE 4017.
PIC X(19) VALUE "CTLPMNAMEMISMATCH".
PIC S9(4) VALUE 4018.
PIC X(19) VALUE "CTLSTATEMISMATCH".
PIC S9(4) VALUE 4019.
PIC X(19) VALUE "CMDTOOBIG".
PIC S9(4) VALUE 4021.
PIC X(19) VALUE "ATLEASTONE".
PIC S9(4) VALUE 4022.
PIC X(19) VALUE "CWDCANTBERESETNOW".
PIC S9(4) VALUE 4023.
PIC X(19) VALUE "GUARDIANATTRUSED".
PIC S9(4) VALUE 4024.
14- 8