From 413a1e485d3d737994264c846c6d8ec665b16ee5 Mon Sep 17 00:00:00 2001 From: "b.santos" Date: Mon, 7 Jul 2025 17:45:46 +0000 Subject: [PATCH] Excluir src/zbp_demo_abap_rap_ro_m.clas.locals_imp.abap --- ...bp_demo_abap_rap_ro_m.clas.locals_imp.abap | 124 ------------------ 1 file changed, 124 deletions(-) delete mode 100644 src/zbp_demo_abap_rap_ro_m.clas.locals_imp.abap diff --git a/src/zbp_demo_abap_rap_ro_m.clas.locals_imp.abap b/src/zbp_demo_abap_rap_ro_m.clas.locals_imp.abap deleted file mode 100644 index 0826a5c..0000000 --- a/src/zbp_demo_abap_rap_ro_m.clas.locals_imp.abap +++ /dev/null @@ -1,124 +0,0 @@ -*********************************************************************** -* -* RAP BO provider (i. e. ABAP behavior pool/ABP) -* for a RAP demo scenario -* -* - RAP scenario: managed RAP BO, external numbering -* - Data model: Consists of a root entity and one child entity. The BDEF -* defines the behavior for these two entities which are connected via -* a CDS composition relation. The definitions in the BDEF determine -* which methods must be implemented in this ABAP behavior pool (ABP). -* -* ----------------------------- NOTE ----------------------------------- -* This simplified example is not a real life scenario and rather -* focuses on the technical side by giving an idea how the communication -* and data exchange between a RAP BO consumer, which is a class -* in this case, and RAP BO provider can work. Additionally, it shows -* how the methods for non-standard RAP BO operations might be -* self-implemented in an ABP. The example is is intentionally kept -* short and simple and focuses on specific RAP aspects. For this reason, -* the example might not fully meet the requirements of the RAP BO contract. -* -* The code presented in this class is intended only to support the ABAP -* cheat sheets. It is not intended for direct use in a production system -* environment. The code examples in the ABAP cheat sheets are primarily -* intended to provide a better explanation and visualization of the -* syntax and semantics of ABAP statements, not to solve concrete -* programming tasks. For production application programs, you should -* always work out your own solution for each individual case. There is -* no guarantee for the correctness or completeness of the code. -* Furthermore, there is no legal responsibility or liability for any -* errors or their consequences that may occur when using the the example -* code. -* -*********************************************************************** - -CLASS lhc_root DEFINITION INHERITING FROM cl_abap_behavior_handler. - PRIVATE SECTION. - - METHODS get_global_authorizations FOR GLOBAL AUTHORIZATION - IMPORTING REQUEST requested_authorizations FOR root RESULT result. - - METHODS multiply_by_2 FOR MODIFY - IMPORTING keys FOR ACTION root~multiply_by_2. - - METHODS det_add_text FOR DETERMINE ON SAVE - IMPORTING keys FOR root~det_add_text. - - METHODS val FOR VALIDATE ON SAVE - IMPORTING keys FOR root~val. - -ENDCLASS. - -CLASS lhc_root IMPLEMENTATION. - - METHOD get_global_authorizations. - ENDMETHOD. - - METHOD multiply_by_2. - - "Retrieving instances based on requested keys - READ ENTITIES OF zdemo_abap_rap_ro_m IN LOCAL MODE - ENTITY root - FIELDS ( field3 field4 ) WITH CORRESPONDING #( keys ) - RESULT DATA(result) - FAILED failed. - - "If read result is initial, stop further method execution. - CHECK result IS NOT INITIAL. - - "Multiply integer values by 2 - MODIFY ENTITIES OF zdemo_abap_rap_ro_m IN LOCAL MODE - ENTITY root - UPDATE FIELDS ( field3 field4 ) WITH VALUE #( FOR key IN result ( %tky = key-%tky - field3 = key-field3 * 2 - field4 = key-field4 * 2 ) ). - ENDMETHOD. - - METHOD det_add_text. - - READ ENTITIES OF zdemo_abap_rap_ro_m IN LOCAL MODE - ENTITY root - FIELDS ( field2 ) WITH CORRESPONDING #( keys ) - RESULT DATA(lt_res). - - "If read result is initial, stop further method execution. - CHECK lt_res IS NOT INITIAL. - - "field2 is changed - MODIFY ENTITIES OF zdemo_abap_rap_ro_m IN LOCAL MODE - ENTITY root - UPDATE FIELDS ( field2 ) - WITH VALUE #( FOR key IN lt_res ( %tky = key-%tky - field2 = |{ key-field2 }_#| ) ). - - ENDMETHOD. - - METHOD val. - - READ ENTITIES OF zdemo_abap_rap_ro_m IN LOCAL MODE - ENTITY root - FIELDS ( field3 ) WITH CORRESPONDING #( keys ) - RESULT DATA(lt_res). - - "If read result is initial, stop further method execution. - CHECK lt_res IS NOT INITIAL. - - LOOP AT lt_res ASSIGNING FIELD-SYMBOL(). - IF -field3 > 1000. - APPEND VALUE #( %tky = -%tky - %fail-cause = if_abap_behv=>cause-disabled - ) - TO failed-root. - - APPEND VALUE #( %tky = -%tky - %msg = new_message_with_text( - severity = if_abap_behv_message=>severity-error - text = 'Validation failed!' ) - ) TO reported-root. - ENDIF. - ENDLOOP. - - ENDMETHOD. - -ENDCLASS.