Compaq COBOL AAQ2G1FTK - Manual (Page 546)

Compaq COBOL for OpenVMS VAX and Compaq COBOL Compatibility and Migration
B.4 Compaq COBOL and Compaq COBOL for OpenVMS VAX Behavior Differences
L 12 FILE-CONTROL.
L 13 SELECT FILE-1
L 14 ASSIGN TO "FILE1.TMP".
15 DATA DIVISION.
16 FILE SECTION.
17 FD
FILE-1.
18 01 FILE1-REC PIC X.
19 WORKING-STORAGE SECTION.
20 PROCEDURE DIVISION.
21 PE.
DISPLAY "***END***"
22 STOP RUN.
Compaq COBOL for OpenVMS VAX Listing File for COPY Statement
1 IDENTIFICATION DIVISION.
2 PROGRAM-ID. DCOP1B.
3 *
4 * This program tests the copy library file.
5 * with a comment in the middle of it.
6 * It should not produce any diagnostics.
7 COPY
8 * this is the comment in the middle
9 LCOP1A.
11L INPUT-OUTPUT SECTION.
12L FILE-CONTROL.
13L SELECT FILE-1
14L ASSIGN TO "FILE1.TMP".
16 FILE SECTION.
17 FD FILE-1.
18 01 FILE1-REC PIC X.
19 WORKING-STORAGE SECTION.
20 PROCEDURE DIVISION.
21 PE. DISPLAY "***END***"
22 STOP RUN.
B.4.2.4 Multiple COPY Statements
The Compaq COBOL and Compaq COBOL for OpenVMS VAX compilers also
produce output in slightly different formats when listing a COBOL program with
multiple COPY statements on a single line.
The following two compiler listing files illustrate the difference in the position
of the listing annotations, represented by the letter ‘‘L,’’ for multiple COPY
statements on a single line in a COBOL program using Compaq COBOL and
Compaq COBOL for OpenVMS VAX.
B–12 Compaq COBOL for OpenVMS VAX and Compaq COBOL Compatibility and Migration