COMTRAN Reconstruction

J28-6169 · January 1962

02.05.01

PDF page 27 of 221. Download the scanned PDF

The page as scanned

The scan of PDF page 27 of J28-6169
Select the scan to open it at full size.

The text read off it

[02.05.01]

02.05 Data Description Amplification and Clarification

The name of each data field referenced in Procedure statements or Environment Descriptions must appear in the name field of a Data Description entry. Neither storage allocation nor assignment of data characteristics is made for data fields not so named.

A. Level

  1. Any numbers 01-99 may be used to specify the level of fields. Leading zeros are optional and all level numbers less than 10 are right justified by the compiler.

  2. The highest level in a program need not be 01. All data fields of level equal to the highest level in a source program will be left justified unless explicitly specified as right justified. Consider a source program in which only the following description of data appears:

Name    Level    Type      Description
A       05       RECORD
  B     10                 A(20)
  C     10                 9(20)
D       05                 9(2)
E       05                 A(3)

Fields A, D, and E will each be left justified (although no justification is specified and previous fields may not complete full words) since 05 is the highest level used in the program.

B. Type Codes.

1. RECORD

a) A record is a data hierarchy which may not be part of any data organization except a file or a section. The "Quantity columns" are used to specify the number of times a format of data is repeated within a hierarchy; the use of these columns with a data hierarchy, such as RECORD, is unacceptable. When the type code RECORD is recognized the previous data organization is always terminated. Record definition is terminated by specification of a level number equal to or less than the one associated with RECORD.

b) A record must have length, and redefinition of a record area does not give it length.

The compiler considers that no length has been specified for REC1 in the following example:

Name    Level    Type      Description
REC1    01       RECORD
                  REDEF     REC1
AREA    01                  A(40)