Cross Reference Processor › System Data Cross-Reference Report

System Data Cross-Reference Report

Description

The System Data Cross-Reference Report provides extensive information about the use of data items throughout a system of COBOL programs. The report begins with a header page that provides a formatted listing of the file of control statements and a count of records found for each selection statement specified. Each subsequent page identifies the subset of records being cross referenced (using the title form the title statement) and provides detail information about data elements within the records.

Sample report

In the report sample below, the header page appears first, followed by the first page in the main body of the report.

      SYSTEM DATA CROSS REFERENCE   *LIST OF REQUESTED RECORDS*                  DICTIONARY LOADER       dd mmm yy 1425   PAGE   1

      REPORT TITLE                    PROGRAM-ID     01-LEVEL RECORD                   QUALIFIER                     COUNT

      CUSTOMER RECORD                 *ANY PROGRAM*  CUSTOMER                                                           2
                                      *ANY PROGRAM*  CUST                                                               1

      ORDOR RECORD                    *ANY PROGRAM*  ORDOR                                                              1
      SYSTEM DATA CROSS REFERENCE   FOR REPORT:  CUSTOMER RECORD                 DICTIONARY LOADER       28 JAN 99 1425   PAGE   2

      FROM  TO  LV  DATA NAME           SRC LN PROG ID   REC NAME           SIZE  USAGE    OCCURS            QUALIFIER
                                                                                         REF LN REF STATEMENT
      1     10  03  CUST-NUMBER         047000 PRANDEM1  CUSTOMER           10    DISP                       CUSTOMER-FILE
                                                                                         131000 MOVE SPACES TO CUST-NUMBER
                                                                                         138000 IF ORD-CUST-NUMBER = CUST-NUMBER
                                                                                         144000 MOVE CUST-NUMBER TO RPT-CUST-NO

                03  CUST-NUM            044000 PRANDEM2  CUSTOMER           10    DISP                       CUSTOMER-FILE
                                                                                         190000 MOVE CUST-NUM TO RPT-CUST-NO


      11     30 03  CUST-NAME           048000 PRANDEM1  CUSTOMER           20    DISP                       CUSTOMER-FILE
                                                                                         145000 MOVE CUST-NAME TO RPT-NAME


                03  CUST-NAME           045000 PRANDEM2  CUSTOMER           20    DISP                       CUSTOMER-FILE
                                                                                         091000 MOVE CUST-NAME TO RPT-CUST-NAME

                03  CUST-NAME           041000 PRANDEM3  CUST               20    DISP                       CUSTFILE
                                                                                         064000 MOVE CUST-NAME TO MAIL-LINE-1

Field descriptions

REPORT TITLE

The descriptive title used to identify the group of records and taken from the title statement.

PROGRAM-ID

The PROGRAM-ID from the selection statement or, if PROGRAM-ID was blank, the entry *ANY PROGRAM*.

01-LEVEL RECORD

The 01-level record name from the selection statement, or if record name was blank, the entry *ANY RECORD*.

QUALIFIER

The FD file name, the keywords WORKING STORAGE or LINKAGE, or blank as specified on the selection statement.

COUNT

A count of the 01-level records selected as a result of the specifications on the selection statement.

FOR REPORT

The descriptive title used to identify the group of records and taken from the title statement.

FROM

The starting position of the data element.

TO

The ending position of the data element.

LV

The level number from the data item description entry.

DATA NAME

The data name from the data item description entry.

SRC LN

The line number of the data item description entry in the source program.

PROG ID

The program ID being used to identify the source program. The program ID may be the internal PROGRAM-ID from the COBOL source program or a library member name, depending on the user-defined options in effect from the run.

REC NAME

The 01-level record name from the record description entry where the data element was found.

SIZE

The size of the data item field.

USAGE

The form in which the data item is to be stored as the result of the source program's specifications:

• GROUP—The data item contains subordinate items.
• DISP—The data item is stored in character form.
• DISP-NM—The data item is stored one digit per character position. The PIC contains only S, 9, and V.
• COMP—The data item is stored as computational (1,2,3, or 4). The PIC entry contains only S, 9 and V.
• NM-EDIT—The data item is a numeric item stored in character format. The PIC contains some or all of the editing characters +, -, z, $, comma, B, CR, DB, ., or 0.

The following report writing specifications can also appear in this column:

• RH—Report heading
• RF—Report footing
• PH—Page heading
• PF—Page footing
• CH—Control heading
• CF—Control footing
• DE—Detail

OCCURS

The number of times the data item is repeated as the result of an OCCURS clause.

QUALIFIER

The FD file name or the keywords WORKING STORAGE or LINKAGE to indicate where the data element was found.

REF LN

The line number in the source program from the COBOL statement that follows.

REF STATEMENT

A COBOL statement that refers in any way to the data element.