The CAZ2JAPT CSECT supplies the alias name of IMS Program DFSRRC00 and CA APCDDS Program CATKJCL. If CA JCLCheck finds that PGM= on the EXEC statement matches an entry in this CSECT, it searches for the actual program name in the second field of the PARM operand.
The following example uses the second parameter on the EXEC=PARM for passing the program name. Program CATKJCL uses the first positional parameter, as does DFSRRC00.
CAZ2JAPT CSECT
SPACE
SPACE
$APT DFSRRC00,2,IMS IMS BATCH PGM=DFSRRC00,PARM=(DLI,IEFBR14
$APT CATKJCL,2 CA APCDDS PGM=CATKJCL,PARM='DDS,IEFBR14'
$APT MYUTIL,3 PGM=MYUTIL,PARM='...,...,IEFBR14'
$APT TESTIT,1 PGM=TESTIT,PARM='IEFBR14'
$APT * END OF TABLE INDICATOR *
END
Note: You can find the supplied source for this CSECT in member CAZ2JAPT of the CAZ2SRC library.
|
Copyright © 2014 CA.
All rights reserved.
|
|