This is a sample output listing produced by the SCANPDS Utility Program running on a P/390 system.
//IBMUSERJ JOB (ACCT#),SCANPDSJ, // NOTIFY=&SYSUID, // CLASS=A,MSGCLASS=X,COND=(0,NE) //JOBLIB DD DSN=IBMUSER.LOAD2,DISP=SHR //* //* Scan Load Libraries and print link-edit dates //* //LOAD EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSIN DD * SCANPDS GSFSOFT.SCANPDS.*.LOAD LINKDATE /* //* Search Source Libraries for members which contain the 'PACK' string. //* //SOURCE EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //FINDOUT DD SYSOUT=* //SYSTSIN DD * SCANPDS GSFSOFT.SCANPDS.** FIND(PACK) CAPS SUPERC /*
1 J E S 2 J O B L O G -- S Y S T E M P 3 9 0 -- N O D E N 1 0 14.10.49 JOB05358 ---- FRIDAY, 16 JAN 2004 ---- 14.10.49 JOB05358 IRR010I USERID IBMUSER IS ASSIGNED TO THIS JOB. 14.10.50 JOB05358 ICH70001I IBMUSER LAST ACCESS AT 14:10:35 ON FRIDAY, JANUARY 16, 2004 14.10.50 JOB05358 *$HASP373 IBMUSERJ STARTED - INIT 1 - CLASS A - 14.10.50 JOB05358 IEF403I IBMUSERJ - STARTED - TIME=14.10.50 14.10.53 JOB05358 - --TIMINGS (MINS.)-- ----PAGING COUNTS--- 14.10.53 JOB05358 -JOBNAME STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SERV PG PAGE SWAP VIO SWAPS 14.10.53 JOB05358 -IBMUSERJ LOAD 00 134 0 .02 .00 .0 16121 1 0 0 0 0 14.10.56 JOB05358 -IBMUSERJ SOURCE 00 127 0 .02 .00 .0 18385 1 0 0 0 0 14.10.56 JOB05358 IEF404I IBMUSERJ - ENDED - TIME=14.10.56 14.10.56 JOB05358 -IBMUSERJ ENDED. NAME-SCANPDSJ TOTAL TCB CPU TIME= .04 TOTAL ELAPSED TIME= .1 14.10.56 JOB05358 $HASP395 IBMUSERJ ENDED 0------ JES2 JOB STATISTICS ------ - 16 JAN 2004 JOB EXECUTION DATE - 18 CARDS READ - 163 SYSOUT PRINT RECORDS - 0 SYSOUT PUNCH RECORDS - 10 SYSOUT SPOOL KBYTES - 0.10 MINUTES EXECUTION TIME 1 1 //IBMUSERJ JOB (ACCT#),SCANPDSJ, JOB05358 // NOTIFY=&SYSUID, // CLASS=A,MSGCLASS=X,COND=(0,NE) IEFC653I SUBSTITUTION JCL - (ACCT#),SCANPDSJ,NOTIFY=IBMUSER,CLASS=A,MSGCLASS=X,COND=(0,NE) 2 //JOBLIB DD DSN=IBMUSER.LOAD2,DISP=SHR //* //* Scan Load Libraries and print link-edit dates //* 3 //LOAD EXEC PGM=IKJEFT01 4 //SYSTSPRT DD SYSOUT=* 5 //SYSPRINT DD SYSOUT=* 6 //SYSTSIN DD * //* //* Search Source Libraries for members which contain the 'PACK' string. //* 7 //SOURCE EXEC PGM=IKJEFT01 8 //SYSTSPRT DD SYSOUT=* 9 //SYSPRINT DD SYSOUT=* 10 //FINDOUT DD SYSOUT=* 11 //SYSTSIN DD * 1ICH70001I IBMUSER LAST ACCESS AT 14:10:35 ON FRIDAY, JANUARY 16, 2004 IEF236I ALLOC. FOR IBMUSERJ LOAD IGD103I SMS ALLOCATED TO DDNAME JOBLIB IEF237I JES2 ALLOCATED TO SYSTSPRT IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I JES2 ALLOCATED TO SYSTSIN IEF237I JES2 ALLOCATED TO SYSDEBUG IEF237I JES2 ALLOCATED TO SYSSNAP IGD103I SMS ALLOCATED TO DDNAME SYS00001 IGD103I SMS ALLOCATED TO DDNAME SYS00002 IGD104I GSFSOFT.SCANPDS.PDSE.LOAD RETAINED, DDNAME=SYS00002 IGD104I GSFSOFT.SCANPDS.PDS.LOAD RETAINED, DDNAME=SYS00001 IEF142I IBMUSERJ LOAD - STEP WAS EXECUTED - COND CODE 0000 IGD106I IBMUSER.LOAD2 PASSED, DDNAME=JOBLIB IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000103.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000104.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000101.? SYSIN IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000108.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000109.? SYSOUT IEF373I STEP/LOAD /START 2004016.1410 IEF374I STEP/LOAD /STOP 2004016.1410 CPU 0MIN 01.31SEC SRB 0MIN 00.03SEC VIRT 100K SYS 364K EXT 1316K SYS 10776K IEF236I ALLOC. FOR IBMUSERJ SOURCE IGD103I SMS ALLOCATED TO DDNAME JOBLIB IEF237I JES2 ALLOCATED TO SYSTSPRT IEF237I JES2 ALLOCATED TO SYSPRINT IEF237I JES2 ALLOCATED TO FINDOUT IEF237I JES2 ALLOCATED TO SYSTSIN IEF237I JES2 ALLOCATED TO SYSDEBUG IEF237I JES2 ALLOCATED TO SYSSNAP IGD103I SMS ALLOCATED TO DDNAME SYS00003 IGD103I SMS ALLOCATED TO DDNAME SYS00004 IGD104I GSFSOFT.SCANPDS.PDS RETAINED, DDNAME=SYS00003 IGD104I GSFSOFT.SCANPDS.PDSE RETAINED, DDNAME=SYS00004 IEF142I IBMUSERJ SOURCE - STEP WAS EXECUTED - COND CODE 0000 IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000105.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000106.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000107.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000102.? SYSIN IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000110.? SYSOUT IEF285I IBMUSER.IBMUSERJ.JOB05358.D0000111.? SYSOUT IEF373I STEP/SOURCE /START 2004016.1410 IEF374I STEP/SOURCE /STOP 2004016.1410 CPU 0MIN 01.38SEC SRB 0MIN 00.03SEC VIRT 96K SYS 372K EXT 1332K SYS 10748K IGD104I IBMUSER.LOAD2 RETAINED, DDNAME=JOBLIB IEF375I JOB/IBMUSERJ/START 2004016.1410 IEF376I JOB/IBMUSERJ/STOP 2004016.1410 CPU 0MIN 02.69SEC SRB 0MIN 00.06SEC SYSTSPRT Data Set - First Step (LOAD)1READY SCANPDS GSFSOFT.SCANPDS.*.LOAD LINKDATE MSG001I SCANPDS R400B - Copyright (c) 1988-2004 Gilbert Saint-Flour. All Rights Reserved. MSG002I TIME=14:10:51:66 MAXTASKS=20,REGION=(6208K,32768K) MSG012I Now processing data set names matching GSFSOFT.SCANPDS.*.LOAD in Catalog(USERCAT.SYSCAT) MSG012I Now processing data set names matching GSFSOFT.SCANPDS.*.LOAD in Catalog(CATALOG.OS390.MASTER) MSG009I TIME=14:10:53:05 REGION=(6208K,32768K),USED=(100K,1316K) READY END SYSPRINT Data Set - First Step (LOAD)1GSF Utilities - SCANPDS R400B Friday 16 Jan 2004 (2004.016) 14.10 PAGE 00001 0 SCANPDS R400B - Copyright (c) 1988-2004 Gilbert Saint-Flour. All Rights Reserved. Product Licensed to (Evaluation Version) Seq Data Set Name Members Volume Device Created Referred ORG DCB Attributes Tracks Used 1 GSFSOFT.SCANPDS.PDS.LOAD 5 PRIM15 3390-3 20040105 20040115 PO U/0/6144 3 100% 2 GSFSOFT.SCANPDS.PDSE.LOAD 2 PRIM11 3390-3 20011030 20040114 PO-E U/0/32760 2 60% Libraries Selected: 2 Members Cross-referenced: 7 - Data Set Name Main-Mbr SSI Link-Edit Date/Time Size Attributes 0 GSFSOFT.SCANPDS.PDS.LOAD(ASMTOZAP) 1983-11-08 X'0003B8' A24 R24 TEST 0 GSFSOFT.SCANPDS.PDS.LOAD(CPARM) 91113F00 1991-04-23 X'0002B8' A24 R24 0 GSFSOFT.SCANPDS.PDSE.LOAD(GLASSPC) 2000-09-22 X'001368' A31 RANY RU 0 GSFSOFT.SCANPDS.PDS.LOAD(IEAAAB00) X'0000A8' A24 R24 0 GSFSOFT.SCANPDS.PDS.LOAD(IEAVEDAT) 1993-06-16 X'0014C0' A31 R24 SC 0 GSFSOFT.SCANPDS.PDSE.LOAD(RMSPLIT) 2001-10-30 15.08.41 X'000070' A31 R24 0 GSFSOFT.SCANPDS.PDS.LOAD(UWFUPCAS) 1993-02-04 X'000490' A31 RANY RE RU RF SYSTSPRT Data Set - Second Step (SOURCE)1READY SCANPDS GSFSOFT.SCANPDS.** FIND(PACK) CAPS SUPERC MSG001I SCANPDS R400B - Copyright (c) 1988-2004 Gilbert Saint-Flour. All Rights Reserved. MSG002I TIME=14:10:54:60 MAXTASKS=20,REGION=(6208K,32768K) MSG012I Now processing data set names matching GSFSOFT.SCANPDS.** in Catalog(USERCAT.SYSCAT) MSG127I GSFSOFT.SCANPDS.PDS.LOAD Load Library MSG287I GSFSOFT.SCANPDS.PDS(ICHFPBAS) Packed Data Error MSG281I SYNAD exit taken for DSN=GSFSOFT.SCANPDS.PDS(BIGBLOCK),VOL=3390-3=PRIM15,TTR=00000E,DS1LSTAR=000011 MSG282I IBMUSERJ,SOURCE ,0AA5,D,SYS00003,READ ,WRNG.LEN.RECORD,0000000600000D,BPAM MSG281I SYNAD exit taken for DSN=GSFSOFT.SCANPDS.PDS(BADTTR),VOL=3390-3=PRIM15,TTR=010008,DS1LSTAR=000011 MSG282I IBMUSERJ,SOURCE ,0AA5,D,SYS00003,READ ,OUT OF EXTENT ,TTR UNKNOWN ,BPAM MSG127I GSFSOFT.SCANPDS.PDSE.LOAD Load Library MSG012I Now processing data set names matching GSFSOFT.SCANPDS.** in Catalog(CATALOG.OS390.MASTER) MSG287I GSFSOFT.SCANPDS.PDSE(PACKERR) Packed Data Error MSG009I TIME=14:10:56:03 REGION=(6208K,32768K),USED=(96K,1332K) READY END SYSPRINT Data Set - Second Step (SOURCE)1GSF Utilities - SCANPDS R400B Friday 16 Jan 2004 (2004.016) 14.10 PAGE 00001 0 SCANPDS R400B - Copyright (c) 1988-2004 Gilbert Saint-Flour. All Rights Reserved. Product Licensed to (Evaluation Version) Libraries Selected: 2 Libraries Listed: 2 Members Selected: 10 Members Listed: 6 Seq Data Set Name Members Volume Device Created Referred ORG DCB Attributes Tracks Used 1 GSFSOFT.SCANPDS.PDS 5 PRIM15 3390-3 20040105 20040114 PO FB/80/3120 1 100% 2 GSFSOFT.SCANPDS.PDSE 1 PRIM12 3390-3 20020406 20040105 PO-E FB/80/32720 2 34% - Data Set Name VV.MM Created Changed Size Init Mod ID Status 0 GSFSOFT.SCANPDS.PDS(BADTTR) IOerror 0 GSFSOFT.SCANPDS.PDS(BIGBLOCK) 01.00 2004-01-12 2004-01-12 12.23.57 40 40 0 IBMUSER IOerror 0 GSFSOFT.SCANPDS.PDS(ICHFPBAS) PackError 0 GSFSOFT.SCANPDS.PDS(PACKED) 01.00 2004-01-12 2004-01-12 12.35.12 4 4 0 IBMUSER Packed 0 GSFSOFT.SCANPDS.PDSE(PACKERR) 01.00 2000-12-20 2000-12-20 12.36.49 2 2 0 SCANPDS PackError 0 GSFSOFT.SCANPDS.PDS(UNPACKED) 01.00 2004-01-08 2004-01-08 11.15.12 1 1 0 IBMUSER FINDOUT Report - Produced by FIND(PACK) CAPS SUPERC1GSF Utilities - SCANPDS R400B Friday 16 Jan 2004 (2004.016) 14.10 PAGE 00001 1 LINE-# SOURCE SECTION SRCH DSN: GSFSOFT.SCANPDS.PDS UNPACKED --------- STRING(S) FOUND ------------------- 1 *unpacked member PACKED --------- STRING(S) FOUND ------------------- 1 packed member packed member packed member packed member packed member 2 packed member packed member packed member packed member packed member 3 packed member packed member packed member packed member packed member 4 packed member packed member packed member packed member packed member |