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

Add call to set_original_object + cleanup

Browse Source
This commit is contained in:
Christian Günter 2017-11-05 10:06:34 +00:00
parent 6d6c4b8b36
commit 85ec8de2ec
1 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/zabapgit_object_enhs.prog.abap
View File

@ -60,7 +60,7 @@ CLASS lcl_object_enhs_hook_def DEFINITION.
INTERFACES: lif_object_enhs. INTERFACES: lif_object_enhs.
PRIVATE SECTION. PRIVATE SECTION.
TYPES: BEGIN OF ty_hook_def, TYPES: BEGIN OF ty_hook_defifnition,
pgmid TYPE pgmid, pgmid TYPE pgmid,
obj_name TYPE trobj_name, obj_name TYPE trobj_name,
obj_type TYPE trobjtype, obj_type TYPE trobjtype,
@ -68,7 +68,7 @@ CLASS lcl_object_enhs_hook_def DEFINITION.
main_name TYPE eu_aname, main_name TYPE eu_aname,
program TYPE progname, program TYPE progname,
def_hooks TYPE enh_hook_def_ext_it, def_hooks TYPE enh_hook_def_ext_it,
END OF ty_hook_def. END OF ty_hook_defifnition.
ENDCLASS. ENDCLASS.
@ -338,7 +338,7 @@ CLASS lcl_object_enhs_hook_def IMPLEMENTATION.
DATA: lv_enh_shorttext TYPE string, DATA: lv_enh_shorttext TYPE string,
ls_enh_hook_definition TYPE enh_hook_def, ls_enh_hook_definition TYPE enh_hook_def,
ls_hook_definition TYPE ty_hook_def, ls_hook_definition TYPE ty_hook_defifnition,
li_enh_object TYPE REF TO if_enh_object, li_enh_object TYPE REF TO if_enh_object,
li_enh_object_docu TYPE REF TO if_enh_object_docu, li_enh_object_docu TYPE REF TO if_enh_object_docu,
lo_hookdef_tool TYPE REF TO cl_enh_tool_hook_def, lo_hookdef_tool TYPE REF TO cl_enh_tool_hook_def,
@ -361,6 +361,13 @@ CLASS lcl_object_enhs_hook_def IMPLEMENTATION.
lo_hookdef_tool ?= ii_enh_spot_tool. lo_hookdef_tool ?= ii_enh_spot_tool.
lo_hookdef_tool->set_original_object( pgmid = ls_hook_definition-pgmid
obj_name = ls_hook_definition-obj_name
obj_type = ls_hook_definition-obj_type
program = ls_hook_definition-program
main_type = ls_hook_definition-main_type
main_name = ls_hook_definition-main_name ).
LOOP AT ls_hook_definition-def_hooks ASSIGNING <ls_hook_definition>. LOOP AT ls_hook_definition-def_hooks ASSIGNING <ls_hook_definition>.
MOVE-CORRESPONDING <ls_hook_definition> TO ls_enh_hook_definition. MOVE-CORRESPONDING <ls_hook_definition> TO ls_enh_hook_definition.
lo_hookdef_tool->add_hook_def( ls_enh_hook_definition ). lo_hookdef_tool->add_hook_def( ls_enh_hook_definition ).
@ -382,8 +389,7 @@ CLASS lcl_object_enhs_hook_def IMPLEMENTATION.
DATA: lo_hookdef_tool TYPE REF TO cl_enh_tool_hook_def, DATA: lo_hookdef_tool TYPE REF TO cl_enh_tool_hook_def,
lv_enh_shorttext TYPE string, lv_enh_shorttext TYPE string,
li_enh_object_docu TYPE REF TO if_enh_object_docu, li_enh_object_docu TYPE REF TO if_enh_object_docu,
lv_include_bound TYPE enhboolean, ls_hook_definition TYPE ty_hook_defifnition.
ls_hook_definition TYPE ty_hook_def.
lo_hookdef_tool ?= ii_enh_spot_tool. lo_hookdef_tool ?= ii_enh_spot_tool.
@ -391,7 +397,6 @@ CLASS lcl_object_enhs_hook_def IMPLEMENTATION.
lv_enh_shorttext = li_enh_object_docu->get_shorttext( ). lv_enh_shorttext = li_enh_object_docu->get_shorttext( ).
ls_hook_definition-def_hooks = lo_hookdef_tool->get_hook_defs( ). ls_hook_definition-def_hooks = lo_hookdef_tool->get_hook_defs( ).
lv_include_bound = lo_hookdef_tool->get_include_bound( ).
lo_hookdef_tool->get_original_object( lo_hookdef_tool->get_original_object(
IMPORTING IMPORTING