COBOL Manual for TNS/E Programs (H06.03+)

Creating and Compiling HP COBOL Source
Programs
HP COBOL Manual for TNS/E Programs—520347-003
22-23
Using Data Definition Language (DDL)
?SECTION ADDRESS,HP
* Definition ADDRESS created on 02/28/93 at 12:01
01 ADDRESS.
02 STREET-NUMBER PIC X(6).
02 STREET-NAME PIC X(25).
02 FLAT-NUMBER PIC X(8).
02 MUNICIPALITY PIC X(25).
02 STATE-OR-PROVINCE PIC X(25).
02 NATION PIC X(25).
02 POSTAL-CODE PIC X(11).
?SECTION NAME-AND-ADDRESS,HP
* Definition NAME-AND-ADDRESS created on 02/28/93 at 12:01
01 NAME-AND-ADDRESS.
02 NAME.
03 LAST-NAME PIC X(15).
03 MIDDLE-INITIAL PIC X(1).
03 FIRST-NAME PIC X(15).
02 ADDRESS.
03 STREET-NUMBER PIC X(6).
03 STREET-NAME PIC X(25).
03 FLAT-NUMBER PIC X(8).
03 MUNICIPALITY PIC X(25).
03 STATE-OR-PROVINCE PIC X(25).
03 NATION PIC X(25).
03 POSTAL-CODE PIC X(11).
Example 22-4. COPY Library Produced by the DDL Compiler (page 2 of 3)