Trying to run a package report for packages that no longer reside within Endevor so I am using option 7 – Archived Package. Tried report 56, 57, and 58 pointing to my archived package datasets via DD ARCINPT. But all my attempts return nothing. Also tried to first run an EXTRACT job but it to returned nothing. Tried to first run an EXTRACT job but it to returned nothing.
EXTRACT JOB:
//REPORTS EXEC PGM=NDVRC1,PARM='C1BR1000',REGION=0M
//STEPLIB DD DISP=SHR,DSN=iprfx.iqual.CSIQAUTU
// DD DISP=SHR,DSN=iprfx.iqual.CSIQAUTH
//CONLIB DD DISP=SHR,DSN=iprfx.iqual.CSIQLOAD
//BSTRPTS DD SYSOUT=* REPORT OUTPUT
//BSTINP DD * SELECTION CRITERIA
EXTRACT 56 57 58 .
WINDOW AFTER 01JAN14 BEFORE 01DEC19 .
CREATE AFTER 01JAN14 BEFORE 01DEC19 .
EXECUTE AFTER 01JAN14 BEFORE 01DEC19 .
CAST AFTER 01JAN14 BEFORE 01DEC19 .
BACKEDOUT AFTER 01JAN14 BEFORE 01DEC19 .
DAYS 400.
/BSTPDS DD DUMMY FOOTPRINT DATA SET
//SMFDATA DD DUMMY SMF DATA SET
//UNLINPT DD DUMMY UNLOAD DATA SET
//***************************************
/** MISCELLANEOUS FILES **
//***************************************
//ARCINPT DD DISP=SHR,DSN=iprfx.iqual.PACKAGE.UNLOAD <- GDG base containing over 100 gens
//EXTRACT DD DSN=iprfx.iqual.ENDEVOR.EXTRACT3,DISP=(NEW,CATLG),
// UNIT=SYSDA,SPACE=(CYL,(10,2)),
// DCB=(RECFM=VB,LRECL=1200,BLKSIZE=0)
//BSTPCH DD DSN=&TEMP,DISP=(NEW,DELETE,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,2)),
// DCB=(RECFM=FB,LRECL=838,BLKSIZE=8380)
//BSTLST DD SYSOUT=*
//SORTIN DD UNIT=SYSDA,SPACE=(CYL,(150,15))
//SORTOUT DD UNIT=SYSDA,SPACE=(CYL,(150,15))
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(5,5))
//C1MSGS1 DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYMDUMP DD DUMMY "
The input file: iprfx.iqual.PACKAGE.UNLOAD is not a package archive file, it is the package unload file, please use CONRPT55 (Unload Package Summary Report).
Report 56, 57, and 58 only work with a package archive file.
For more information on Package Reports: