引数の説明
CUSTOM-ATTRIBUTE句のUSING指定,CUSTOM-ATTRIBUTE句のPROPERTY指定 |
エラーの原因となった利用者語 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P5245.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 SPECIAL-NAMES.
000006 SYMBOLIC CONSTANT
000007 MAINPG IS "P5245"
000008 CUSTOM-ATTRIBUTE CA1
000009 CLASS DLLIMP USING "P5245.DLL"
000010 PROPERTY EntryPoint IS MAINPG.
000011 REPOSITORY.
000012 CLASS DLLIMP AS "System.Runtime.InteropServices.DllImportAttribute".
000013 DATA DIVISION.
000014 WORKING-STORAGE SECTION.
000015 PROCEDURE DIVISION.
000016 END PROGRAM P5245.
P5245.cob (10) : JMN5245I-S CUSTOM-ATTRIBUTE句のPROPERTY指定に指定したMAINPGは定数フィールドの参照,関数一意名または定数でなければなりません.
詳細な説明
環境部の特殊名段落のCUSTOM-ATTRIBUTE句のUSING指定またはPROPERTY指定に指定する値は,定数フィールドの参照,関数一意名または定数でなければなりません.
なお,関数一意名は,以下の関数でなければなりません.
FUNCTION ENUM-OR
FUNCTION ENUM-AND
FUNCTION ENUM-NOT