Compaq COBOL AAQ2G1FTK - Manual (Page 385)

Producing Printed Reports
10.10 Solving Report Problems
Figure 10–21 Printing Labels Four-Up in Sort Order
1
2
3
4
5
6
1
ZK−1556−GE
7
8
9
10
13
15
16
19
20
21
22
11
12
14
17
18
23
24
Example 10–12 Printing Labels Four-Up in Sort Order
IDENTIFICATION DIVISION.
PROGRAM-ID. REP03.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT INPUT-FILE ASSIGN TO "LABELS.DAT".
SELECT REPORT-FILE ASSIGN TO "LABELS.REP".
(continued on next page)
Producing Printed Reports 10–85