【发布时间】:2016-09-10 15:34:50
【问题描述】:
以下 ABAP 程序抛出错误 Statement is not accessible。
该程序包含一个接口和两个类:c2 继承自 c1。
语句CREATE OBJECT cref1. 中抛出错误
REPORT z_upcast_downcast_objref.
INTERFACE i1.
DATA a1 TYPE i.
ENDINTERFACE. "i1
INTERFACE i2.
INTERFACES i1.
ALIASES a1 FOR i1~a1.
DATA a2 TYPE i.
ENDINTERFACE. "i2
CLASS c1 DEFINITION.
PUBLIC SECTION.
INTERFACES i2.
ENDCLASS. "c1 DEFINITION
CLASS c2 DEFINITION INHERITING FROM c1.
PUBLIC SECTION.
METHODS m1.
ENDCLASS. "c2 DEFINITION
CLASS c2 IMPLEMENTATION.
METHOD m1.
WRITE : / 'In c2->m1 method'.
ENDMETHOD. "c2
ENDCLASS. "c2 DEFINITION
DATA: iref TYPE REF TO i2,
cref1 TYPE REF TO c1,
cref2 TYPE REF TO c2.
CREATE OBJECT cref1.
TRY.
cref2 ?= iref.
CALL METHOD cref2->('M1').
CATCH cx_sy_move_cast_error
cx_sy_dyn_call_illegal_method.
ENDTRY.
【问题讨论】:
-
确切的错误信息是什么?
标签: class abap implementation definition