Nested program record: X'0046'

The following table shows the contents of the nested program record.

Table 1. SYSADATA nested program record
Field Size Description
Statement definition FL4 The line number where the symbol is defined or declared
Nesting level XL1 Program nesting level
Program attributes XL1
1... ....
Initial
.1.. ....
Common
..1. ....
PROCEDURE DIVISION using
...1 1111
Reserved for future use
Reserved XL1 Reserved for future use
Program-name length XL1 Length of the following field
Program-name CL(n) The program-name