Specifies whether data being stored into a USAGE COMP, USAGE BINARY or USAGE COMP-4 item is to be truncated to the size given
by the item's PICTURE clause or to the maximum size the item can hold.
Syntax:
>>-.---.-.-------TRUNC--"method"-.---------><
+-/-+ +.----.-TRUNC-----------+
+-NO-+
Parameters:
-
method
- One of:
- TRUNC
- Truncate in decimal to the number of digits given by the PICTURE clause, on all stores into COMP, BINARY and COMP-4 items.
- NOTRUNC
- Truncate in binary to the capacity of the allocated storage, on all nonarithmetic stores into COMP, BINARY and COMP-4 items.
- TRUNC"ANSI"
- Truncate in decimal to the number of digits given by the PICTURE clause, on nonarithmetic stores into COMP, BINARY and COMP-4
items. On arithmetic statements that cause the size error condition and that have no ON SIZE ERROR phrase, the result is undefined.
Properties:
| Default:
|
TRUNC"ANSI"
|
| Phase:
|
Syntax check
|
| $SET:
|
Initial
|
Dependencies:
NORM sets TRUNC"ANSI" immediately.
DIALECT"RM", RM, or RM"ANSI" sets NOTRUNC immediately.