埋め込みの説明
@1@ : 部分参照されたデータ項目
例題
[C3006.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3006. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 SBITEM PIC X(10). 000006 PROCEDURE DIVISION. 000007 MOVE ZERO TO SBITEM(1:0). 000008 END PROGRAM C3006.
C3006.cob 7: JMN3006I-S 'SBITEM'に対する部分参照子の長さは,正でなければなりません.長さを1とみなします.