We need to determine all of the reports that are being received by a specific recipient.
Is there a custom Culprit report that can be run against CA Dispatch that would show us which reports a specific recipient will receive?
The following CULPRIT statements will create a report for you called "DISTRIBUTION FILE LISTING BY RECIPIENT" that lists database recipients and the reports that they receive.
By following the instructions in the COMMENT section and removing the '$$' from the beginning of the 'SEL' sample select statement for recipient 'SCOTT LONDON', you can limit the output to only a specific and selective recipient. If the 'SEL' statement is commented out, the listing will show you ALL of the recipients defined to the database and the reports that they receive.
Instructions for creating the new Culprit report:
* Copy the statements below into a new CADSOPTN library member and then modify the MEMBER= symbolic in the DSEXCULP JCL to point to this new member name.
** IMPORTANT **
- The Culprit control statements MUST start in column 2 in the new CADSOPTN library member you will be creating!!
- Don't forget to remove the TOP & BOTTOM OF DATA comments before saving the member and executing the report!!
CREATE NEW CULPRIT MEMBER 'Your.Dispatch.CADSOPTN(CLPRECIP)'
********************************* Top of Data *********************
INPUT 6000 DB(D) SS=SSRD01,CAISCHEM,1
PARAM=LIST
PATH01 RD-BASE(IX-RD-REPORT) RD-RCPRPT RD-SYSOUT
$$ ********************* COMMENTS *******************************
$$ THE '$$' SIGNS BELOW ARE USED TO DESIGNATE A COMMENT STATEMENT
$$ TO INVOKE THE 'SEL' STATEMENT BELOW SIMPLY REMOVE THE '$$'
$$ *
$$ --> !! A VALID 'SEL' STATEMENT SHOULD START IN COLUMN 2 !!
$$ *
$$ --> SPECIFY SELECTIVE RECIPIENT NAME BETWEEN ' ' MARKS BELOW
$$ *
SEL RD-RCPRPT WHEN RD-RCPRPT-RECIP-ID EQ 'SCOTT LONDON'
$$ *
$$ **************************************************************
48OUT D
48SORT RD-RCPRPT-RECIP-ID,1 RD-RCPRPT-REPORT-NAME RD-RCPRPT-JOBNAME
483 DISTRIBUTION FILE LISTING BY RECIPIENT
4841* 1 ' '
4843* 1 ' '
4842* 1 'RECIPIENT'
4842* 2 'REPORT'
4842* 3 'JOB'
4842* 4 'REPORT DESCRIPTION'
4842* 5 'DEST'
4842* 6 'CLASS'
4852* 1 RD-RCPRPT-RECIP-ID
4852* 2 RD-RCPRPT-REPORT-NAME
4852* 3 RD-RCPRPT-JOBNAME
4852* 4 RD-BASE-REPORT-DESC
4852* 5 RD-SYSOUT-DEST1
4852* 6 RD-SYSOUT-CLASS-SPECIFIC
******************************** Bottom of Data ********************