埋め込みの説明
@1@ : USAGE OBJECT REFERENCE
例題
[C5122.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C5123. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS C5123C AS "*OLE". 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 OBJA USAGE OBJECT REFERENCE C5123C ONLY. 000010 01 OBJB USAGE OBJECT REFERENCE FACTORY OF C5123C. 000011 01 OBJB USAGE OBJECT REFERENCE FACTORY OF C5123C ONLY. 000012 PROCEDURE DIVISION. 000013 END PROGRAM C5123.
C5123.cob 9: JMN5123I-S USAGE OBJECT REFERENCE句に特殊クラスを指定した場合，他の選択指定を記述してはなりません．他の選択指定は無効になります．
C5123.cob 10: JMN5123I-S USAGE OBJECT REFERENCE句に特殊クラスを指定した場合，他の選択指定を記述してはなりません．他の選択指定は無効になります．
C5123.cob 11: JMN5123I-S USAGE OBJECT REFERENCE句に特殊クラスを指定した場合，他の選択指定を記述してはなりません．他の選択指定は無効になります．
詳細な説明
USAGE OBJECT REFERENCE句に特殊クラスのクラス名を指定した場合，同句にFACTORY OF，ONLYは指定できません．
環境部のリポジトリ段落のクラス指定子の定数の値が以下のいずれかである場合，そのクラス名は特殊クラスのクラス名になります．
"*COM" (または"*OLE")
"*COM-ARRAY" (または"*OLE-ARRAY")
"*COM-EXCEPTION" (または"*OLE-EXCEPTION")
"*COB-BINDTABLE"
"*COM:COMサーバ名:COMクラス名" (COMサーバ名=型ライブラリとの対応付けに使用する任意の名前, COMクラス名=dispinterface名またはcoclass名)
