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

fix TADIR deletion, close #114

Browse Source
This commit is contained in:
larshp 2016-09-17 07:09:29 +00:00
parent 7719fa3d44
commit 93836053e9
6 changed files with 21 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/zabapgit_definitions.prog.abap
View File

@ -36,9 +36,10 @@ TYPES: BEGIN OF ty_file_item,
TYPES: ty_files_item_tt TYPE STANDARD TABLE OF ty_file_item WITH DEFAULT KEY.
TYPES: BEGIN OF ty_metadata,
class TYPE string,
version TYPE string,
late_deser TYPE string,
class TYPE string,
version TYPE string,
late_deser TYPE string,
delete_tadir TYPE abap_bool,
END OF ty_metadata.
TYPES: BEGIN OF ty_web_asset,

1
src/zabapgit_object_doct.prog.abap
View File

@ -34,6 +34,7 @@ CLASS lcl_object_doct IMPLEMENTATION.
METHOD lif_object~get_metadata.
rs_metadata = get_metadata( ).
rs_metadata-delete_tadir = abap_true.
ENDMETHOD. "lif_object~get_metadata
METHOD read.

1
src/zabapgit_object_docv.prog.abap
View File

@ -61,6 +61,7 @@ CLASS lcl_object_docv IMPLEMENTATION.
METHOD lif_object~get_metadata.
rs_metadata = get_metadata( ).
rs_metadata-delete_tadir = abap_true.
ENDMETHOD. "lif_object~get_metadata
METHOD lif_object~exists.

1
src/zabapgit_object_splo.prog.abap
View File

@ -34,6 +34,7 @@ CLASS lcl_object_splo IMPLEMENTATION.
METHOD lif_object~get_metadata.
rs_metadata = get_metadata( ).
rs_metadata-delete_tadir = abap_true.
ENDMETHOD. "lif_object~get_metadata
METHOD lif_object~serialize.

1
src/zabapgit_object_ssfo.prog.abap
View File

@ -34,6 +34,7 @@ CLASS lcl_object_ssfo IMPLEMENTATION.
METHOD lif_object~get_metadata.
rs_metadata = get_metadata( ).
rs_metadata-delete_tadir = abap_true.
ENDMETHOD. "lif_object~get_metadata
METHOD lif_object~exists.

15
src/zabapgit_objects_impl.prog.abap
View File

@ -51,7 +51,7 @@ CLASS lcl_objects IMPLEMENTATION.
titlebar = 'Warning'
text_question = lv_question
display_cancel_button = abap_false
). "#EC NOTEXT
). "#EC NOTEXT
IF lv_answer = '2'.
DELETE ct_results INDEX lv_index.
@ -86,7 +86,7 @@ CLASS lcl_objects IMPLEMENTATION.
icon_button_2 = 'ICON_CANCEL'
default_button = '2'
display_cancel_button = abap_false
). "#EC NOTEXT
). "#EC NOTEXT
IF lv_answer = '2'.
rv_cancel = abap_true.
@ -485,7 +485,18 @@ CLASS lcl_objects IMPLEMENTATION.
IF is_supported( is_item ) = abap_true.
li_obj = create_object( is_item = is_item
iv_language = gc_english ).
li_obj->delete( ).
IF li_obj->get_metadata( )-delete_tadir = abap_true.
CALL FUNCTION 'TR_TADIR_INTERFACE'
EXPORTING
wi_delete_tadir_entry = abap_true
wi_tadir_pgmid = 'R3TR'
wi_tadir_object = is_item-obj_type
wi_tadir_obj_name = is_item-obj_name
wi_test_modus = abap_false.
ENDIF.
ENDIF.
ENDMETHOD. "delete