When executed the PGM=ARCINDEX, it outputs the ARCLEVEL, Update Date, Password, Programmer Name, and Summary of each Member, but no information such as the Number of records and/or language.
Is there a way to output the information like a -OPT INDEX(M) ?
Release : ALL
It is not possible to output that information in 1step. The following is the sample jcl.
STEP1:Copy master file
STEP2:Create SYSIN cards to back the ARCLEVEL
STEP3:In the copied master file, back MEMBER's ARCLEVEL in the copied master file.
STEP4:Output index
Sample:
//S01 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//STEPLIB DD DSN=Prefix.LIBR.CALJLINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//INDEX DD SYSOUT=*
//MASTER DD DSN=Prefix.LIBR.MASTER.ORG,DISP=SHR
//BACKUP DD DSN=Prefix.LIBR.MASTER.NEW,DISP=(,CATLG),
// SPACE=(CYL,(5)),UNIT=SYSDA,VOL=SER=WORK01,
// DCB=(BLKSIZE=7548,DSORG=DA)
//OSJOB DD DUMMY
//SYSIN DD *
-OPT BKUPDISK,INDEX
-END
/*
//*
//S02 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//STEPLIB DD DSN=Prefix.LIBR.CALJLINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//MASTER DD DSN=Prefix.LIBR.MASTER.NEW,DISP=SHR
//OSJOB DD DSN=&&OSJOB1,DISP=(NEW,PASS),
// UNIT=SYSDA,SPACE=(TRK,(5,5),RLSE)
//SYSIN DD *
-OPT GPO
-SEL ARCMOD=Y,ARC=-1,SEQ=/81,6,10,10/
-END
/*
//*
//S03 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//STEPLIB DD DSN=Prefix.LIBR.CALJLINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//MASTER DD DSN=Prefix.LIBR.MASTER.NEW,DISP=SHR
//OSJOB DD DUMMY
//SYSIN DD DSN=&&OSJOB1,DISP=(OLD,DELETE)
//*
//S04 EXEC PGM=AFOLIBR,PARM='NRJS,NJTA'
//STEPLIB DD DSN=Prefix.LIBR.CALJLINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//MASTER DD DSN=Prefix.LIBR.MASTER.NEW,DISP=SHR
//INDEX DD SYSOUT=*
//OSJOB DD DUMMY
//SYSIN DD *
-OPT INDEX(M)
-END
/*
//