Reporting › Running Reports › Coding Examples

Coding Examples

Example 1

To select all Change Log Entries between December 30, 1986 and January 5, 1987 from the CCDB for the primary dictionary, specify the following input to CA Culprit Step 1:

//SYSIN      DD  *
=COPY NDVRPT00
=COPY NDVRNAME
=COPY NDVRRCLG
=COPY NDVRPT01
 SEL WHEN LOG-DATE GE 19861230 AND
*      LOG-DATE LE 19870115

Example 2

To request a report showing the Change Log Entries created by 'JONES' since November 15, 1986 in a secondary dictionary named NTSTDICT, specify the following input:

In Step 1:

//SYSIN      DD  *
=COPY NDVRPT00
=COPY NDVRNAME
=COPY NDVRRCLG
=COPY NDVRPT02
 SEL WHEN USER EQ 'JONES' AND
*      LOG -DATE GE 19861115

In Step 2:

//SYS010    DD  *
      DBNAME = NTSTDICT

Example 3

To detect archive Change Log Entries older than November 1, 1986 from a dictionary named NTSTDICT, specify:

In Step 1:

//SYSIN      DD  *
=COPY NDVRPT00
=COPY NDVRNAME
=COPY NDVRRCLG
=COPY NDVRPT90
 SEL WHEN LOG-DATE LT 19861101

In Step 2:

//SYS010    DD  *
      DBNAME IS NTSTDICT
//SYS020 DD   DSN=OLD.CLE.ARCHIVE,DISP=(OLD,KEEP)

Example 4

To report against an archived change log for any dictionary:

In Step 1:

//SYSIN      DD  *
=COPY NDVRPT00
=COPY NDVRNAME
=COPY NDVRRCLG
=COPY NDVRPT04

In Step 2:

//SYS010    DD  *
      INPUT IS ARCHIVE
//SYS011    DD   DSN=OLD.CLE.ARCHIVE,DISP=OLD