SCP1 jump

This commit is contained in:
Christian Guenter 2018-07-08 19:06:59 +00:00 committed by christianguenter2
parent e98dbffe92
commit 6dc1f30cea

View File

@ -41,7 +41,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_SCP1 IMPLEMENTATION.
CLASS zcl_abapgit_object_scp1 IMPLEMENTATION.
METHOD adjust_inbound.
@ -299,7 +299,17 @@ CLASS ZCL_ABAPGIT_OBJECT_SCP1 IMPLEMENTATION.
METHOD zif_abapgit_object~jump.
zcx_abapgit_exception=>raise( |TODO: Jump| ).
DATA: lv_display_only TYPE scpr_txt20,
lv_bcset_id TYPE scpr_id.
lv_display_only = abap_false.
lv_bcset_id = ms_item-obj_name.
EXPORT scpr3_display_only = lv_display_only
scpr3_bcset_id = lv_bcset_id
TO MEMORY ID 'SCPR3_PARAMETER'.
SUBMIT scpr3 AND RETURN.
ENDMETHOD.