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

SFBF SFBS SFSW: fix package popup

Browse Source
This commit is contained in:
larshp 2017-02-18 12:56:09 +00:00
parent d0b0cd0dba
commit 514ddb91e7
3 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/zabapgit_object_sfbf.prog.abap
View File

@ -208,7 +208,10 @@ CLASS lcl_object_sfbf IMPLEMENTATION.
im_sfw_bfc_tc = ls_sfw_bfc_tc ). im_sfw_bfc_tc = ls_sfw_bfc_tc ).
lo_bf->set_parent_bfs( lt_parent_bfs ). lo_bf->set_parent_bfs( lt_parent_bfs ).
* magic, see function module RS_CORR_INSERT, FORM get_current_devclass
SET PARAMETER ID 'EUK' FIELD iv_package.
lo_bf->save_all( ). lo_bf->save_all( ).
SET PARAMETER ID 'EUK' FIELD ''.
lcl_objects_activation=>add_item( ms_item ). lcl_objects_activation=>add_item( ms_item ).

3
src/zabapgit_object_sfbs.prog.abap
View File

@ -182,7 +182,10 @@ CLASS lcl_object_sfbs IMPLEMENTATION.
lo_bfs->set_assigned_bfs( lt_nested_bfs ). lo_bfs->set_assigned_bfs( lt_nested_bfs ).
lo_bfs->set_nested_parent( lt_parent_bfs ). lo_bfs->set_nested_parent( lt_parent_bfs ).
* magic, see function module RS_CORR_INSERT, FORM get_current_devclass
SET PARAMETER ID 'EUK' FIELD iv_package.
lo_bfs->save_all( ). lo_bfs->save_all( ).
SET PARAMETER ID 'EUK' FIELD ''.
lcl_objects_activation=>add_item( ms_item ). lcl_objects_activation=>add_item( ms_item ).

4
src/zabapgit_object_sfsw.prog.abap
View File

@ -170,14 +170,18 @@ CLASS lcl_object_sfsw IMPLEMENTATION.
lo_switch->set_parent_bf( lt_parent_bf ). lo_switch->set_parent_bf( lt_parent_bf ).
lo_switch->set_conflicts( lt_conflicts ). lo_switch->set_conflicts( lt_conflicts ).
* magic, see function module RS_CORR_INSERT, FORM get_current_devclass
SET PARAMETER ID 'EUK' FIELD iv_package.
lo_switch->save_all( lo_switch->save_all(
EXCEPTIONS EXCEPTIONS
not_saved = 1 not_saved = 1
OTHERS = 2 ). OTHERS = 2 ).
SET PARAMETER ID 'EUK' FIELD ''.
IF sy-subrc <> 0. IF sy-subrc <> 0.
lcx_exception=>raise( 'error in CL_SFW_SW->SAVE_ALL' ). lcx_exception=>raise( 'error in CL_SFW_SW->SAVE_ALL' ).
ENDIF. ENDIF.
lcl_objects_activation=>add_item( ms_item ). lcl_objects_activation=>add_item( ms_item ).
ENDMETHOD. "deserialize ENDMETHOD. "deserialize