Manualshelf

COBOL Manual for TNS and TNS/R Programs

ManualsBrandsHP ManualsServerHP NonStop G-Series
1211121212131214121512161217121812191220
Creating and Compiling HP COBOL Source
Programs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
22-46
Source Program Listing
Example 22-16. ANSI Format COPY Expansion (page 1 of 2)
Source Program Lines:
PD0023 A.
ANSIFMT
PD0024 COPY MOVE1.
ANSIFMT
PD0024 COPY MOVE2.
ANSIFMT
PD0026 MOVE COPY SOURCE1. TO X.
ANSIFMT
PD0027 MOVE COPY SOURCE2. TO X.
ANSIFMT
PD0028 MOVE COPY SOURCE3. TO X.
ANSIFMT
PD0029 ADD COPY ADD1. COPY ADD2. COPY ADD3. COPY ADD4. TO ANSR.
ANSIFMT
PD0030D DISPLAY COPY SHOW-LIST OF SOMELIB. .
ANSIFMT
PD0031 STOP RUN.
ANSIFMT