Download FDREPORT User Manual - Innovation Data Processing

GENERALIZED REPORT WRITER (FDREPORT)
FDREPORT SMS EXAMPLES
54.43
REPORT BY
STORAGE GROUP
EXAMPLE
Report on all data sets in two specific SMS storage groups. For PDS (PO) and PDSE
(POE) data sets, member counts are displayed.
//REPORT
//SYSPRINT
//ABRMAP
//SYSUDUMP
//SYSIN
TITLE
XSELECT
SORT
REPORT
PRINT
/*
EXEC PGM=FDREPORT,REGION=0M
DD SYSOUT=*
DD SYSOUT=*
DD SYSOUT=*
DD *
LINE='SMS STORAGE GROUPS PROD AND TEST'
STORGRP=(PROD,TEST)
FIELD=(STORGRP,DSN)
FIELD=(SPLDSN,STORGRP,VOL,DSORG,LRDATE,SIZE,MEMBERS)
SORTALLOC=YES
The generated report looks like:
SMS STORAGE GROUPS PROD AND TEST
DATA SET NAME
---------------PAYROLL.MASTER
PROD.CARD.CNTL
PREPARE FOR
SMS CONVERSION
EXAMPLE
54
VOLSER
-----PROD02
PROD12
D/S
ORG
--PS
POE
LRDATE
-------2002.305
2002.301
ALLOC
----750
30
MEMBER
-----0
27
Report on data sets that are ineligible for SMS conversion, so that they can be manually
handled. Ineligible data sets are ISAM, non-ICF VSAM, unmovable, and uncataloged data
sets. CATALOG=NO selects uncataloged data sets, while CATALOG=ERR selects those
cataloged to another volume. In the report, the catalog status is printed, as well as the
volume where the data set is cataloged, if any.
//REPORT
//SYSPRINT
//ABRMAP
//SYSUDUMP
//SYSIN
TITLE
XSELECT
XSELECT
XSELECT
REPORT
PRINT
/*
CHAPTER
STORGRP
-------PROD
PROD
EXEC PGM=FDREPORT,REGION=0M
DD SYSOUT=*
DD SYSOUT=*
DD SYSOUT=*
DD *
LINE='DATA SETS INELIGIBLE FOR SMS’
DSORG=(U,IS,AM),DSORG.NE.EF,VOLG=TSO
CATALOG=NO,VOLG=TSO
CATALOG=ERR,VOLG=TSO
FIELD=(DEFAULTS,CATALOG,CATVOL)
– PAGE 54-122 –