≫ I want to replace the value in each member with the same contents of INIT.

Paul,

You can use IBM FILEMANAGER to update the contents of members in a PDS. You can 
hard code the contents or dynamically generate the change commands using DFSORT.

//STEP0100 EXEC PGM=FILEMGR
//SYSPRINT DD SYSOUT=*
//DDIN     DD DISP=SHR,DSN=Your.pds.to.be.updated
//SYSIN    DD *
$$FILEM FCH MEMBER=(A,B,C,D..) INPUT=DDIN
C 'ABC' 'DEF'
C ‘LMN’ ‘OPQ’
//*



Thanks,
Kolusu


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to