埋め込みの説明
@1@ : ファクトリ定義またはオブジェクト定義.
例題
[C5547.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5547. 000003 IDENTIFICATION DIVISION. 000004 OBJECT. 000005 IDENTIFICATION DIVISION. 000006 METHOD-ID. M5547. 000007 DATA DIVISION. 000008 LINKAGE SECTION. 000009 01 LK1 PIC X(10). 000010 PROCEDURE DIVISION RETURNING LK1. 000011 END METHOD M5547. 000012 END OBJECT. 000013 END CLASS C5547.
C5547.cob 6: JMN5547I-S オブジェクト定義の手続き部見出しがありません.手続き部見出しがあるものとみなします.
詳細な説明
クラス定義内でメソッド定義を記述する場合は,これらのソース単位の手続き部見出しに続いて,メソッド定義を記述します.