abapGit/src/objects/enh/zcl_abapgit_object_enho_fugr.clas.abap
2022-10-06 10:17:22 +02:00

125 lines
3.1 KiB
ABAP

CLASS zcl_abapgit_object_enho_fugr DEFINITION PUBLIC.
PUBLIC SECTION.
METHODS: constructor
IMPORTING
is_item TYPE zif_abapgit_definitions=>ty_item
io_files TYPE REF TO zcl_abapgit_objects_files.
INTERFACES: zif_abapgit_object_enho.
PROTECTED SECTION.
PRIVATE SECTION.
DATA: ms_item TYPE zif_abapgit_definitions=>ty_item,
mo_files TYPE REF TO zcl_abapgit_objects_files.
ENDCLASS.
CLASS zcl_abapgit_object_enho_fugr IMPLEMENTATION.
METHOD constructor.
ms_item = is_item.
mo_files = io_files.
ENDMETHOD.
METHOD zif_abapgit_object_enho~deserialize.
DATA: lo_fugrdata TYPE REF TO cl_enh_tool_fugr,
ls_enha_data TYPE enhfugrdata,
li_tool TYPE REF TO if_enh_tool,
lv_tool TYPE enhtooltype,
lv_package TYPE devclass,
lx_enh_root TYPE REF TO cx_enh_root.
FIELD-SYMBOLS: <ls_fuba> TYPE enhfugrfuncdata.
ii_xml->read(
EXPORTING
iv_name = 'TOOL'
CHANGING
cg_data = lv_tool ).
ii_xml->read(
EXPORTING
iv_name = 'FUGRDATA'
CHANGING
cg_data = ls_enha_data ).
lv_package = iv_package.
TRY.
cl_enh_factory=>create_enhancement(
EXPORTING
enhname = |{ ms_item-obj_name }|
enhtype = ''
enhtooltype = lv_tool
IMPORTING
enhancement = li_tool
CHANGING
devclass = lv_package ).
lo_fugrdata ?= li_tool.
lo_fugrdata->set_fugr( ls_enha_data-fugr ).
LOOP AT ls_enha_data-enh_fubas ASSIGNING <ls_fuba>.
lo_fugrdata->set_func_data( func_name = <ls_fuba>-fuba
func_enhadata = <ls_fuba> ).
ENDLOOP.
lo_fugrdata->if_enh_object~save( run_dark = abap_true ).
lo_fugrdata->if_enh_object~unlock( ).
CATCH cx_enh_root INTO lx_enh_root.
TRY.
lo_fugrdata->if_enh_object~unlock( ).
CATCH cx_sy_ref_is_initial cx_enh_mod_not_allowed ##NO_HANDLER.
ENDTRY.
zcx_abapgit_exception=>raise_with_text( lx_enh_root ).
ENDTRY.
ENDMETHOD.
METHOD zif_abapgit_object_enho~serialize.
DATA: lo_fugrdata TYPE REF TO cl_enh_tool_fugr,
lv_fugr_name TYPE rs38l-area,
ls_enha_data TYPE enhfugrdata.
FIELD-SYMBOLS: <ls_docuobj> TYPE enhfugrparamdocu.
lo_fugrdata ?= ii_enh_tool.
lo_fugrdata->get_fugr( IMPORTING fugr_name = lv_fugr_name ).
TRY.
lo_fugrdata->get_all_data_for_fugr(
EXPORTING
fugr_name = lv_fugr_name
IMPORTING
enha_data = ls_enha_data ).
LOOP AT ls_enha_data-docuobjs ASSIGNING <ls_docuobj>.
CLEAR: <ls_docuobj>-shorttext,
<ls_docuobj>-longtext.
ENDLOOP.
CATCH cx_enh_not_found.
zcx_abapgit_exception=>raise( |error deserializing ENHO fugrdata { ms_item-obj_name }| ).
ENDTRY.
ii_xml->add( iv_name = 'TOOL'
ig_data = lo_fugrdata->if_enh_tool~get_tool( ) ).
ii_xml->add( iv_name = 'FUGRDATA'
ig_data = ls_enha_data ).
ENDMETHOD.
ENDCLASS.