jcl pass parameter to proc
Posted: Sat Oct 17, 2020 2:32 pm
Hello,
I would like to pass a variable from jcl to a proc and use that parameter as input for a rexx program, how do i solve that?
Coded for you. Please do it yourself in future.
I would like to pass a variable from jcl to a proc and use that parameter as input for a rexx program, how do i solve that?
//PARM JOB 999BCS0,
// REGION=256M,
// CLASS=A,
// COND=(4,LT),
// NOTIFY=&SYSUID
// SET DB2SSID=DA0O
// JCLLIB ORDER=(DB2.&DB2SSID..PROCLIB,
// OMIH.B01.PROC)
// INCLUDE MEMBER=JOBLDB2
//GEEFPARM EXEC PROC=PROCREXX,
// BRON=COA
//PROCREXX PROC
//SHOWPARM EXEC PGM=IKJEFT01,PARM=('SHOWPARM &BRON.')
//SYSEXEC DD DISP=SHR,DSN=OMIH.B01.EXEC
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//UITVOER DD SYSOUT=*
//PROCREXX PEND
// REGION=256M,
// CLASS=A,
// COND=(4,LT),
// NOTIFY=&SYSUID
// SET DB2SSID=DA0O
// JCLLIB ORDER=(DB2.&DB2SSID..PROCLIB,
// OMIH.B01.PROC)
// INCLUDE MEMBER=JOBLDB2
//GEEFPARM EXEC PROC=PROCREXX,
// BRON=COA
//PROCREXX PROC
//SHOWPARM EXEC PGM=IKJEFT01,PARM=('SHOWPARM &BRON.')
//SYSEXEC DD DISP=SHR,DSN=OMIH.B01.EXEC
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//UITVOER DD SYSOUT=*
//PROCREXX PEND
Coded for you. Please do it yourself in future.