SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

method descriptions

Browse Source
This commit is contained in:
larshp 2016-12-03 09:06:16 +00:00
parent 988a6b1b90
commit fdb5dd89af
1 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/zabapgit_object_clas.prog.abap
View File

@ -21,6 +21,8 @@ CLASS lcl_object_clas DEFINITION INHERITING FROM lcl_objects_program.
TYPES: ty_sotr_tt TYPE STANDARD TABLE OF ty_sotr WITH DEFAULT KEY.
TYPES: ty_seocompotx_tt TYPE STANDARD TABLE OF seocompotx WITH DEFAULT KEY.
DATA mv_skip_testclass TYPE abap_bool.
METHODS deserialize_abap
@ -621,6 +623,7 @@ CLASS lcl_object_clas IMPLEMENTATION.
lt_tpool TYPE textpool_table,
lv_object TYPE dokhl-object,
lv_state TYPE dokhl-dokstate,
lt_seocompotx TYPE ty_seocompotx_tt,
ls_vseointerf TYPE vseointerf,
ls_clskey TYPE seoclskey,
lt_sotr TYPE ty_sotr_tt,
@ -712,6 +715,14 @@ CLASS lcl_object_clas IMPLEMENTATION.
ig_data = lt_lines ).
ENDIF.
SELECT * FROM seocompotx INTO TABLE lt_seocompotx
WHERE clsname = ls_clskey-clsname.
DELETE lt_seocompotx WHERE descript IS INITIAL.
IF lines( lt_seocompotx ) > 0.
io_xml->add( iv_name = 'DESCRIPTIONS'
ig_data = lt_seocompotx ).
ENDIF.
ENDMETHOD. "serialize_xml
METHOD lif_object~deserialize.
@ -878,6 +889,7 @@ CLASS lcl_object_clas IMPLEMENTATION.
lt_locals_imp TYPE seop_source_string,
lt_locals_mac TYPE seop_source_string,
lt_testclasses TYPE seop_source_string,
lt_seocompotx TYPE ty_seocompotx_tt,
ls_clskey TYPE seoclskey.
@ -977,6 +989,11 @@ CLASS lcl_object_clas IMPLEMENTATION.
it_source = lt_source ).
ENDTRY.
io_xml->read( EXPORTING iv_name = 'DESCRIPTIONS'
CHANGING cg_data = lt_seocompotx ).
DELETE FROM seocompotx WHERE clsname = ls_clskey-clsname.
INSERT seocompotx FROM TABLE lt_seocompotx.
lcl_objects_activation=>add_item( ms_item ).
ENDMETHOD. "deserialize