埋め込みの説明
@1@ : DISPLAY
例題
[C3428.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C3428. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 OBJECT. 000007 PROCEDURE DIVISION. 000008 METHOD-ID. FM1. 000009 DATA DIVISION. 000010 WORKING-STORAGE SECTION. 000011 01 OBJA OBJECT REFERENCE C3428. 000012 PROCEDURE DIVISION. 000013 DISPLAY OBJA. 000014 EXIT METHOD. 000015 END METHOD FM1. 000016 END OBJECT. 000017 END CLASS C3428.
C3428.cob 13: JMN3428I-S DISPLAY文にオブジェクト一意名は指定できません.