I have had to do the indirection described in this document to make it work.
http://www-01.ibm.com/support/docview.wss?uid=isg1OA47958 Alan ________________________________ From: Gadi Ben-Avi <[email protected]> Sent: Tuesday, June 19, 2018 22:59 To: [email protected] Subject: Using JCL Symbld and TYPRUN=SCAN Hi, I am trying to create a procedure that receives parameters and then uses the values as the input for some steps. This is part of the procedure. //DOALL PROC LVL4=LVL4,PART=PART // EXPORT SYMLIST=(LVL4,PART) // SET LVL4=&LVL4 // SET PART=&PART //DEL EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //X DD SYSOUT=X //SYSIN DD *,SYMBOLS=(JCLONLY,X) DELETE KVPO.MOST.DB2DATA.&LVL4..&PART..TRS SET MAXCC = 0 //DOALL PEND When I tried running this using //G110FT24 JOB (00),'GET',CLASS=X,MSGCLASS=X,PRTY=9, // NOTIFY=&SYSUID TYPRUN=SCAN // JCLLIB ORDER=(SYSG.DB2.UNLOAD) //D1 EXEC DOALL,LVL4=PKVS1073,PART=PART1 The variables in the IDCAMS DELETE statement were not substituted. When I ran the job without TYPRUN=SCAN, the variables were substituted. Is there a way to have the variables get substituted, without actually running the job. This is running in z/OS v2.2 Gadi ????? ?? ????? ???? ???? ???? ?????? ??? ??? ?????? ???? ????? ??? ?????? ??????. ?? ????, ???????? ?? ??? ???? ?????, ??????? ???? ???? ????? ?? ??? ????? ?????? ?? ?????. ????? ????? ???? ?? ?????? ?????? ?????? ???? ?? ???? ??????? ??? ???, ?/?? ?????, ????? ?? ????? ????? ????? ????? ?????? ?? ????? ??????? ?/?? ?????? ?? ??????. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
