You can direct some subsystem, such as printer service facility, with their own ste of control statements. To do this, you need to include the program control statement in the input stream for a data set by placing them between CNTL and ENDCNTL statements.
Then you can add a CNTL parameter to the DD statement to refer to the label of the CNTL staement as shown here.
Syntax :
//STEPNAME EXEC PGM=EMP001
//lable CNTL *
{Place the control statement here.}
// ENDCNTL
//ddname DD CNTL=*.label,..
Place CNTL, and the DD statement that reference it, in the same step. The DD statement should follow CNTL/ENDCNTL in the input strem.
You can place both CNTL/ENDCNTL and the DD statement in a catalog procedure, and control statement can contain symbolic parameters.
OR you can place CNTL/ENDCNTL in a procedure and place the DD statement in the invoking job step. When you do this, code the CNTL parameter on the DD statement as a referback.
//ddname DD CNTL=*.stepnme.procstepname.label,_
Example : 1
//STEP1 EXEC PGM=PRINT
//ABLE CNTL
//STATE1 PRINTDEV BUFNO=20,PIMSG=YES,DATACK=BLOCK
//BAKER ENDCNTL
//CALLER DD UNIT=3800-3,CNTL=*.ABLE
Then you can add a CNTL parameter to the DD statement to refer to the label of the CNTL staement as shown here.
Syntax :
//STEPNAME EXEC PGM=EMP001
//lable CNTL *
{Place the control statement here.}
// ENDCNTL
//ddname DD CNTL=*.label,..
Place CNTL, and the DD statement that reference it, in the same step. The DD statement should follow CNTL/ENDCNTL in the input strem.
You can place both CNTL/ENDCNTL and the DD statement in a catalog procedure, and control statement can contain symbolic parameters.
OR you can place CNTL/ENDCNTL in a procedure and place the DD statement in the invoking job step. When you do this, code the CNTL parameter on the DD statement as a referback.
//ddname DD CNTL=*.stepnme.procstepname.label,_
Example : 1
//STEP1 EXEC PGM=PRINT
//ABLE CNTL
//STATE1 PRINTDEV BUFNO=20,PIMSG=YES,DATACK=BLOCK
//BAKER ENDCNTL
//CALLER DD UNIT=3800-3,CNTL=*.ABLE
No comments:
Post a Comment