Troubleshooting
Problem
The variables &INPUT and &OUTPUT do not get substituted within following scenario. JCL to be submitted via DMRTSUB:
//TESTJOB JOB 1111,C181846,CLASS=D,MSGCLASS=T,NOTIFY=TEST5
// SET INPUT=&INPUT
// SET OUTPUT=&OUTPUT
//JS010 EXEC PGM=IKJEFT01,
// PARM='AFRREBLK &INPUT &OUTPUT'
//SYSEXEC DD DSN=TEST.CLIST,DISP=SHR
/*ROUTE PRINT LOCAL
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
// SET INPUT=&INPUT
// SET OUTPUT=&OUTPUT
//JS010 EXEC PGM=IKJEFT01,
// PARM='AFRREBLK &INPUT &OUTPUT'
//SYSEXEC DD DSN=TEST.CLIST,DISP=SHR
/*ROUTE PRINT LOCAL
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
Run this batch job:
//JS010 EXEC ABCDEFG
//PS010.DMNETMAP DD DSN=$CD.SECPLUS.NETMAP,DISP=SHR
//PS010.DMPUBLIB DD DSN=$CD.NDM.CNTL,DISP=SHR
//PS010.SYSIN DD *
SIGNON CASE=YES
SUBMIT PROC=PCZOSRES -
NEWNAME=IND£FILE -
&DSN1='\\FILE1' –
&DSN2='FILE2.FILE2.FILE2' –
&DSN3='DNDM.TEST.TES.TESTTG05.TEST'
SIGNOFF
//*
//JS010 EXEC ABCDEFG
//PS010.DMNETMAP DD DSN=$CD.SECPLUS.NETMAP,DISP=SHR
//PS010.DMPUBLIB DD DSN=$CD.NDM.CNTL,DISP=SHR
//PS010.SYSIN DD *
SIGNON CASE=YES
SUBMIT PROC=PCZOSRES -
NEWNAME=IND£FILE -
&DSN1='\\FILE1' –
&DSN2='FILE2.FILE2.FILE2' –
&DSN3='DNDM.TEST.TES.TESTTG05.TEST'
SIGNOFF
//*
Process submitted:
PCTOZOS PROCESS PNODE=TESTNODE SNODE=CD.WIN.TEST
STEP1 COPY FROM(SNODE DSN=&DSN1 -
SYSOPTS="DATATYPE(BINARY) XLATE(NO)" -
DISP=SHR) -
TO(PNODE DSN=&DSN2 -
SYSOPTS="DATATYPE(BINARY) XLATE(NO)" -
DISP=(RPL))
IF (STEP1<5) THEN STEP2
RUN TASK ( -
PGM=DMRTSUB -
PARM=("DSN=DNDM.NDM.CNTL(RUNREXX),DISP=SHR", -
"INPUT &DSN2", -
"OUTPUT &DSN3")) PNODE
EIF
[{"Business Unit":{"code":"BU048","label":"IBM Software"},"Product":{"code":"SS4PJT","label":"IBM Sterling Connect:Direct"},"Component":"--","Platform":[{"code":"PF035","label":"z\/OS"}],"Version":"5.2;6.0","Edition":"","Line of Business":{"code":"LOB77","label":"Automation Platform"}}]
Log InLog in to view more of this document
This document has the abstract of a technical article that is available to authorized users once you have logged on. Please use Log in button above to access the full document. After log in, if you do not have the right authorization for this document, there will be instructions on what to do next.
Was this topic helpful?
Document Information
Modified date:
17 December 2019
UID
swg21599463