Here's what I use.  In the below, "sysres" is the volser of the sysres 
volume.

//**************************************************************
//*  DOC:  THIS STEP WILL WRITE CURRENT IPL TEXT TO SRSAAA      
//**************************************************************
//STEP01A EXEC PGM=ICKDSF                                       
//SYSPRINT DD SYSOUT=*                                          
//sysres   DD DISP=OLD,UNIT=SYSALLDA,                           
//            VOL=(,RETAIN,SER=sysres)                          
//SAMPLIB DD DSN=SYS1.SAMPLIB(IPLRECS),DISP=SHR,UNIT=SYSALLDA,  
//           VOL=SER=sysres                                     
//         DD DSN=SYS1.SAMPLIB(IEAIPL00),DISP=SHR,UNIT=SYSALLDA,
//           VOL=SER=sysres                                     
//SYSIN    DD *                                                 
 RFMT DNAME(sysres) VFY(sysres) IPLDD(SAMPLIB,OBJ) BOOTSTRAP    
/*                                                              

I run this step every time I build a new sysres volume.  That way, IPL text 
is always current and I don't have to remember to do it.

Brian

On Mon, 15 May 2006 13:51:37 -0700, Howard Rifkind <[EMAIL PROTECTED]> 
wrote:

>I'm applying service and PTF UA04093 looks like it requires the IPLTEXT to 
be replace on the sysres volume.
>
>  1. Can I do this without destroying the sysres?
>  2.  If so I would like to do it with ICKDSF and I have looked at the 
manual but can't find an example or how it is done...how to construct the 
job stream.
>
>  Any help will be appreciated.
>
>  Thanks.
>

----------------------------------------------------------------------
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