How to create a list of reports collected in CA Deliver?

Document ID : KB000045633
Last Modified Date : 14/02/2018
Show Technical Document Details

Question: 

How to create a list of reports collected in CA Deliver?

Answer: 

The following statements, which are located in RMOGRW01 in CAI.CVDEOPT, produce a report that contains a job name, step name, procedure step name, ddname, report identifier, report type, number of text entries for report, number of dynamic variables and active status. The report is produced with headings and a title. Each job name is printed on a new page.

 

//EXAMPLE1 JOB ACCOUNT,PROGRAMMER

//*

//* RMOGRW - GENERAL PURPOSE REPORT UTILITY

 //* //RMOGRW EXEC PGM=RMOGRW

//STEPLIB DD DSN=CAI.CVDELOAD,DISP=SHR <=== MODIFY

//SYSPRINT DD SYSOUT=*

//SYSOUT DD SYSOUT=*

 //PRTFILE DD SYSOUT=*

//*

//* SAMPLE CONTROL STATEMENTS TO GENERATE A REPORT CONTAINING

//* JOB NAME, STEP NAME, PROCEDURE STEP NAME, DD NAME, REPORT

 //* IDENTIFIER, REPORT TYPE AND ACTIVE STATUS. EACH JOB IS ON

//* A NEW PAGE AND TITLE AND HEADINGS ARE PRODUCED.

//*

//SYSIN DD *

/CONTROL DATABASE=DELIVER.SYSTEM1

/PRINT PAGE

 /TITLE 'REPORTS FOR JOB '||JOB

/DEFINE I BIN /DO I = 1 TO NRID BY 1

/ PRINT STEP 'STEP,NAME' SKIP(1)

 / PRINT PROCSTEP 'PROCEDURE, NAME'

 / PRINT DD ',DDNAME'

/ PRINT RID 'REPORT,IDENTIFIER'

 / PRINT TRANS(TYPE,'M','MONITR', 'S','STACK ', 'I','INTER ', 'C','CNTL ', 'D','DYNAM ', * ,' ') 'REPORT, TYPE'

/ PRINT NTEXT 'TXT,NO#'

 / PRINT NVAR 'DYN,VAR#'

/ PRINT TRANS(ACTIVE,'Y','YES', * ,' ') 'ACTIVE'

/ NEXT RID

/END

/*

 //

 

 

Additional Information:

In the CA Deliver System Reference Guide has further details.

 

As always, please contact CA Technologies support for CA View/Deliver if you have further questions.