On Tue, 26 Mar 2013 15:34:53 -0400, Bill Ashton wrote:

>Chris, I like this, too...it's very simple and effective! Billy
>
>On Tue, Mar 26, 2013 at 2:50 PM, Webster, Chris wrote:
>
>> Another option:
>>
>> //         EXEC PGM=BPXBATCH,
>> //         PARM='SH echo *\\n  name &SYSUID\(R\)'
>>
Simple and effective, but one job step simpler in this case is:

//*
//  SET EXEPGM=MYPGM
//*    ...
//RELINK2  EXEC  PGM=IEWL,PARM='MAP,LIST=ALL'
//SYSLIN    DD  *
  INCLUDE SYSLIB(IEFBR14)
//SYSLMOD   DD  DISP=OLD,SPACE=(1000,(50,,1)),UNIT=VIO,
//  DSN=&&SYSLMOD(&EXEPGM)

Resulting in:

    SAVE OPERATION SUMMARY:                        
                                               
   MEMBER NAME         MYPGM                   
   LOAD LIBRARY        SYS13085.T140534.RA000.T
   PROGRAM TYPE        LOAD MODULE             
   VOLUME SERIAL                               
   MAX BLOCK           32760                   
   DISPOSITION         REPLACED                
   TIME OF SAVE        14.05.35  MAR 26, 2013  

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to