埋め込みの説明
@1@ : 部分参照されたデータ項目
例題
[C3005.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3005. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 SBITEM PIC S9(9) BINARY. 000006 PROCEDURE DIVISION. 000007 MOVE ZERO TO SBITEM(1:2). 000008 END PROGRAM C3005.
C3005.cob 7: JMN3005I-S 部分参照されたデータ項目'SBITEM'のUSAGEは,DISPLAYでなければなりません.USAGEを,DISPLAYとみなします.