From 7357769944edac4c395a9aa0a03bd9d889877b50 Mon Sep 17 00:00:00 2001
From: larshp <larshp@hotmail.com>
Date: Sat, 10 Jun 2017 06:57:45 +0000
Subject: [PATCH] fix comment #773

---
 src/zabapgit_object_shi3.prog.abap | 76 ------------------------------
 1 file changed, 76 deletions(-)

diff --git a/src/zabapgit_object_shi3.prog.abap b/src/zabapgit_object_shi3.prog.abap
index 8e9ffbdec..255bcdf89 100644
--- a/src/zabapgit_object_shi3.prog.abap
+++ b/src/zabapgit_object_shi3.prog.abap
@@ -36,17 +36,6 @@ CLASS lcl_object_shi3 DEFINITION INHERITING FROM lcl_objects_super FINAL.
       CHANGING cs_head  TYPE ttree
                ct_nodes TYPE hier_iface_t.
 
-*    METHODS regenerate_ids
-*      CHANGING ct_nodes TYPE hier_iface_t
-*               ct_refs  TYPE hier_ref_t
-*               ct_texts TYPE hier_texts_t
-*      RAISING  lcx_exception.
-*
-*    METHODS replace_id
-*      IMPORTING iv_id            TYPE clike
-*      RETURNING VALUE(rv_new_id) TYPE ttree-id
-*      RAISING   lcx_exception.
-
 ENDCLASS.                    "lcl_object_shi3 DEFINITION
 
 *----------------------------------------------------------------------*
@@ -222,67 +211,6 @@ CLASS lcl_object_shi3 IMPLEMENTATION.
 
   ENDMETHOD.                    "strip_stamps
 
-*  METHOD regenerate_ids.
-*
-*    DATA: ls_uid TYPE sys_uid,
-*          lt_map TYPE tt_id_map.
-*
-*    FIELD-SYMBOLS: <ls_node> LIKE LINE OF ct_nodes,
-*                   <ls_ref>  LIKE LINE OF ct_refs,
-*                   <ls_text> LIKE LINE OF ct_texts,
-*                   <ls_map>  LIKE LINE OF mt_map.
-*
-*    "Build map
-*    LOOP AT ct_nodes ASSIGNING <ls_node>.
-*      APPEND INITIAL LINE TO lt_map ASSIGNING <ls_map>.
-*      IF <ls_node>-parent_id IS INITIAL.
-*        <ls_map>-old = <ls_node>-node_id.
-*        <ls_map>-new = <ls_node>-node_id. "Root node
-*      ELSE.
-*        CALL FUNCTION 'STREE_GET_UNIQUE_ID'
-*          IMPORTING
-*            unique_id = ls_uid.
-*
-*        <ls_map>-old = <ls_node>-node_id.
-*        <ls_map>-new = ls_uid-id.
-*      ENDIF.
-*      <ls_node>-node_id = <ls_map>-new. "Replace id
-*    ENDLOOP.
-*
-*    mt_map = lt_map. "Sort
-*
-*    LOOP AT ct_nodes ASSIGNING <ls_node>.
-*      <ls_node>-parent_id  = replace_id( <ls_node>-parent_id ).
-*      <ls_node>-brother_id = replace_id( <ls_node>-brother_id ).
-*    ENDLOOP.
-*
-*    LOOP AT ct_refs ASSIGNING <ls_ref>.
-*      <ls_ref>-node_id = replace_id( <ls_ref>-node_id ).
-*    ENDLOOP.
-*
-*    LOOP AT ct_texts ASSIGNING <ls_text>.
-*      <ls_text>-node_id = replace_id( <ls_text>-node_id ).
-*    ENDLOOP.
-*
-*  ENDMETHOD.                    "regenerate_ids
-*
-*  METHOD replace_id.
-*
-*    DATA ls_map LIKE LINE OF mt_map.
-*
-*    IF iv_id IS INITIAL.
-*      RETURN. "No substitution for empty values
-*    ENDIF.
-*
-*    READ TABLE mt_map WITH TABLE KEY old = iv_id INTO ls_map.
-*    IF sy-subrc <> 0.
-*      lcx_exception=>raise( 'Cannot replace id, SHI3' ).
-*    ENDIF.
-*
-*    rv_new_id = ls_map-new.
-*
-*  ENDMETHOD.                    "replace_id
-
   METHOD lif_object~deserialize.
 
     DATA: ls_msg    TYPE hier_mess,
@@ -303,10 +231,6 @@ CLASS lcl_object_shi3 IMPLEMENTATION.
     io_xml->read( EXPORTING iv_name = 'TREE_TEXTS'
                   CHANGING  cg_data = lt_texts ).
 
-*    regenerate_ids( CHANGING ct_nodes = lt_nodes
-*                             ct_refs  = lt_refs
-*                             ct_texts = lt_texts ).
-
     IF lif_object~exists( ) = abap_true.
       lif_object~delete( ).
     ENDIF.