Table of Contents
Advertisement
Example 10–7 (Cont.) Sample Program EX1007
03
03
02
LINE 33.
03
03
02
LINE 34.
03
03
02
LINE 35.
03
02
LINE 5.
03
03
03
02
LINE 7.
03
03
03
03
03
03
03
03
03
03
COLUMN 45
PIC X VALUE "*".
COLUMN 75
PIC X VALUE "*".
COLUMN 45
PIC X VALUE "*".
COLUMN 75
PIC X VALUE "*".
COLUMN 45
PIC X VALUE "*".
COLUMN 75
PIC X VALUE "*".
COLUMN 45
PIC X(31) VALUE ALL "*".
COLUMN 1
PIC X(27) VALUE "CUSTOMER MASTER FILE REPORT".
COLUMN 105
PIC X(4) VALUE "PAGE".
COLUMN 109
PIC ZZZ9
SOURCE PAGE-COUNTER.
COLUMN 1
PIC X VALUE "+".
COLUMN 2
PIC X(110) VALUE ALL "-".
COLUMN 112
PIC X VALUE "+".
COLUMN 1
PIC X VALUE "|".
COLUMN 10
PIC X(4) VALUE "NAME".
COLUMN 29
PIC X VALUE "|".
COLUMN 43
PIC X(7) VALUE "ADDRESS".
COLUMN 81
PIC X VALUE "|".
COLUMN 91
PIC X(7) VALUE "INVOICE".
COLUMN 112
PIC X VALUE "|".
Producing Printed Reports
10.9 Report Writer Examples
(continued on next page)
Producing Printed Reports 10–51
Advertisement
Table of Contents
