TNS/R Native Application Migration Guide

COBOL85 Migration Tasks
TNS/R Native Application Migration Guide—523745-001
4-8
Removal Optional
Floating-Point Arithmetic
The COBOL85 and NMCOBOL compilers can produce slightly different results for
floating-point arithmetic. This is most likely to cause problems for exponentiation with a
negative or fractional exponent (such as 10**-3 or 2**0.3). You can avoid this problem
by including the ROUNDED phrase in statements that perform floating-point arithmetic.
With the ROUNDED phrase, both compilers produce the same results. For more
information on the ROUNDED phrase, see the COBOL85 for NonStop Systems
Manual.
Removal Optional
The NMCOBOL compiler ignores the following items, so you can (but need not)
remove them from your source program. The NMCOBOL compiler gives a warning
when it finds these items, except as noted.
•
CODE and NOCODE directives
The NMCOBOL compiler does not produce an octal code listing. If you need to
display an object file, use the noft utility (see the nld and noft Manual).
•
COMPACT and NOCOMPACT directives
These directives determine whether BINSERV attempts to compact the code
space of the target file. The NMCOBOL compiler does not use BINSERV.
•
CROSSREF and NOCROSSREF
The NMCOBOL compiler does not produce a cross-reference listing. If you need
one, use the noft utility with the XREFPROC flag (see the nld and noft Manual).
•
ENV COMMON directive
Native COBOL85 programs always run in the CRE. The NMCOBOL compiler does
not issue a warning if you use this directive.
•
ENV LIBRARY
Instead of using the ENV LIBRARY directive to build a TNS user library, use the UL
directive to build a native user library (see the COBOL85 for NonStop Systems
Manual).
•
EXTENDED-STORAGE SECTION header
Native COBOL85 does not need an Extended-Storage Section. The NMCOBOL
compiler handles any data items that are described in the Extended-Storage
Section as if they were described in the Working-Storage Section. The NMCOBOL
compiler does not issue a warning if you use the EXTENDED-STORAGE
SECTION header.
•
HIGHPIN directive
Native COBOL85 programs always run at a high PIN.