pTAL Reference Manual (G06.24+, H06.09+, J06.03+)

NOROUND
turns off rounding. That is, rounding does not occur when a FIXED value is assigned to a FIXED
variable that has a smaller fpoint. If the fpoint of the assignment value is greater than
that of the variable, the assignment value is truncated and some precision is lost.
NOROUNDDefault:
AnywherePlacement:
Scope:
• ROUND applies to subsequent code until overridden by NOROUND
• NOROUND applies to subsequent code until overridden by ROUND
NoneDependencies:
Example 354 ROUND Directive
?ROUND ! Request rounding
! Global declarations
PROC a;
BEGIN
FIXED(2) f1;
FIXED(3) f2;
f1 := f2;
END;
SAVEGLOBALS
NOTE: The EpTAL compiler does not accept this directive. See Migrating from TNS/R to TNS/E
(page 375).
SAVEGLOBALS saves all global data declarations in a file for use in subsequent compilations that
specify the USEGLOBALS directive.
file-name
is the name of a disk file to which the compiler is to write the global data declarations.
If file-name already exists, the compiler purges the existing file and creates an unstructured
global declarations file.
If the existing file is secured so that the compiler cannot purge it, the compilation terminates.
The compiler uses the current default volume and subvolume names as needed and lists the
complete file name in the trailer message at the end of compilation. For this directive, the
compiler does not use HP TACL ASSIGN SSV information (available only on Guardian platforms)
to complete the file name.
define-name
is the name of a MAP DEFINE that refers to the disk file to which you want the compiler to write
the global data declarations.
SAVEGLOBALS 413