埋め込みの説明
@1@ : スクリーン操作のACCEPT文およびDISPLAY文
例題
[P2970.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2970 IS RECURSIVE PROGRAM. 000003 DATA DIVISION. 000004 BASED-STORAGE SECTION. 000005 WORKING-STORAGE SECTION. 000006 01 REC-1. 000007 02 KEY-REC PIC XX. 000008 02 FILLER PIC X(78). 000009 01 PT POINTER. 000010 PROCEDURE DIVISION. 000011 ACCEPT REC-1 FROM CRT. 000012 END PROGRAM P2970.
P2970.cob 11: JMN2970I-S 再帰属性を持つプログラム定義で,'スクリーン操作のACCEPT文およびDISPLAY文'は使用できません.