例題
[P2873.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2873. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WDX PIC X(4) COMPUTATIONAL-4. 000007 PROCEDURE DIVISION. 000008 END PROGRAM P2873.
P2873.cob 6: JMN2873I-S COMPUTATIONAL-4は，数字項目に指定しなければなりません．
