Sharing Record Areas - Compaq COBOL AAQ2G1FTK User Manual

Optimizing Your Compaq COBOL Program
15.6 I/O Operations
Figure 15–1 Sharing Record Areas
Program Without Shared
PROCEDURE DIVISION.
.
.
.
READ INP−FILE ...
.
.
.
MOVE INP−REC TO OUT−REC.
WRITE OUT−REC ...
Process Without Shared Areas
INP−REC
OUT−REC
15–14 Optimizing Your Compaq COBOL Program
Record Area
I−O−CONTROL.
.
.
.
PROCEDURE DIVISION.
.
.
.
.
.
.
Process with Shared Areas
INP−FILE buffer
READ
(move)
MOVE
WRITE
(move)
OUT−FILE buffer
Program with Shared
Record Area
SAME RECORD AREA FOR
INP−FILE OUT−FILE.
READ INP−FILE ...
WRITE OUT−REC ...
READ
(move)
INP−REC
OUT−REC
WRITE
(move)
ZK−1539−GE