引数の説明
エラーの原因となったメソッド名またはプロパティ名. |
例
000001 IDENTIFICATION DIVISION. 000002 INTERFACE-ID. I5208. 000003 PROCEDURE DIVISION. 000004* 000005 IDENTIFICATION DIVISION. 000006 METHOD-ID. M5208. 000007 PROCEDURE DIVISION. 000008 END METHOD M5208. 000009* 000010 METHOD-ID. GET PROPERTY PR5208. 000011 DATA DIVISION. 000012 LINKAGE SECTION. 000013 01 LK1 PIC S9(9) COMP-5. 000014 PROCEDURE DIVISION RETURNING LK1. 000015 END METHOD . 000016 END INTERFACE I5208.
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5208. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 INTERFACE I5208. 000007 OBJECT. IMPLEMENTS I5208. 000008 PROCEDURE DIVISION. 000009* 000010 METHOD-ID. GET PROPERTY PR5208 IS PROTECTED. 000011 DATA DIVISION. 000012 LINKAGE SECTION. 000013 01 LK PIC S9(9) COMP-5. 000014 PROCEDURE DIVISION RETURNING LK. 000015 EXIT METHOD. 000016 END METHOD. 000017* 000018 METHOD-ID. M5208 PRIVATE. 000019 DATA DIVISION. 000020 PROCEDURE DIVISION. 000021 EXIT METHOD. 000022 END METHOD M5208. 000023 END OBJECT. 000024 END CLASS C5208.
C5208.cob (10) : JMN5208I-S インタフェースを実装するPR5208のアクセス属性はPUBLICでなければなりません.
C5208.cob (18) : JMN5208I-S インタフェースを実装するM5208のアクセス属性はPUBLICでなければなりません.
詳細な説明
インタフェース定義に含まれるメソッドまたはプロパティを実装する場合,OF指定でインタフェース名を指定しない場合は,アクセス属性がPUBLICになるように定義する必要があります.