mainframegurukul.com

I am trying to pass a symbolic argument from my JCL to my REXX program.
Is at all possible? if so, what would be the correct way to code the JCL?
Thanks in advance...

Here's the JCL as it is currently coded:

//JOB CARD (0000,0000,,0000),'0000000000 000000',
// CLASS=I,MSGCLASS=R
//*
/*JOBPARM SYSAFF=SYSA
//*
// SET PFX=IWDV.D2UC.C3.WPIWLHS2.SQLDELET
//********************************************************
//* RUN REXX XXXXXXXX OUT OF IWDV.FS.CP04.REXX
//* WITH ARGMENTS: ARG1 (PFX)
//********************************************************
//STEP1 EXEC PGM=IKJEFT01,DYNAMNBR=200,
// PARM='%DASHUNDR-EXEC &PFX'
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD DUMMY
//SYSEXEC DD DSN=IWDV.FS.CP04.REXX,DISP=SHR
/*


Here's the result for submitting the above JCL:

INVALID COMMAND NAME SYNTAX
READY
END

Found the answer to my own question:

/*JOBPARM SYSAFF=SYSA
//*
// SET PFX=IWDV.D2UC.C3.WPIWLHS2.SQLDELET
//********************************************************
//* RUN REXX XXXXXXXX OUT OF IWDV.FS.CP04.REXX
//* WITH ARGMENTS: ARG1 (PFX)
//********************************************************
//STEP1 EXEC PGM=IKJEFT01,DYNAMNBR=200,
// PARM='DASHUNDR &PFX'
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN DD DUMMY
//SYSEXEC DD DSN=IWDV.FS.CP04.REXX,DISP=SHR
/*

It does not take much to understand. But I wanted to try it.

<< Content deleted By Admin >>