关于abap:来自另一个-AMDP-过程的所有-AMDP-过程

CLASS zcl_demo_002_amdp DEFINITION PUBLIC FINAL CREATE PUBLIC .  PUBLIC SECTION.    INTERFACES: if_amdp_marker_hdb.    METHODS: get_spfli_details_public IMPORTING VALUE(iv_mandt) TYPE mandt                                      EXPORTING VALUE(et_spfli) TYPE spfli_tab.  PROTECTED SECTION.  PRIVATE SECTION.    CLASS-METHODS: get_spfli_details_private IMPORTING VALUE(iv_mandt) TYPE mandt                                             EXPORTING VALUE(et_spfli) TYPE spfli_tab.ENDCLASS.CLASS zcl_demo_002_amdp IMPLEMENTATION.  METHOD get_spfli_details_public BY DATABASE PROCEDURE FOR HDB LANGUAGE SQLSCRIPT  OPTIONS READ-ONLY USING zcl_demo_002_amdp=>get_spfli_details_private.    CALL "ZCL_DEMO_002_AMDP=>GET_SPFLI_DETAILS_PRIVATE"( iv_mandt => iv_mandt, et_spfli => et_spfli );  ENDMETHOD.  METHOD get_spfli_details_private BY DATABASE PROCEDURE FOR HDB  LANGUAGE SQLSCRIPT OPTIONS READ-ONLY USING spfli.    et_spfli = SELECT * FROM spfli WHERE mandt = :iv_mandt;  ENDMETHOD.ENDCLASS.

*&---------------------------------------------------------------------**& Report ztest_amdp1*&---------------------------------------------------------------------**&*&---------------------------------------------------------------------*REPORT ztest_amdp1.CLASS lcl_test_amdp DEFINITION.  PUBLIC SECTION.    CLASS-METHODS: run.ENDCLASS.CLASS lcl_test_amdp IMPLEMENTATION.  METHOD run.* AMDP Method call    TRY.        IF cl_abap_dbfeatures=>use_features( requested_features = VALUE #( ( cl_abap_dbfeatures=>call_amdp_method ) ) ) = abap_true.          NEW zcl_demo_002_amdp( )->get_spfli_details_public(                                                             EXPORTING iv_mandt = sy-mandt                                                             IMPORTING et_spfli = DATA(lt_spfli_amdp) ).          BREAK-POINT.        ENDIF.      CATCH cx_abap_invalid_param_value.    ENDTRY.  ENDMETHOD.ENDCLASS.START-OF-SELECTION.  lcl_test_amdp=>run( ).