COBOL Manual for TNS/E Programs (H06.08+, J06.03+)

?SECTION MOVE1,ANSI
MOVE ABLE TO BAKER. MOVE1
?SECTION MOVE2,HP
MOVE ABLE TO BAKER.
?SECTION SOURCE1,ANSI
ABLE SOURCE1
?SECTION SOURCE2,ANSI
ABLE SOURCE2
?SECTION SOURCE3,ANSI
ABLE SOURCE3
?SECTION ADD1,ANSI
000001 ANDY ADD1
?SECTION ADD2,ANSI
000101 BARBARA ADD2
?SECTION ADD3,ANSI
?SECTION ADD4
CAL
Listing:
ANSIFMT 33 PD0023 A.
ANSIFMT 34 PD0024* COPY MOVE1.
MOVE1 < 34 MOVE ABLE TO BAKER.
ANSIFMT 35 PD0024* COPY MOVE2.
< 13 MOVE ABLE TO BAKER.
ANSIFMT 36 PD0026* MOVE COPY SOURCE1. TO X.
ANSIFMT < 36 PD0026 MOVE ABLE TO X.
ANSIFMT 37 PD0027* MOVE COPY SOURCE2. TO X.
ANSIFMT 37 PD0027 MOVE
ANSIFMT < 38 ABLE TO X.
ANSIFMT 39 PD0028* MOVE COPY SOURCE3. TO X.
SOURCE3 < 39 PD0028 MOVE ABLE
ANSIFMT 40 PD0028 TO X.
ANSIFMT 41 PD0029* ADD COPY ADD1. COPY ADD2. COPY ADD3. COPY ADD4. TO ANSR.
ANSIFMT 41 PD0029 ADD
ANSIFMT < 42 000001* ANDY COPY ADD2. COPY ADD3. COPY ADD4. TO ANSR.
ANSIFMT < 42 000001 ANDY
ANSIFMT < 43 000101* BARBARA COPY ADD3. COPY ADD4. TO ANSR.
ANSIFMT < 43 000101* BARBARA COPY ADD4. TO ANSR.
ANSIFMT < 43 000101 BARBARA CAL TO ANSR.
ANSIFMT 44 PD0030* DISPLAY COPY SHOW-LIST OF SOMELIB. .
SHOWLIST< 44 PD0030D DISPLAY ABLE BAKER CHARLENE DELTA
ANSIFMT < 45 D ANDY BARBARA .
ANSIFMT 46 PD0031 STOP RUN.
Text Retrieved by SOURCE Directive
The compiler does not mark lines containing text that it copied from a SOURCE library.
The compiler directives SHOWFILE and NOSHOWFILE determine whether the compiler listing
indicates when the compiler stops reading from one source file and starts reading from another.
The default, NOSHOWFILE, prevents the compiler from reporting when it switches from one source
file to another. The alternative, SHOWFILE, causes the compiler to report each time it starts reading
from a new source file by printing a line of the form:
Source file: [n] filename yyyy-mm-dd hh:mm:ss
The n is the ordinal number that the compiler assigned to the source file. Initially, n is 1, and the
compiler increments n by 1 every time it encounters a SOURCE directive. The filename is the
fully qualified name of the new source file. The remainder of the line is the date and time when
that file was last modified.
SQL/MP and SQL/MX Statements
SQL/MP or SQL/MX statements embedded in your HP COBOL program always appear in the
compiler listing, but their format depends on whether you used the preprocessor to produce the
object file.
For SQL/MP statements, using the preprocessor is optional (see the SQL/MP Programming Manual
for COBOL).
Understanding and Controlling the Compiler Listing 773