Description:
Reports defined in Dispatch most often have one or more Recipients, each of them being defined to get all or a selection of the pages contained in the report.
The question that sometimes comes up is how can we get a list of the reports that do not have a recipient associated with them ?
Solution:
CADSOPTN members DSCULP01 and DSCULP13 can be used with sample JCL DSEXCULP to get a Report Distribution File Listing and Page Selection By Recipients Listing.
The following sample CULPRIT can be used to get a listing of the reports that do not have a recipient.
----+----1----+----2----+----3----+----4----+----5----+----6----+--
INPUT 6000 DB(D) SS=SSRD01,CAISCHEM,1
PARAM=NOLIST
PATH01 RD-BASE(IX-RD-REPORT) RD-RCPRPT(02)
31OUT D
31SORT RD-BASE-REPORT-NAME RD-BASE-JOBNAME RD-BASE-REPORT-DESC
313 LIST REPORTS WITHOUT RECIPIENTS DEFINED
3141* 1 ' '
3143* 1 ' '
3142* 1 'REPORT'
3142* 2 'JOB'
3142* 3 'REPORT DESCRIPTION'
3152* 1 RD-BASE-REPORT-NAME
3152* 2 RD-BASE-JOBNAME
3152* 3 RD-BASE-REPORT-DESC
317 IF PATH-ID EQ '02' 100
317 DROP
317100 TAKE
Note the particular syntax and usage of the PATH statement:
PATH01 RD-BASE(IX-RD-REPORT) RD-RCPRPT(02)
This is known with CULPRIT as an "Alternate Path".
Refer to CA Culprit for CA IDMS™ Reference Guide. Accessing Database Records, item Specifying Path Identifiers for the detailed description and use of Alternate Path with CA Culprit.
Refer to CA Dispatch Reference Guide Appendix C: Printing Database Information Using CA Culprit or CA Easytrieve for a list of available reports with CA Dispatch.