On Tue, 24 Jul 2007 12:08:43 -0400, Earnie Allen
<[EMAIL PROTECTED]> wrote:

>Getting lots of suggestions/ideas.  Gonna take me a bit to sort them out.
>
>My situation is that I need to take current production JCLlib(s) and modify
>the ACCT info in each .... not the same change to all jobcards.
>

Then my ISPF edit macro suggestion in combination with something like
my EDMACALL will work just dandy.   Your edit macro will be very simple:

/* REXX */                              
ADDRESS ISREDIT                         
"MACRO"                                 
" C '(ACCT123)'  '(ACCTABC)' FIRST"     
" C '(ACCT456)'  '(ACCTDEF)' FIRST"     
" C '(ACCT789)'  '(ACCTGHI)' FIRST"     

Or  PDS86 against the PDS with multiple REPLACE commands will work 
and might still be faster depending on how many have to change (since it
has to pass though the entire data set for each REPLACE command).   Since 
it is a one time change, performance shouldn't be too big a concern.

//PDS      EXEC PGM=IKJEFT01                    
//STEPLIB  DD   DSN=pds86.LOADLIB,DISP=SHR          
//SYSTSPRT DD   SYSOUT=*                                     
//SYSTSIN  DD   *                                            
 PDS86  'your.jcl.library'                                
 REP :  '(ACCT123)'  '(ACCTABC)'   WRITE                     
 REP :  '(ACCT456)'  '(ACCTDEF)'   WRITE                     
 REP :  '(ACCT789)'  '(ACCTGHI)'   WRITE
/*

If you don't want to update the ISPF stats, use "WRITE NOSTATS"                 

Mark               
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to