VSAMLIST scans one or more specified VSAM Catalogs and produces a summary report of the catalog contents, a detail report of the VSAM volume contents, and a VSAM track allocation map. It can also be used to maintain a history file for all VSAM entries reported by the program. The most useful feature that it provides is the means to review allocation and utilization information for VSAM objects, similar to a VTOC listing for Non-VSAM datasets.
It is located in File #38 of the CBT Overflow tape and originally came from Memorex. The version I have used for installation came from Version #466 of the CBT collection.
Prerequisite: The MVT Sort/Merge must be installed on your system for this program to execute.
Rather than a single load module, there are actually eight individual modules which are loaded as required by the control module. The source code will assemble as is under MVS 3.8j, but I have updated the DASD Type table to add entries for 3375, 3380, and 3390 DASD devices (search for my initials, JLM, to identify changes). A single jobstream will assemble and link all eight load modules.
Download the archive vsamlist.tar.gz [MD5: aa20ddc7d99d6ee8106d7ce918d592d7], which contains both the jobstream to assemble the eight load modules and a jobstream which may be used to execute the program. The jobstreams were prepared on a Windows system, so each line is terminated by x'0d0a', which may require translation for use on a Linux system.
The target library for the load modules is SYS2.LINKLIB, so if you do not have SYS2.LINKLIB defined on your system you will need to edit the installation jobstream to point to a load library valid for your system. Submit the installation jobstream - vsamlst$ - to assemble and link edit the eight programs.
The JCL to execute VSAMLIST is:
//VSAMLIST JOB (SYS),'VSAMLIST',CLASS=A,MSGCLASS=A //STEP1 EXEC PGM=VSAMLIST,PARM=ALL //STEPLIB DD DSN=SYS2.LINKLIB,DISP=SHR PROGRAM LOAD MODULES //* & MVT SORT/MERGE //*STEPCAT DD DSN=VSAMCAT1,DISP=SHR OPTIONAL STEP CATALOG //* . OPTIONAL STEP CATALOG //* . OPTIONAL STEP CATALOG //* . OPTIONAL STEP CATALOG //* DD DSN=VSAMCATN,DISP=SHR OPTIONAL STEP CATALOG //SYSABEND DD SYSOUT=* //MSGFILE DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330) //RPTFIL1 DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330) //RPTFIL2 DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330) //SYSOUT DD SYSOUT=* //SORTIN DD DSN=&&DETAIL,DISP=(NEW,DELETE),UNIT=2314, // SPACE=(CYL,(5,5)) //SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR MVT SORT/MERGE LIBRARY //SORTWK01 DD UNIT=2314,SPACE=(CYL,(3)) //SORTWK02 DD UNIT=2314,SPACE=(CYL,(3)) //SORTWK03 DD UNIT=2314,SPACE=(CYL,(3)) //* //* FOLLOWING OUTPUT FILE IS OPTIONAL. IF IT POINTS TO A DASD DATA //* SET AND 'PARM=ALL' IS SPECIFIED ON THE 'EXEC' CARD, A HISTORY //* FILE FOR VSAM ENTRIES WILL BE CREATED. PLEASE NOTE THE SPEC'S //* IN THE DCB. RECORDS ARE 158 BYTES LONG. //*VSAMHIST DD DSN=VSAM.HIST.FILE,DISP=(,PASS), //* UNIT=SYSDA,SPACE=(CYL,(2,1)), //* DCB=(RECFM=FB,LRECL=158,BLKSIZE=6162) //* //* FOLLOWING INPUT FILE IS FOR VSAM CATLG LIST UTIL CONTROL STMTS //* '/' INDICATE AN OPTIONAL MASTER PASSWORD FOLLOWS //* ALL KEYWORDS SHOULD BE ON COL. 1 THRU 71 OF THE SAME CARD FOR //* EACH VSAM CATALOG TO BE LISTED //VCLCNTL DD * LISTCAT UCMVS801 //
Remember that the MVT Sort/Merge can only access 2314 or earlier storage devices, so the SORTIN and SORTWK?? datasets must be allocated to UNIT=2314 devices. The SORTIN dataset is written by the program before the MVT Sort/Merge is called to perform the sort.
The output from this job may be viewed at VSAMLIST Reports.
I hope that you have found my instructions useful. If you have questions that I can answer to help expand upon my explanations and examples shown here, please don't hesitate to send them to me:
Return to Site Home Page
This page was last updated on January 17, 2015 .