埋め込みの説明
@1@ : エラーの原因となった一意名.
例題
[C5527.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5527. 000003 IDENTIFICATION DIVISION. 000004 OBJECT. 000005 PROCEDURE DIVISION. 000006 IDENTIFICATION DIVISION. 000007 METHOD-ID. M5527. 000008 ENVIRONMENT DIVISION. 000009 DATA DIVISION. 000010 LINKAGE SECTION. 000011 PROCEDURE DIVISION. 000012 END METHOD M5527. 000013 END OBJECT. 000014 END CLASS C5527.
[P5527.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5527. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS C5527. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WOBR OBJECT REFERENCE C5527. 000010 01 WMET PIC X(8). 000011 PROCEDURE DIVISION. 000012 MOVE "M5527" TO WMET 000013 INVOKE WOBR WMET 000014 END PROGRAM P5527.
P5527.cob 13: JMN5527I-S INVOKE文に一意名'WMET'が指定された場合,INVOKEの直後の一意名は他の選択指定を持たないUSAGE OBJECT REFERENCE句が記述された一意名でなければなりません.INVOKE文を無効とします.
詳細な説明
「他の選択指定のないUSAGE OBJECT REFERENCE句」とは,以下のいずれも同時に指定されていないUSAGE OBJECT REFERENCE句のことです.
SELF
FACTORY OF SELF
CLASS OF SELF
クラス名
クラス名 ONLY
FACTORY OF クラス名
FACTORY OF クラス名 ONLY