mirror of
https://github.com/abapGit/abapGit.git
synced 2025-04-30 20:03:20 +08:00
Merge pull request #1041 from christianguenter2/ENHS_HOOK_DEF
ENHS: Fix add call to set_original_object + cleanup
This commit is contained in:
commit
d88d5d5af4
|
@ -60,7 +60,7 @@ CLASS lcl_object_enhs_hook_def DEFINITION.
|
|||
INTERFACES: lif_object_enhs.
|
||||
|
||||
PRIVATE SECTION.
|
||||
TYPES: BEGIN OF ty_hook_def,
|
||||
TYPES: BEGIN OF ty_hook_defifnition,
|
||||
pgmid TYPE pgmid,
|
||||
obj_name TYPE trobj_name,
|
||||
obj_type TYPE trobjtype,
|
||||
|
@ -68,7 +68,7 @@ CLASS lcl_object_enhs_hook_def DEFINITION.
|
|||
main_name TYPE eu_aname,
|
||||
program TYPE progname,
|
||||
def_hooks TYPE enh_hook_def_ext_it,
|
||||
END OF ty_hook_def.
|
||||
END OF ty_hook_defifnition.
|
||||
|
||||
ENDCLASS.
|
||||
|
||||
|
@ -338,7 +338,7 @@ CLASS lcl_object_enhs_hook_def IMPLEMENTATION.
|
|||
|
||||
DATA: lv_enh_shorttext TYPE string,
|
||||
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_docu TYPE REF TO if_enh_object_docu,
|
||||
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->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>.
|
||||
MOVE-CORRESPONDING <ls_hook_definition> TO 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,
|
||||
lv_enh_shorttext TYPE string,
|
||||
li_enh_object_docu TYPE REF TO if_enh_object_docu,
|
||||
lv_include_bound TYPE enhboolean,
|
||||
ls_hook_definition TYPE ty_hook_def.
|
||||
ls_hook_definition TYPE ty_hook_defifnition.
|
||||
|
||||
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( ).
|
||||
|
||||
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(
|
||||
IMPORTING
|
||||
|
|
Loading…
Reference in New Issue
Block a user