Pathway/iTS Management Programming Manual

Error Handling Example Program
NonStop Pathway/iTS Management Programming Manual—426749-002
14-15
05 FILLER PIC X(20) VALUE "NOKATAKANALLOWED2"
05 FILLER PIC S9(4) VALUE 3066.
05 FILLER PIC X(20) VALUE "NOTDBCSDATA1".
05 FILLER PIC S9(4) VALUE 3067.
05 FILLER PIC X(20) VALUE "NOTDBCSDATA2"
05 FILLER PIC S9(4) VALUE 3068.
05 FILLER PIC X(20) VALUE "UNILATERALABORT"
05 FILLER PIC S9(4) VALUE 3069.
05 FILLER PIC X(20) VALUE "BACUPOPENERROR".
05 FILLER PIC S9(4) VALUE 3070.
05 FILLER PIC X(20) VALUE "TERMNOTCAPABLE".
05 FILLER PIC S9(4) VALUE 3071.
05 FILLER PIC X(20) VALUE "ILLRUNTIMEATTRS".
05 FILLER PIC S9(4) VALUE 3072.
05 FILLER PIC X(20) VALUE "INSUFFTERMPOOLS".
05 FILLER PIC S9(4) VALUE 3073.
05 FILLER PIC X(20) VALUE "ILLEGALDELAY".
05 FILLER PIC S9(4) VALUE 3074.
05 FILLER PIC X(20) VALUE "SCPROCESSOPEN".
05 FILLER PIC S9(4) VALUE 3100.
05 FILLER PIC X(20) VALUE "DIROPEN".
05 FILLER PIC S9(4) VALUE 3101.
05 FILLER PIC X(20) VALUE "CODOPEN".
05 FILLER PIC S9(4) VALUE 3102.
05 FILLER PIC X(20) VALUE "BADDIR".
05 FILLER PIC S9(4) VALUE 3103.
05 FILLER PIC X(20) VALUE "BADCOD".
05 FILLER PIC S9(4) VALUE 3104.
05 FILLER PIC X(20) VALUE "CONFIGTOOBIG".
05 FILLER PIC S9(4) VALUE 3106.
05 FILLER PIC X(20) VALUE "SWAPCREATE".
05 FILLER PIC S9(4) VALUE 3107.
05 FILLER PIC X(20) VALUE "SWAPOPEN".
05 FILLER PIC S9(4) VALUE 3108.
05 FILLER PIC X(20) VALUE "SWAPIO".
05 FILLER PIC S9(4) VALUE 3109.
05 FILLER PIC X(20) VALUE "MAXSC".
05 FILLER PIC S9(4) VALUE 3110.
05 FILLER PIC X(20) VALUE "REPLYNOTDEFINED".
05 FILLER PIC S9(4) VALUE 3112.
05 FILLER PIC X(20) VALUE "SENDTOOBIG".
05 FILLER PIC S9(4) VALUE 3113.
05 FILLER PIC X(20) VALUE "MAXREPLY".
05 FILLER PIC S9(4) VALUE 3114.
05 FILLER PIC X(20) VALUE "BADREPLYLENGTH".
05 FILLER PIC S9(4) VALUE 3115.
05 FILLER PIC X(20) VALUE "SCPROCESSIO".
05 FILLER PIC S9(4) VALUE 3116.
05 FILLER PIC X(20) VALUE "SCNOTDEFINED".
05 FILLER PIC S9(4) VALUE 3117.
05 FILLER PIC X(20) VALUE "BADSCSTATE".
05 FILLER PIC S9(4) VALUE 3118.
05 FILLER PIC X(20) VALUE "MAXSCPROCESS".
05 FILLER PIC S9(4) VALUE 3119.
05 FILLER PIC X(20) VALUE "DIRIO".
05 FILLER PIC S9(4) VALUE 3121.
05 FILLER PIC X(20) VALUE "CODIO".
05 FILLER PIC S9(4) VALUE 3122.
05 FILLER PIC X(20) VALUE "NOSCPROCESS".
05 FILLER PIC S9(4) VALUE 3123.
05 FILLER PIC X(20) VALUE "EXITPROGWERR".
05 FILLER PIC S9(4) VALUE 3124.
05 FILLER PIC X(20) VALUE "MULTUNSOLREJECTED".
05 FILLER PIC S9(4) VALUE 3125.
Example 14-1. Handling Errors (page 14 of 26)