TS/MP 2.5 Management Programming Manual

17 Error Handling Example Program

This example management program decodes a Pathway subsystem SPI error list. It is written in

COBOL.

The program:

1. Obtains and interprets the ZSPI-TKN-RETCODE token and selects a table based on the range

of ZSPI-TKN-RETCODE. For information on the ZSPI-TKN-RETCODE token, see the SPI

Programming Manual.

2. Locates and displays the error message text.

3. After opening the error list, decodes and displays the value of these error tokens:

ZPWY-TKN-REQCOMMAND

ZPWY-TKN-REQOBJECTTYPE

ZPWY-TKN-REQnnnNAME

ZSPI-DDL-PARM-ERR

ZPWY-TKN-ERROBJECTTYPE

ZPWY-TKN-nnnNAME

ZPWY-TKN-ERRINFO

The error tables are created by defining records that contain the text for each error message, one

record for each of the three categories of Pathway subsystem errors (that is, errors returned by

PATHMON, TCP, and SPI). The program then redefines each record as a table, with an occurrence

for each error message.

The source files used in this example include:

• ZSPICOB – Which contains SPI/DSM COBOL definitions.

• ZPWYCOB – Which contains Pathway/DSM COBOL definitions.

The object file used is COBOLEX0, which contains C00 operating system procedure call formats.

349