切り捨ての例
操作の中には、TRUNC 指令によって結果が変わるものがある。その様子を次に示す。この例では、項目 A の PIC は 99 COMP と記述されている。
注:
- この指令は、非整数データの下位の桁の切り捨てには効力をもたない。この操作は常に ANSI COBOL の規定に準拠して行われる。
- IBMCOMP コンパイラ指令を設定すると、COMP 項目の上位に余分のバイトが割り当てられることがある。これらのバイトは割り当てられた記憶域に含められる。IBMCOMP がオンであると、SYNC 句を伴う COMP 項目の前に充てん文字が埋められることがある。この充てん文字はその項目の一部ではなく、その項目に記録されるデータに影響されることはない。
- 符号付き項目に収められる値の桁数が PICTURE 句によって制限されている場合、符号ビットまで上書きする桁数を取ることはできない。ただし、NOTRUNC 指令が設定されている場合は例外で、値が大きければ、符号ビットを上書きする。