例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1015.
000003 PROCEDURE DIVISION.
000004 DISPLAY 540000000000000.0E-99
000005 END PROGRAM C1015.
C1015.cob (4) : JMN1015I-S 浮動小数点定数の絶対値が最小値より小さい値(指数アンダフロー)です．浮動小数点定数の値をゼロとみなします．