COBOL Manual for TNS and TNS/R Programs

Data Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
7-6
File Description Entries
In Example 7-2, two record description entries (level-01 items) follow a file description
entry.
The syntax of a file description entry (file-description ) depends on the file’s
access mode:
•
File Description Entry for Sequential File
•
File Description Entry for Line Sequential File (OSS environment only)
•
File Description Entry for Relative, Indexed, or Queue File
Example 7-2. File Description (FD) Entry
FD INPUT-FILE-MASTER
GLOBAL
RECORD IS VARYING IN SIZE FROM 10 TO 256 CHARACTERS
01 OFFICE-DETAILS.
03 NUMBER PIC 9(5).
03 ADDRESS.
05 LINE-1 PIC X(25).
05 LINE-2 PIC X(25).
05 LINE-3 PIC X(25).
03 HEAD-COUNT PIC 999.
03 MANAGER-ID-NUMBER 9(5).
01 EMPLOYEE-DETAILS.
03 ID-NUMBER PIC 9(5).
03 TITLE PIC X(25).
03 MANAGER-ID-NUMBER PIC 9(5).
03 SALARY-LEVEL PIC X(2).