例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3024. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 ED01 PIC S9(16). 000006 01 ED02 PIC SV9(16). 000007 PROCEDURE DIVISION. 000008 ADD ED01 TO ED02.
C3024.cob (8) : JMN3024I-W 中間結果のけた数が30けたを超えています.中間結果のけた数を30けたにして処理を続けます.