The best option is to create an ISPF Skel process or REXX or Clist to do the substitution, create the batch job and Control Cards, and then submit the job. There is nothing currently in TSO or JCL that will do the kind of process you need that I know of.
Lizette > >Hello, > >I am trying to optimize some tasks I perform with my MQ Series. My idea is to >delete a bunch of MQ objects just passing am unique number reference that >identifies our partners. > >The JCL would look like this: > >//DLPARTNR PROC REF= >//CSQUTIL1 EXEC PGM=CSQUTIL,REGION=0M, >// PARM='BCMH' >//STEPLIB DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQANLE >// DD DISP=SHR,DSN=SSTP.HZ19.MQS600.SCSQAUTH >//SYSPRINT DD SYSOUT=* >//SYSIN DD DISP=SHR,DSN=SSTP.SYSIN(DEL1) >//CSQUCMD DD DISP=SHR,DSN=SSTP.SYSIN(DEL2) > >So I have several MQ-delete commands contained inside of the DEL1 and DEL2 >SYSIN datasets, somewhat like this: > DELETE CHANNEL(MYCOMPANY.TO.&REF) > >I ended up discovering that symbols parameters I submit do not replace the >ones contained on SYSIN data, is this true? Is there any workaround? > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html