Example 2

This example shows the JCL statements used to do the following tasks:

• Check an input file
• Generate an IOCDS
• Write the generated IOCDS to the A0 IOCDS slot on the Support Element.

IOCP requires SYSLST for the output data set and sends reports there.

// JOB   IOCP2 
// ASSGN SYSLST,cuu 
// ON $RC GE 8 GOTO label 
// EXEC  PGM=ICPIOCP,SIZE=AUTO,PARM='WRTCDS=A0' 
* $$ SLI ICCF=(membername),LIB=(lib) 
/* 
/. label 
/&

In the example:

JOB

Specifies the JOB statement.

SYSLST

Specifies the printer to receive messages and reports. You must assign SYSLST to a physical printer or to a VSE/POWER spooled printer. (IOCP records contain ANSI device control characters and have a length of 133 bytes.)

ON $RC GE 8 GOTO label

Specifies that if IOCP ends with an error (return code of 8 or greater), job processing continues at label.

EXEC

Specifies the EXEC statement with the following options coded:

PGM=ICPIOCP

Specifies that you want to run the ICPIOCP program.

SIZE=AUTO

Specifies that the IOCP program uses the remaining partition size for GETVIS or IARV64.

PARM='WRTCDS=A0'

Specifies that IOCP write the A0 IOCDS to the hard disk of the Support Element.

ICCF=(membername)

Specifies the name of the IOCP source member of a VSE/ICCF library.

LIB=(lib)

Specifies the name of the VSE/ICCF-controlled library to search for the named SLI member.