Culprit report to show VRDMU110 screen PRINT, ARCHIVE, ONLINE VIEWING flag values

Products

• Dispatch Output Mgmt

Issue/Introduction

Is there a Dispatch Culprit report which will show the values defined for the following fields, on each reports VRDMU110 report base definition screen?

Print
PC Download
Archive
Passthru
View Online

 

Environment

z/OS, Dispatch, Culprit, custom, control, statements, show, display, produce, report, flag, print, archive, online viewing, olv

Resolution

Custom Culprit Report Instructions

1. Create a New Member - Code the Culprit statements below into a new member (CULPFLAG) in your Dispatch CADSOPTN library.

2. Formatting Rule -  Ensure all Culprit control statements start in column 2.

3. Update JCL -  Modify the MEMBER= symbolic in your DSEXCULP submit JCL to point to the new member name.

4. Submit Job -  Run the JCL to generate the report listing the VRDMU110 screen flag settings.

 

your.dispatch.CADSOPTN(CULPFLAG)    
******************************* Top of Data
 INPUT 6000 DB(D) SS=SSRD01,CAISCHEM,1     
 PATH01 RD-BASE                            
 01OUT D                                   
 01SORT RD-BASE-REPORT-NAME                
 013 CA-DISPATCH VRDMU110 FLAG REPORT      
 01410001 'REPORT NAME'                    
 01410015 'JOB NAME'                       
 01410025 'PRINT'                          
 01410035 'ONLINE'                         
 01410045 'ARCHIVE'                        
 01410055 'PC FLAG'                        
 01410065 'PASSTHRU'                       
 01510001 RD-BASE-REPORT-NAME              
 01510015 RD-BASE-JOBNAME                  
 01510027 RD-BASE-DIST-PRINT-FLAG          
 01510037 RD-BASE-VIEW-ONLINE-FLAG         
 01510047 RD-BASE-ARCH-TAPE-FLAG           
 01510057 RD-BASE-PC-FLAG                  
 01510067 RD-BASE-GRAPHICS-FLAG            
**************************** Bottom of Data

 

SAMPLE OUTPUT REPORT:

REPORT NO. 01                                     CA-DISPATCH VRDMU110 FLAG REPORT
 REPORT NAME   JOB NAME  PRINT     ONLINE    ARCHIVE   PC FLAG   PASSTHRU       
 RPT64         L2RPTJCL    Y         N         N         N         N            
 RTS00020      CADSDISP    N         Y         Y         N         N            
 R4412153                  Y         Y         N         N         N            
 SAMPREP1      SAMPJOB1    Y         N         N         N         N            
 SARXDOM1                  Y         Y         Y         Y         N            
 SARXDOM2                  Y         Y         Y         Y         N            
 SARXDOM3                  Y         Y         Y         Y         N            
 SARXDOM6                  Y         Y         Y         Y         N            
 SARXDOM7                  Y         Y         Y         Y         N            
 SARXDOM8                  Y         Y         Y         Y         N            
 SARXDOM9                  Y         Y         Y         Y         N            
 SCOTT                     Y         Y         N         N         N            
 SCOTT         9ON4C01A    Y         Y         Y         N         N            
 SCOTTA        9ON4C01C    Y         Y         N         Y         N            
 SCOTTA        9ON4C01F    Y         Y         Y         Y         N            
 SCOTTAFP                  Y         Y         Y         N         N            
 SCOTTB        9ON4C01F    Y         Y         Y         Y         N            
 SCOTTB        9ON4C01C    Y         Y         Y         Y         N            
 SCOTTC        9ON4C01F    Y         Y         Y         Y         N            
 SCOTTC        9ON4C01C    Y         Y         Y         Y         N            
 SCOTTL        9ON4C01A    Y         Y         Y         Y         N            
 SEPPAGE       9ON4C01A    Y         N         N         N         N            
 SGL           9ON4C01A    Y         Y         N         N         N            
 SGLBLANK      SGLJOBNM    Y         Y         N         N         N            
 SHANTANU      SC895573    Y         Y         N         N         N            
 SKIP          8ON5C01A    Y         Y         N         N         N            
 SLONDON       8ON5C01A    Y         Y         N         Y         N            
 SPURS         CO          Y         Y         N         N         N            
 SPURS         ZZZMI04Z    Y         Y         N         N         N            
 STARRPT                   Y         N         N         N         N            
 STAR0441                  Y         Y         Y         Y         N

Additional Information

- Dispatch documentation link

- Sample "canned" Culprit reports are documented in the Dispatch Reference Guide
  - Appendix C: Printing Database Information 
    - Using CA Culprit...

Programming NOTE:

• Using the Culprit control statements shown in this article, the ARCHIVE column will show a 'Y' when the default of "Archive to TAPE" is turned on.
• If the value in the ARCHIVE column shows an 'N' this does not necessarily mean that the report is not being archived, just that the default "Archive to tape" is not turned on.

To determine if the report is being archived to DASD, SMS, or OPTICAL, the Culprit control statements would need to be adjusted to list/show the following Dispatch database fields: 

RD-BASE-ARCH-DASD-FLAG   
RD-BASE-ARCH-SMS-FLAG    
RD-BASE-ARCH-OPTICAL-FLAG