"I want to copy some members from an existing DDIO to a new DDIO of mine. "
Solution
If you have got Abend-aid, you could do it easily. The screens are quite self-explanatory, you can select the members you need to copy. It prepares a job for you. The step generated looks like this:
//CXUTIL EXEC PGM=CWDDSUTL
//STEPLIB DD DISP=SHR,DSN=SYS3.COMPWARE.MLCX780.SLCXLOAD
//* Could be some other library at your site...
//ABNLREPT DD SYSOUT=*
//CWUT0001 DD DISP=SHR,DSN=userid.TSTS.DDIO
//CWUT0002 DD DISP=SHR,DSN=userid.TSTS.DDIO.TEMP
//ABNLPARM DD *
*
* COPY FROM DDIO FILE: userid.TSTS.DDIO
* TO DDIO FILE: userid.TSTS.DDIO.TEMP
*
COPY FROMDD=CWUT0001,
PROGRAM=B*,
EXEC=SUMMARY,
TODD=CWUT0002
/*
This just copies all programs with prefix B. You can just repeat the control card if you need to copy more programs, or do the selection in the screens provided for the same.
Solution
If you have got Abend-aid, you could do it easily. The screens are quite self-explanatory, you can select the members you need to copy. It prepares a job for you. The step generated looks like this:
//CXUTIL EXEC PGM=CWDDSUTL
//STEPLIB DD DISP=SHR,DSN=SYS3.COMPWARE.MLCX780.SLCXLOAD
//* Could be some other library at your site...
//ABNLREPT DD SYSOUT=*
//CWUT0001 DD DISP=SHR,DSN=userid.TSTS.DDIO
//CWUT0002 DD DISP=SHR,DSN=userid.TSTS.DDIO.TEMP
//ABNLPARM DD *
*
* COPY FROM DDIO FILE: userid.TSTS.DDIO
* TO DDIO FILE: userid.TSTS.DDIO.TEMP
*
COPY FROMDD=CWUT0001,
PROGRAM=B*,
EXEC=SUMMARY,
TODD=CWUT0002
/*
This just copies all programs with prefix B. You can just repeat the control card if you need to copy more programs, or do the selection in the screens provided for the same.
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.