ENHO: wdyconf downport

This commit is contained in:
larshp 2017-01-19 11:27:22 +01:00
parent 4663ef734c
commit 1e4884be59

View File

@ -16,8 +16,13 @@ INTERFACE lif_object_enho.
ii_enh_tool TYPE REF TO if_enh_tool ii_enh_tool TYPE REF TO if_enh_tool
RAISING lcx_exception. RAISING lcx_exception.
ENDINTERFACE. ENDINTERFACE. "lif_object_enho
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_wdyconf DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_wdyconf DEFINITION. CLASS lcl_object_enho_wdyconf DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
@ -31,14 +36,19 @@ CLASS lcl_object_enho_wdyconf DEFINITION.
DATA: ms_item TYPE ty_item, DATA: ms_item TYPE ty_item,
mo_files TYPE REF TO lcl_objects_files. mo_files TYPE REF TO lcl_objects_files.
ENDCLASS. ENDCLASS. "lcl_object_enho_wdyconf DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_wdyconf IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_wdyconf IMPLEMENTATION. CLASS lcl_object_enho_wdyconf IMPLEMENTATION.
METHOD constructor. METHOD constructor.
ms_item = is_item. ms_item = is_item.
mo_files = io_files. mo_files = io_files.
ENDMETHOD. ENDMETHOD. "constructor
METHOD lif_object_enho~deserialize. METHOD lif_object_enho~deserialize.
@ -78,7 +88,7 @@ CLASS lcl_object_enho_wdyconf IMPLEMENTATION.
lcx_exception=>raise( 'error deserializing ENHO wdyconf' ). lcx_exception=>raise( 'error deserializing ENHO wdyconf' ).
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD. "lif_object_enho~deserialize
METHOD lif_object_enho~serialize. METHOD lif_object_enho~serialize.
@ -98,29 +108,35 @@ CLASS lcl_object_enho_wdyconf IMPLEMENTATION.
io_xml->add( iv_name = 'ORIGINAL_OBJECT' io_xml->add( iv_name = 'ORIGINAL_OBJECT'
ig_data = ls_obj ). ig_data = ls_obj ).
lo_wdyconf->get_enhancement_data( * only works on new ABAP versions, parameters differ between versions
CALL METHOD lo_wdyconf->('GET_ENHANCEMENT_DATA')
EXPORTING EXPORTING
p_scope = 1 p_scope = 1
IMPORTING IMPORTING
p_enh_data = lt_data ). p_enh_data = lt_data.
cl_wdr_cfg_persistence_utils=>comp_tables_to_xml( CALL METHOD cl_wdr_cfg_persistence_utils=>('COMP_TABLES_TO_XML')
EXPORTING EXPORTING
outline_data = ls_outline outline_data = ls_outline
expl_data_tab = lt_data expl_data_tab = lt_data
IMPORTING IMPORTING
element = li_element element = li_element
CHANGING CHANGING
document = li_document ). document = li_document.
io_xml->add_xml( iv_name = 'ENHANCEMENT_DATA' io_xml->add_xml( iv_name = 'ENHANCEMENT_DATA'
ii_xml = li_element ). ii_xml = li_element ).
ENDMETHOD. ENDMETHOD. "lif_object_enho~serialize
ENDCLASS. ENDCLASS. "lcl_object_enho_wdyconf IMPLEMENTATION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_clif DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_clif DEFINITION. CLASS lcl_object_enho_clif DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
@ -142,8 +158,13 @@ CLASS lcl_object_enho_clif DEFINITION.
io_clif TYPE REF TO cl_enh_tool_clif io_clif TYPE REF TO cl_enh_tool_clif
RAISING lcx_exception. RAISING lcx_exception.
ENDCLASS. ENDCLASS. "lcl_object_enho_clif DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_clif IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_clif IMPLEMENTATION. CLASS lcl_object_enho_clif IMPLEMENTATION.
METHOD serialize_includes. METHOD serialize_includes.
@ -179,7 +200,7 @@ CLASS lcl_object_enho_clif IMPLEMENTATION.
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.
ENDMETHOD. ENDMETHOD. "serialize_includes
METHOD serialize. METHOD serialize.
@ -221,7 +242,7 @@ CLASS lcl_object_enho_clif IMPLEMENTATION.
io_xml->add( iv_name = 'TAB_METHODS' io_xml->add( iv_name = 'TAB_METHODS'
ig_data = lt_tab_methods ). ig_data = lt_tab_methods ).
ENDMETHOD. ENDMETHOD. "serialize
METHOD deserialize. METHOD deserialize.
@ -273,10 +294,15 @@ CLASS lcl_object_enho_clif IMPLEMENTATION.
ENDLOOP. ENDLOOP.
ENDMETHOD. ENDMETHOD. "deserialize
ENDCLASS. ENDCLASS. "lcl_object_enho_clif IMPLEMENTATION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_badi DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_badi DEFINITION. CLASS lcl_object_enho_badi DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
@ -290,14 +316,19 @@ CLASS lcl_object_enho_badi DEFINITION.
DATA: ms_item TYPE ty_item, DATA: ms_item TYPE ty_item,
mo_files TYPE REF TO lcl_objects_files. mo_files TYPE REF TO lcl_objects_files.
ENDCLASS. ENDCLASS. "lcl_object_enho_badi DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_badi IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_badi IMPLEMENTATION. CLASS lcl_object_enho_badi IMPLEMENTATION.
METHOD constructor. METHOD constructor.
ms_item = is_item. ms_item = is_item.
mo_files = io_files. mo_files = io_files.
ENDMETHOD. ENDMETHOD. "constructor
METHOD lif_object_enho~serialize. METHOD lif_object_enho~serialize.
@ -340,7 +371,7 @@ CLASS lcl_object_enho_badi IMPLEMENTATION.
io_xml->add( iv_name = 'IMPL' io_xml->add( iv_name = 'IMPL'
ig_data = lt_impl ). ig_data = lt_impl ).
ENDMETHOD. ENDMETHOD. "lif_object_enho~serialize
METHOD lif_object_enho~deserialize. METHOD lif_object_enho~deserialize.
@ -387,10 +418,15 @@ CLASS lcl_object_enho_badi IMPLEMENTATION.
lcx_exception=>raise( 'error deserializing ENHO badi' ). lcx_exception=>raise( 'error deserializing ENHO badi' ).
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD. "lif_object_enho~deserialize
ENDCLASS. ENDCLASS. "lcl_object_enho_badi IMPLEMENTATION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_hook DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_hook DEFINITION. CLASS lcl_object_enho_hook DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
METHODS: constructor METHODS: constructor
@ -421,14 +457,19 @@ CLASS lcl_object_enho_hook DEFINITION.
CHANGING ct_impl TYPE enh_hook_impl_it CHANGING ct_impl TYPE enh_hook_impl_it
RAISING lcx_exception. RAISING lcx_exception.
ENDCLASS. ENDCLASS. "lcl_object_enho_hook DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_hook IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_hook IMPLEMENTATION. CLASS lcl_object_enho_hook IMPLEMENTATION.
METHOD constructor. METHOD constructor.
ms_item = is_item. ms_item = is_item.
mo_files = io_files. mo_files = io_files.
ENDMETHOD. ENDMETHOD. "constructor
METHOD lif_object_enho~serialize. METHOD lif_object_enho~serialize.
@ -468,7 +509,7 @@ CLASS lcl_object_enho_hook IMPLEMENTATION.
io_xml->add( iv_name = 'SPACES' io_xml->add( iv_name = 'SPACES'
ig_data = lt_spaces ). ig_data = lt_spaces ).
ENDMETHOD. ENDMETHOD. "lif_object_enho~serialize
METHOD hook_impl_serialize. METHOD hook_impl_serialize.
* handle normalization of XML values * handle normalization of XML values
@ -491,7 +532,7 @@ CLASS lcl_object_enho_hook IMPLEMENTATION.
ENDWHILE. ENDWHILE.
ENDLOOP. ENDLOOP.
ENDLOOP. ENDLOOP.
ENDMETHOD. ENDMETHOD. "hook_impl_serialize
METHOD hook_impl_deserialize. METHOD hook_impl_deserialize.
@ -515,7 +556,7 @@ CLASS lcl_object_enho_hook IMPLEMENTATION.
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.
ENDMETHOD. ENDMETHOD. "hook_impl_deserialize
METHOD lif_object_enho~deserialize. METHOD lif_object_enho~deserialize.
@ -583,10 +624,15 @@ CLASS lcl_object_enho_hook IMPLEMENTATION.
lcx_exception=>raise( 'error deserializing ENHO hook' ). lcx_exception=>raise( 'error deserializing ENHO hook' ).
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD. "lif_object_enho~deserialize
ENDCLASS. ENDCLASS. "lcl_object_enho_hook IMPLEMENTATION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_interface DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_interface DEFINITION. CLASS lcl_object_enho_interface DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
@ -601,14 +647,19 @@ CLASS lcl_object_enho_interface DEFINITION.
DATA: ms_item TYPE ty_item, DATA: ms_item TYPE ty_item,
mo_files TYPE REF TO lcl_objects_files. mo_files TYPE REF TO lcl_objects_files.
ENDCLASS. ENDCLASS. "lcl_object_enho_interface DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_interface IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_interface IMPLEMENTATION. CLASS lcl_object_enho_interface IMPLEMENTATION.
METHOD constructor. METHOD constructor.
ms_item = is_item. ms_item = is_item.
mo_files = io_files. mo_files = io_files.
ENDMETHOD. ENDMETHOD. "constructor
METHOD lif_object_enho~serialize. METHOD lif_object_enho~serialize.
@ -634,7 +685,7 @@ CLASS lcl_object_enho_interface IMPLEMENTATION.
io_files = mo_files io_files = mo_files
io_clif = lo_enh_intf ). io_clif = lo_enh_intf ).
ENDMETHOD. ENDMETHOD. "lif_object_enho~serialize
METHOD lif_object_enho~deserialize. METHOD lif_object_enho~deserialize.
@ -679,10 +730,15 @@ CLASS lcl_object_enho_interface IMPLEMENTATION.
lcx_exception=>raise( 'error deserializing ENHO interface' ). lcx_exception=>raise( 'error deserializing ENHO interface' ).
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD. "lif_object_enho~deserialize
ENDCLASS. ENDCLASS. "lcl_object_enho_interface IMPLEMENTATION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_class DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_class DEFINITION. CLASS lcl_object_enho_class DEFINITION.
PUBLIC SECTION. PUBLIC SECTION.
@ -697,14 +753,19 @@ CLASS lcl_object_enho_class DEFINITION.
DATA: ms_item TYPE ty_item. DATA: ms_item TYPE ty_item.
DATA: mo_files TYPE REF TO lcl_objects_files. DATA: mo_files TYPE REF TO lcl_objects_files.
ENDCLASS. ENDCLASS. "lcl_object_enho_class DEFINITION
*----------------------------------------------------------------------*
* CLASS lcl_object_enho_class IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS lcl_object_enho_class IMPLEMENTATION. CLASS lcl_object_enho_class IMPLEMENTATION.
METHOD constructor. METHOD constructor.
ms_item = is_item. ms_item = is_item.
mo_files = io_files. mo_files = io_files.
ENDMETHOD. ENDMETHOD. "constructor
METHOD lif_object_enho~serialize. METHOD lif_object_enho~serialize.
@ -746,7 +807,7 @@ CLASS lcl_object_enho_class IMPLEMENTATION.
io_files = mo_files io_files = mo_files
io_clif = lo_enh_class ). io_clif = lo_enh_class ).
ENDMETHOD. ENDMETHOD. "lif_object_enho~serialize
METHOD lif_object_enho~deserialize. METHOD lif_object_enho~deserialize.
@ -809,9 +870,9 @@ CLASS lcl_object_enho_class IMPLEMENTATION.
lcx_exception=>raise( 'error deserializing ENHO class' ). lcx_exception=>raise( 'error deserializing ENHO class' ).
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD. "lif_object_enho~deserialize
ENDCLASS. ENDCLASS. "lcl_object_enho_class IMPLEMENTATION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS lcl_object_enho DEFINITION * CLASS lcl_object_enho DEFINITION
@ -831,7 +892,7 @@ CLASS lcl_object_enho DEFINITION INHERITING FROM lcl_objects_super FINAL.
IMPORTING IMPORTING
iv_tool TYPE enhtooltype iv_tool TYPE enhtooltype
RETURNING RETURNING
VALUE(ri_enho) TYPE REF TO lif_object_enho value(ri_enho) TYPE REF TO lif_object_enho
RAISING RAISING
lcx_exception. lcx_exception.
@ -854,7 +915,7 @@ CLASS lcl_object_enho IMPLEMENTATION.
METHOD lif_object~changed_by. METHOD lif_object~changed_by.
rv_user = c_user_unknown. " todo rv_user = c_user_unknown. " todo
ENDMETHOD. ENDMETHOD. "lif_object~changed_by
METHOD lif_object~exists. METHOD lif_object~exists.
@ -935,7 +996,7 @@ CLASS lcl_object_enho IMPLEMENTATION.
lcx_exception=>raise( |Unsupported ENHO type { iv_tool }| ). lcx_exception=>raise( |Unsupported ENHO type { iv_tool }| ).
ENDCASE. ENDCASE.
ENDMETHOD. ENDMETHOD. "factory
METHOD lif_object~deserialize. METHOD lif_object~deserialize.
@ -992,6 +1053,6 @@ CLASS lcl_object_enho IMPLEMENTATION.
METHOD lif_object~compare_to_remote_version. METHOD lif_object~compare_to_remote_version.
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result. CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
ENDMETHOD. ENDMETHOD. "lif_object~compare_to_remote_version
ENDCLASS. "lcl_object_enho IMPLEMENTATION ENDCLASS. "lcl_object_enho IMPLEMENTATION