From 6c0df0f5bd137bd09c781cf088600394e0b4aa3a Mon Sep 17 00:00:00 2001
From: Fabian Lupa <fabian@lupa.dev>
Date: Fri, 20 Nov 2020 16:51:26 +0100
Subject: [PATCH] Support JUMP in SHI3 for GHIER (#4209)

---
 src/objects/zcl_abapgit_object_shi3.clas.abap | 31 +++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/src/objects/zcl_abapgit_object_shi3.clas.abap b/src/objects/zcl_abapgit_object_shi3.clas.abap
index 8f692a7c0..d64539eb2 100644
--- a/src/objects/zcl_abapgit_object_shi3.clas.abap
+++ b/src/objects/zcl_abapgit_object_shi3.clas.abap
@@ -32,6 +32,9 @@ CLASS zcl_abapgit_object_shi3 DEFINITION PUBLIC INHERITING FROM zcl_abapgit_obje
     METHODS jump_se43
       RAISING zcx_abapgit_exception.
 
+    METHODS jump_sbach04
+      RAISING zcx_abapgit_exception.
+
     METHODS clear_fields
       CHANGING cs_head  TYPE ttree
                ct_nodes TYPE hier_iface_t.
@@ -147,6 +150,32 @@ CLASS zcl_abapgit_object_shi3 IMPLEMENTATION.
 
   ENDMETHOD.
 
+  METHOD jump_sbach04.
+    DATA: ls_message      TYPE hier_mess,
+          lv_structure_id TYPE hier_treeg.
+
+    lv_structure_id = ms_item-obj_name.
+
+    CALL FUNCTION 'STREE_EXTERNAL_EDIT'
+      EXPORTING
+        structure_id   = lv_structure_id
+        language       = mv_language
+        edit_structure = abap_false
+        no_commit_work = abap_false
+        activity       = 'D'
+      IMPORTING
+        message        = ls_message.
+    IF ls_message IS NOT INITIAL.
+      zcx_abapgit_exception=>raise_t100(
+        iv_msgid = ls_message-msgid
+        iv_msgno = ls_message-msgno
+        iv_msgv1 = ls_message-msgv1
+        iv_msgv2 = ls_message-msgv2
+        iv_msgv3 = ls_message-msgv3
+        iv_msgv4 = ls_message-msgv4 ).
+    ENDIF.
+  ENDMETHOD.
+
 
   METHOD zif_abapgit_object~changed_by.
 
@@ -294,6 +323,8 @@ CLASS zcl_abapgit_object_shi3 IMPLEMENTATION.
     CASE ls_head-type.
       WHEN 'BMENU'.
         jump_se43( ).
+      WHEN 'GHIER'.
+        jump_sbach04( ).
       WHEN OTHERS.
         zcx_abapgit_exception=>raise( |Jump for type { ls_head-type } not implemented| ).
     ENDCASE.