埋め込みの説明
@1@ : _ (アンダースコア)
例題
[C1771.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1771. 000003 OBJECT. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 DATA-1 PIC X(4). 000007 PROCEDURE DIVISION. 000008 METHOD-ID. SET PROPERTY _DATA. 000009 DATA DIVISION. 000010 LINKAGE SECTION. 000011 01 P1 PIC X(4). 000012 PROCEDURE DIVISION USING P1. 000013 MOVE P1 TO DATA-1. 000014 END METHOD. 000015 END OBJECT. 000016 END CLASS C1771.
C1771.cob 8: JMN1771I-S プロパティ名の先頭文字は,'_'であってはなりません.PROPERTY指定は無効になります.
C1771.cob 8: JMN1770I-W メソッド名が'_'で始まるメソッドは,COBOLシステムが予約しています.COBOLシステムが予約したメソッドを使用する場合,OVERRIDE指定を書かなければなりません.指定されたとおりに受け入れます.
C1771.cob 14: JMN1703I-S メソッド終わり見出しにメソッド名がありません.
C1771.cob 15: JMN1745I-S 対応しない終わり見出しが指定されています.次のソース単位の始め見出しまで無効になります.
C1771.cob 16: JMN1726I-S メソッド終わり見出しがありません.メソッド終わり見出しがあるものとみなします.
C1771.cob 16: JMN1726I-S オブジェクト終わり見出しがありません.オブジェクト終わり見出しがあるものとみなします.