Chapter 2. Introducing File Manager 67
Depending on your file structure, this might not matter to you. Otherwise, you will
have more data in your file than you may have intended. You just have to be
careful.
2.5 Copybook and include
File Manager V3 can process PL/I Includes as well as COBOL copybooks as
shown in Example 2-26 and Example 2-27.
Example 2-26 COBOL copybook
01 REC-TYPE01.
03 REC-TYPE PIC XX.
03 NAME PIC X(20).
03 EMPLOYEE-NO PIC 9(4) BINARY.
03 AGE PIC 9(4) BINARY.
03 SALARY PIC 9(7) PACKED-DECIMAL.
03 MONTH PIC 9(8) BINARY OCCURS 12 TIMES.
03 FILLER PIC XX.
01 REC-TYPE02.
05 REC-TYPE PIC XX.
05 NAME PIC X(20).
03 JOB-TITLE PIC X(14).
03 ADDR1 PIC X(20).
03 ADDR2 PIC X(20).
03 POSTCODE PIC X(4).
Example 2-27 PL/I Include
DECLARE 1 REC_TYPE01,
2 REC_TYPE CHAR(2),
2 NAME CHAR(20),
2 EMPLOYEE_NO BINARY FIXED(8),
2 AGE BINARY FIXED(8),
2 SALARY DECIMAL FIXED(7),
2 MONTH DIM(12) BINARY FIXED(16),
2 FILLER CHAR(2);
DECLARE 1 REC_TYPE02,
2 REC_TYPE CHAR(2),
2 NAME CHAR(20),
2 JOB_TITLE CHAR(14),
2 ADDR1 CHAR(20),
2 ADDR2 CHAR(20),
2 POSTCODE CHAR(4);

Get Introduction to the IBM Application Development Tools on z/OS and OS/390 now with O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.