埋め込みの説明
@1@ : TYPEDEF,EXTERNAL
@2@ : SQL宣言節,ファクトリ定義,スタティック定義またはオブジェクト定義
例題
[C1681.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1681. 000003 OBJECT. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 PRM PIC X(4) EXTERNAL. 000007 END OBJECT. 000008 END CLASS C1681.
C1681.cob 6: JMN1681I-S EXTERNAL句はファクトリ定義,スタティック定義またはオブジェクト定義には指定できません.次の認識できる句,段落,節または部まで無効になります.