埋め込みの説明
@1@ : 定義済みオブジェクト一意名SUPERを参照した文.
例題
[C5530.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5530 INHERITS FJBASE. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS FJBASE. 000007 IDENTIFICATION DIVISION. 000008 OBJECT. 000009 ENVIRONMENT DIVISION. 000010 DATA DIVISION. 000011 WORKING-STORAGE SECTION. 000012 PROCEDURE DIVISION. 000013 IDENTIFICATION DIVISION. 000014 METHOD-ID. M5530. 000015 ENVIRONMENT DIVISION. 000016 DATA DIVISION. 000017 WORKING-STORAGE SECTION. 000018 01 WOBJ OBJECT REFERENCE. 000019 PROCEDURE DIVISION. 000020 SET WOBJ TO SUPER. 000021 END METHOD M5530. 000022 END OBJECT. 000023 END CLASS C5530.
C5530.cob 20: JMN5530I-S 定義済みオブジェクト一意名SUPERは,INVOKE文またはメソッドの行内呼び出しのメソッド呼び出しのオブジェクトとして,またはオブジェクトプロパティのオブジェクトとしてだけ使用できます.SET文は無効になります.