埋め込みの説明
@1@ : データ項目名
@2@ : ACCEPT/DISPLAY
例題
[C3458.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3458. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 CTRL-DATA PIC N(20). 000006 01 SCRN-DATA PIC N(16). 000007 SCREEN SECTION. 000008 01 ITITLE1 CONTROL CTRL-DATA. 000009 02 LINE NUMBER IS 3 COLUMN NUMBER IS 23. 000010 PROCEDURE DIVISION. 000011 DISPLAY ITITLE1. 000012 DISPLAY SCRN-DATA WITH CONTROL CTRL-DATA. 000013 EXIT PROGRAM. 000014 END PROGRAM C3458.
C3458.cob 11: JMN3458I-S DISPLAY文においてCONTROL指定のデータ名'CTRL-DATA'は,英数字項目でなければなりません.
C3458.cob 12: JMN3458I-S DISPLAY文においてCONTROL指定のデータ名'CTRL-DATA'は,英数字項目でなければなりません.