Copy Library File Gets Bad Archive Level in ELIPS.

Products

• Librarian

Issue/Introduction

Why when using the Librarian online COPY UTILITY to copy an entire Master file with an ARCLVL of -2 to a PDS, the data from ARCLVL -0 is copied. When a copy is done at an individual member the correct results are delivered.

Environment

Release:
Component: C21E

Resolution

The Online Utility Copy ALL was never intended to copy lower level archive levels. This can only be done on an individual member basis. To copy all members with the -2 archive level, use batch to copy from a master file to a PDS.

The sample JCL is listed below:

//STEP1      EXEC PGM=AFOLIBR,PARM='NJTA,NRJS'
//STEPLIB    DD DSN=YOUR.XXXX.XXXX.CAILIB,DISP=SHR
//SYSPRINT   DD SYSOUT=*
//LIST       DD SYSOUT=*
//MASTER     DD DSN=YOUR.MASTER.FILE,DISP=SHR
//OSJOB      DD DSN=YOUR.PDS.DATASET,DISP=(,CATLG,DELETE),
//                   UNIT=3390,SPACE=(CYL,(5,1)),VOL=SER=XXXX,
//                   DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)
//SYSIN      DD *
-OPT GPO
-SEL NAME=,ARC=-2,EXEC(R)
-END
//
//STEP2      EXEC PGM=AFOLIBR,PARM='NJTA,NRJS'
//STEPLIB    DD DSN=YOUR.XXXX.XXXX.CAILIB,DISP=SHR
//MASTER     DD DSN=YOUR.MASTER.FILE,DISP=SHR
//SYSIN      DD DSN=YOUR.WORK.FILE,DISP=SHR
//SYSPRINT   DD SYSOUT=*
//OSJOB      DD DSN=YOUR.PDS.DATASET,DISP=SHR
//