例題
[C3281.cob] 000001 @OPTIONS CONF(V52) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C3281. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 A PIC S9(4). 000008 PROCEDURE DIVISION. 000009 MOVE -0 TO A. 000010 END PROGRAM C3281.
C3281.cob 9: JMN3281I-I (CONF)MOVE文の送出し側として，数字定数-0が指定されています．数字定数-0は，+0とみなします．
