The figure below contains JCL to build the exceptions table.
1 //STEP1 EXEC PGM=PBFNEXCP
2 //STEPLIB DD DSN=hlq.BATCH.LOAD,DISP=SHR
3 //SYSPRINT DD SYSOUT=*
4 //SYSLOG DD SYSOUT=*
5 //SYSUDUMP DD SYSOUT=*
6 //EXCPIN DD *
L1MANE MAIN RP60187 (Sample Control Card)
7 /*
8 //EXCPOUT DD DSN=&&TEMP,UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800),DISP=(,CATLG)
//*
9 //ASMCC EXEC PGM=ASMA90,
// PARM=(ASA,DECK,NOOBJECT,RENT,BATCH,NORLD)
10 //SYSIN DD DISP=SHR,DSN=*.STEP1.EXCPOUT
11 //SYSLIB DD DISP=SHR,DSN=SYS1.MACLIB
12 //SYSUT1 DD UNIT=(SYSDA,SEP=SYSLIB),SPACE=(CYL,(1,1))
13 //SYSPUNCH DD DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(1,1)),
// DCB=(BLKSIZE=3200,LRECL=80,RECFM=FB)
14 //SYSPRINT DD SYSOUT=*
//*
15 //LKED EXEC PGM=IEWL,AMODE=31,RMODE=ANY
// PARM='LIST,MAP,RENT,XREF,AMODE=24,RMODE=24'
16 //SYSLIB DD DUMMY
17 //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
18 //SYSPRINT DD SYSOUT=*
19 //SYSLMOD DD DISP=SHR,DSN= hlq.xxxx.LOAD
20 //SYSLIN DD DSN=*.ASMCC.SYSPUNCH,DISP=SHR
// DD *
NAME PBFNEXTB(R)
//
A number appears to the left of each statement that contains a user-defined variable. The numbers correspond to the following descriptions.
Statement Number | Description |
---|---|
1 | This statement executes PBFNEXCP to process the Exceptions File created. This program processes the Exceptions Table control cards and creates an assembly listing that is passed to the following assemble and link edit steps. The second step performs the assembly of the program. The output from the assembly step is then passed to the third and final step. The linkage editor creates a load module and contains all statements contained in the original Exceptions File as input to the first step. This load module must be put in the CICS and/ or IMS online Finalist load library where the module can be accessed from CICS and/or IMS online transactions as well as any IMS BMP transactions calling FINALB modules. If this module is empty during processing, exceptions processing is ignored. |
2 | This statement identifies the load library containing your batch Finalist programs. |
3 | This statement identifies the print class for system messages or error messages generated during the execution program. |
4 | Include this statement if you require system messages to be written to the system log. |
5 | This statement identifies the print class for a system dump in case of an ABEND. |
6 | This statement defines the input for the program. The input cards are the same as those used for Exceptions Table processing in the batch environment. For more information on Exceptions Table input, refer to Exceptions Table Input. |
7 | This statement indicates the end of the input file. |
8 | This statement defines the output file created by the program. This file contains Assembler statements. These statements become the Exceptions Table in load module format for use in the CICS and/or IMS online environment with the Finalist CICS and/or IMS online system. |
9-14 | These statements execute the Assembler program using the output file from the first step as input. This step's output is the final step's input. |
15-20 | These statements execute the linkage editor using the output from the previous step as input. Output from this step is the Exceptions Table in load module format. It is important that the library referenced in statement 19 is the library in which you have loaded your Finalist IMS programs. The DSN parameter in statement 20 must appear as shown. If not, the Finalist CICS or IMS system cannot reference the Exceptions Table. |