HP NonStop Pathway/iTS Programming Manual page 657

Error Handling Example Program
Example 14-1. Handling Errors (page 12 of 26)
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
05 FILLER
01 WS-PM-ERROR-NAMES REDEFINES WS-PM-ERROR-NAME-TABLE.
05 ERROR-ENTRY
10 ERROR-NAME
10 ERROR-NUMBER
/
01 WS-TCP-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(20) VALUE "OSSNOTAVAILABLE".
PIC S9(4) VALUE 1160.
PIC X(20) VALUE "PROCTYPEMISMATCH".
PIC S9(4) VALUE 1161.
PIC X(20) VALUE "RESIZESEGMENT".
PIC S9(4) VALUE 1162.
PIC X(20) VALUE "PRODUCTNOTLICENSED".
PIC S9(4) VALUE 1164.
OCCURS 120 TIMES
ASCENDING KEY IS ERROR-NUMBER OF
INDEXED BY PM-ERROR-INDEX.
PIC X(20).
PIC S9(4).
PIC X(20) VALUE "BADPCODE".
PIC S9(4) VALUE
PIC X(20) VALUE "DEPENDVARTOOBIG".
PIC S9(4) VALUE
PIC X(20) VALUE "BADINDEX".
PIC S9(4) VALUE
PIC X(20) VALUE "BADRECOVERY".
PIC S9(4) VALUE
PIC X(20) VALUE "BADPUPARAMS".
PIC S9(4) VALUE
PIC X(20) VALUE "BADPUPARAMSIZE".
PIC S9(4) VALUE
PIC X(20) VALUE "NOBASEDISPLAY".
PIC S9(4) VALUE
PIC X(20) VALUE "BADDATAREF".
PIC S9(4) VALUE
PIC X(20) VALUE "BADSCREENTERM".
PIC S9(4) VALUE
PIC X(20) VALUE "TERMFORMAT".
PIC S9(4) VALUE
PIC X(20) VALUE "BADTERMTYPE".
PIC S9(4) VALUE
PIC X(20) VALUE "SCREENNOTDISPLAY".
PIC S9(4) VALUE
PIC X(20) VALUE "DUPOVERLAY".
PIC S9(4) VALUE
PIC X(20) VALUE "INVALIDIOPROTOCOL".
PIC S9(4) VALUE
PIC X(20) VALUE "ARITHOVERFLOW".
PIC S9(4) VALUE
PIC X(20) VALUE "STACKOVERFLOW".
PIC S9(4) VALUE
PIC X(20) VALUE "TERMOPEN".
PIC S9(4) VALUE
PIC X(20) VALUE "TERMIO".
PIC S9(4) VALUE
PIC X(20) VALUE "TERMIOLEN".
PIC S9(4) VALUE
PIC X(20) VALUE "PUNOTDEFINED".
PIC S9(4) VALUE
PIC X(20) VALUE "SENDFAIL".
PIC S9(4) VALUE
PIC X(20) VALUE "BADSCNAME".
PIC S9(4) VALUE
PIC X(20) VALUE "CODETOOBIG".
PIC S9(4) VALUE
14 -13
WS-PM-ERROR-NAMES
3001.
3002.
3003.
3004.
3005.
3006.
3007.
3008.
3009.
3010.
3011.
3012.
3013.
3014.
3015.
3016.
3017.
3018.
3019.
3020.
3021.
3022.
3023.