例題
[C3012.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3012. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 ED01 PIC S9(18). 000006 01 ED02 PIC S9P(15). 000007 01 ED03 PIC S9P(15). 000008 PROCEDURE DIVISION. 000009 COMPUTE ED01 = ED02 * ED03.
C3012.cob 9: JMN3012I-W 演算の中間結果で，有効けたがすべて消失しています．結果をゼロとして処理を続けます．
詳細な説明
中間結果が固定小数点の場合，その最大桁数は30桁と定められています．演算要素から求められた中間結果の桁数が，整数部が-30桁以下または小数部が-30桁以下となった場合，演算処理をしても結果が最大桁数である30桁の部分に反映されないことになります．この場合は演算処理は行わずに，演算結果をゼロとして以降の処理が継続されます．
