Rational Developer for System z
COBOL for Windows, Version 7.5, Programming Guide


DIAGTRUNC

DIAGTRUNC causes the compiler to issue a severity-4 (Warning) diagnostic message for MOVE statements with numeric receivers when the receiving data item has fewer integer positions than the sending data item or literal. In statements with multiple receivers, the message is issued separately for each receiver that could be truncated.

DIAGTRUNC option syntax
Read syntax diagramSkip visual syntax diagram   .-NODIAGTRUNC-.  
>>-+-------------+---------------------------------------------><
   '-DIAGTRUNC---'  
 

Default is: NODIAGTRUNC

Abbreviations are: DTR, NODTR

The diagnostic message is also issued for implicit moves associated with statements such as these:

The diagnostic is also issued for moves to numeric receivers from alphanumeric data-names or literal senders, except when the sending field is reference modified.

There is no diagnostic for COMP-5 receivers, nor for binary receivers when you specify the TRUNC(BIN) option.

related concepts
Formats for numeric data
Reference modifiers

related references
TRUNC


Terms of use | Feedback

Copyright IBM Corporation 1996, 2008.
This information center is powered by Eclipse technology. (http://www.eclipse.org)