TNS/R Native Application Migration Guide

COBOL85 Migration Tasks
TNS/R Native Application Migration Guide—523745-001
4-6
Possible Changes Required
Possible Changes Required
The COBOL85 and NMCOBOL compilers handle the following directives, the ENTER
statement, and floating-point arithmetic differently. Make any necessary changes to
them before compiling your COBOL85 source program with the NMCOBOL compiler.
For complete descriptions of the directives, see the COBOL85 for NonStop Systems
Manual.
Subsections:
•
Directives on page 4-6
•
ENTER Statement on page 4-7
•
Floating-Point Arithmetic on page 4-8
Directives
•
BLANK and NOBLANK
For the COBOL85 compiler, BLANK is the default. For the NMCOBOL compiler,
NOBLANK is the default.
•
CONSULT
For the NMCOBOL compiler, each object-name in a CONSULT directive must
designate a native object file (otherwise the NMCOBOL compiler reports an error).
If a native COBOL85 program references the object in a CALL or ENTER
statement, the object must have been compiled with symbols.
•
LARGEDATA
For the COBOL85 compiler, the LARGEDATA directive determines whether
individual data items are located in the user data space or the user extended
space. The default value for the LARGEDATA directive’s parameter is 256.
For the NMCOBOL compiler, the LARGEDATA directive determines whether
individual data items are located in the small data area or the large data area. The
default value for the LARGEDATA directive’s parameter is 64.
•
LIBRARY
The NMCOBOL issues a warning for the LIBRARY directive.
Instead of the LIBRARY directive, specify the name of your native user library as
explained in the COBOL85 for NonStop Systems Manual.