The following table shows the contents of the symbol cross-reference
record.
Table 1. SYSADATA symbol cross-reference record
Field |
Size |
Description |
Symbol length |
HL2 |
The length of the symbol |
Statement definition |
FL4 |
The statement number where the symbol is defined
or declared For statement XREF only:
statement
count - total number of references to this statement.
|
Number of references1 |
HL2 |
The number of references in this record to the
symbol following |
Cross-reference type |
XL1 |
- X'01'
- Program
- X'02'
- Procedure
- X'03'
- statement
- X'04'
- Symbol or data-name
- X'05'
- Method
- X'06'
- Class
|
Reserved |
CL7 |
Reserved for future use |
Symbol name |
CL(n) |
The symbol. Variable length. |
...Reference flag |
CL1 |
For symbol or data-name references:
- C' '
- Blank means reference only
- C'M'
- Modification reference flag
For Procedure type symbol references:
- C'A'
ALTER (procedure-name)
- C'D'
GO TO (procedure-name) DEPENDING ON
- C'E'
- End of range of (
PERFORM ) through (procedure-name)
- C'G'
GO TO (procedure-name)
- C'P'
PERFORM (procedure-name)
- C'T'
- (
ALTER ) TO PROCEED TO (procedure-name)
- C'U'
- Use for debugging (procedure-name)
|
...Statement number |
XL4 |
The statement number on which the symbol or statement
is referenced |
- The reference flag field and the statement number field occur
as many times as the number of references field dictates. For example,
if there is a value of 10 in the number of references field, there
will be 10 occurrences of the reference flag and statement number
pair for data-name, procedure, or program symbols, or 10 occurrences
of the statement number for statements.
Where the number of references
would exceed the record size for the SYSADATA file, the record is
continued on the next record. The continuation flag is set in the
common header section of the record.
|