IBM Mainframe Forum

Posted: **Fri Aug 05, 2022 11:19 pm**

Hello All,

We have this requirement of changing job accounting info in our Job cards. We have to do this for 35K+ JCLs (these are all test jobs).

From below job card, 2005 AND 0742 needs to be changed into new numbers.

Select all

//JOBDSCT1 JOB (2005,0742),'RESTORE DATASET', 
//         NOTIFY=&SYSUID,MSGCLASS=E          
//O OUTPUT DEST=ABC.R0,JESDS=ALL,DEFAULT=Y    
//*
 

If there a way to accomplish this for all 35K JCLs without using any Rexx?

Posted: **Sat Aug 06, 2022 12:20 am**

Sure, but you will need a program of some kind, my preference is PDS86 from cbttape.org file 182. Or some sort of PDS unload to a sequential dataset, then use ISPF edit, then reload PDS from the sequential dataset.

Posted: **Sat Aug 06, 2022 1:56 pm**

Or you can download PDSUPDTE, assembler source.

Posted: **Thu Aug 18, 2022 1:25 pm**

Hello, I use FMNMAIN pgm

IBM Mainframe Forum

Need to replace job accounting info in job card

Need to replace job accounting info in job card

Re: Need to replace job accounting info in job card

Re: Need to replace job accounting info in job card

Re: Need to replace job accounting info in job card