From 514ddb91e7828cf1c4775c0d295108293f458994 Mon Sep 17 00:00:00 2001 From: larshp Date: Sat, 18 Feb 2017 12:56:09 +0000 Subject: [PATCH] SFBF SFBS SFSW: fix package popup --- src/zabapgit_object_sfbf.prog.abap | 3 +++ src/zabapgit_object_sfbs.prog.abap | 3 +++ src/zabapgit_object_sfsw.prog.abap | 4 ++++ 3 files changed, 10 insertions(+) diff --git a/src/zabapgit_object_sfbf.prog.abap b/src/zabapgit_object_sfbf.prog.abap index e9ff7e32b..83a73b3ad 100644 --- a/src/zabapgit_object_sfbf.prog.abap +++ b/src/zabapgit_object_sfbf.prog.abap @@ -208,7 +208,10 @@ CLASS lcl_object_sfbf IMPLEMENTATION. im_sfw_bfc_tc = ls_sfw_bfc_tc ). 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( ). + SET PARAMETER ID 'EUK' FIELD ''. lcl_objects_activation=>add_item( ms_item ). diff --git a/src/zabapgit_object_sfbs.prog.abap b/src/zabapgit_object_sfbs.prog.abap index f4930f6f6..bef654d9c 100644 --- a/src/zabapgit_object_sfbs.prog.abap +++ b/src/zabapgit_object_sfbs.prog.abap @@ -182,7 +182,10 @@ CLASS lcl_object_sfbs IMPLEMENTATION. lo_bfs->set_assigned_bfs( lt_nested_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( ). + SET PARAMETER ID 'EUK' FIELD ''. lcl_objects_activation=>add_item( ms_item ). diff --git a/src/zabapgit_object_sfsw.prog.abap b/src/zabapgit_object_sfsw.prog.abap index 5f4e6a73f..0892f359c 100644 --- a/src/zabapgit_object_sfsw.prog.abap +++ b/src/zabapgit_object_sfsw.prog.abap @@ -170,14 +170,18 @@ CLASS lcl_object_sfsw IMPLEMENTATION. lo_switch->set_parent_bf( lt_parent_bf ). 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( EXCEPTIONS not_saved = 1 OTHERS = 2 ). + SET PARAMETER ID 'EUK' FIELD ''. IF sy-subrc <> 0. lcx_exception=>raise( 'error in CL_SFW_SW->SAVE_ALL' ). ENDIF. + lcl_objects_activation=>add_item( ms_item ). ENDMETHOD. "deserialize