Trying to copy in Elips a small master file and would only like the -1 & -2 versions to be copied over to a pds. Would like to do all members and not have to specify each name.
There is no way to do this in the ELIPS interface. It must be done in batch.
Use the following batch JCL to accomplish this -
//STEP1 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA' //SYSPRINT DD SYSOUT=* //MASTER DD DSN=user.master.file,DISP=SHR //OSJOB DD DSN=&&GPO,DISP=(,PASS),UNIT=SYSDA, // SPACE=(CYL,(1,1)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //SYSIN DD * -OPT GPO,SKIPERR <== skiperr in case arc level does not exist -SEL NAME=,EXEC,ARC=-n <== n will change for each different arclvl -END //STEP2 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA' //SYSPRINT DD SYSOUT=* //MASTER DD DSN=user.master.file,DISP=SHR //OSJOB DD DSN=user.work.pds,DISP=SHR //SYSIN DD DSN=&&GPO,DISP=(OLD,PASS)
The job must be run twice. The first job will copy the -1 version of all the members on the Master file to a PDS or PDSE. The JCL should be changed to copy all the -2 version to a different PDS or PDSE then what was specified in the first job.