Thursday, December 8, 2011

File-Aid : How to replace a string in entire PDS

The below job replaces the "SEARCH STRING" by "RESULT STRING" in all the members of the PDS

//STEP010 EXEC PGM=FILEAID
//*
//SYSLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//DD01 DD DSN=YOUR PDS,
// DISP=SHR
//SYSIN DD *
$$DD01 UPDATE,
EDITALL=(1,0,C'SERACH STRING',C'RESULT STRING'),PDSSTAT=A
/*

PDSSTAT=A parameter instructs File-aid to update the PDS statistics if they exist, or add the statistics if they do not exists.

No comments:

Post a Comment

Note: Only a member of this blog may post a comment.