MVSFORUMS.com :: View topic - Using 'SET' paramaters for JCL OVERRIDES

Using 'SET' paramaters for JCL OVERRIDES

through

[^/[Print]\]

MVSFORUMS.com -> Job Control Language(JCL)

#1: Using 'SET' paramaters for JCL OVERRIDES Author: pcmoonbeam, Location: Orange County, California

Posted: Tue Dec 12, 2006 4:38 pm
—
Our shop recently started expanding the use of the SET paramater for symbolic overrides to jcl. It works wonderfully for datasets, but I was wondering if it can also be used for symbolic overrides on instream data such as IDCAMS DELETE/DEFINES or input for DB2 programs. See examples below:

Code:

// SET SYS=TF,
// DB2=DB2T
//*
...
//STEP0180 EXEC PGM=IKJEFT1B,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(&DB2)
RUN PROGRAM(RCOB270B) PLAN(FODBPLAN)
END
/*

It would really simplify testing.

#2: Author: dbzTHEdinosauer, Location: germany

Posted: Tue Dec 12, 2006 6:23 pm
—
symbolics that are part of instream data will not resolve. Instead, suggest that you create members of a parm library containing what you want, and use the symbolics to resolve the dd statement pointing to the systsin dsn(mem(s).. remember, you can concatonate, so:

Code:

// SET DB2=DB2T;
// RUN=RCOB270B
//*
//SYSTSIN DD DSN=SYSTEM.PARMLIB(&DB2), DISP=SHR
// DD DSN=SYSTEM.PARMLIB(&RUN), DISP=SHR
// DD DSN=SYSTEM.PARMLIB(END), DISP=SHR

#3: Author: pcmoonbeam, Location: Orange County, California

Posted: Wed Dec 13, 2006 2:26 pm
—
Thanks, that's what I thought, but was hoping otherwise.

#4: Author: dz,

Posted: Thu Dec 14, 2006 1:02 pm
—
If you have Endevor on your system, you can use Endevor-supplied routine
that takes JCL PARM, and writes out to a file:

Quote:

//STEP002 EXEC PGM=C1PRMGEN,
// PARM=' DSN SYSTEM(&DB2) | RUN PROGRAM(RCOB270B) PLAN(FODBPLAN)'
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//PARMOUT DD DSN=&TEMP..DB2,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
...........................
//STEP0180 EXEC PGM=IKJEFT1B,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DSN=&TEMP..DB2,DISP=SHR
//*

Then, concatenate this file as first file in SYSTSIN.
Symbol | is used for newline split.
If you exceed 100-byte PARM length, just add another step to MOD more lines, if needed.

MVSFORUMS.com -> Job Control Language(JCL)

output generated using printer-friendly topic mod. All times are GMT - 5 Hours

Page 1 of 1