From 5c826e59938e301668e6500541a1a5c995b4bbf9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Frederik=20Hud=C3=A1k?= <frederik.hudak@sap.com>
Date: Sat, 22 Aug 2020 14:39:39 +0200
Subject: [PATCH] Navigate to repo after new online (#3780)

* Navigate to repo after new online

* Update zcl_abapgit_gui_page_addonline.clas.abap
---
 src/ui/zcl_abapgit_gui_page_addonline.clas.abap | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/src/ui/zcl_abapgit_gui_page_addonline.clas.abap b/src/ui/zcl_abapgit_gui_page_addonline.clas.abap
index e82f99dda..d0fb96db9 100644
--- a/src/ui/zcl_abapgit_gui_page_addonline.clas.abap
+++ b/src/ui/zcl_abapgit_gui_page_addonline.clas.abap
@@ -47,7 +47,7 @@ CLASS zcl_abapgit_gui_page_addonline DEFINITION
 
     METHODS parse_form
       IMPORTING
-        it_post_data TYPE cnht_post_data_tab
+        it_post_data        TYPE cnht_post_data_tab
       RETURNING
         VALUE(ro_form_data) TYPE REF TO zcl_abapgit_string_map
       RAISING
@@ -55,7 +55,7 @@ CLASS zcl_abapgit_gui_page_addonline DEFINITION
 
     METHODS validate_form
       IMPORTING
-        io_form_data TYPE REF TO zcl_abapgit_string_map
+        io_form_data             TYPE REF TO zcl_abapgit_string_map
       RETURNING
         VALUE(ro_validation_log) TYPE REF TO zcl_abapgit_string_map
       RAISING
@@ -65,7 +65,7 @@ ENDCLASS.
 
 
 
-CLASS ZCL_ABAPGIT_GUI_PAGE_ADDONLINE IMPLEMENTATION.
+CLASS zcl_abapgit_gui_page_addonline IMPLEMENTATION.
 
 
   METHOD constructor.
@@ -167,7 +167,8 @@ CLASS ZCL_ABAPGIT_GUI_PAGE_ADDONLINE IMPLEMENTATION.
 
   METHOD zif_abapgit_gui_event_handler~on_event.
 
-    DATA ls_repo_params TYPE zif_abapgit_services_repo=>ty_repo_params.
+    DATA: ls_repo_params     TYPE zif_abapgit_services_repo=>ty_repo_params,
+          lo_new_online_repo TYPE REF TO zcl_abapgit_repo_online.
 
     mo_form_data = parse_form( it_postdata ). " import data from html before re-render
 
@@ -232,8 +233,11 @@ CLASS ZCL_ABAPGIT_GUI_PAGE_ADDONLINE IMPLEMENTATION.
 
         IF mo_validation_log->is_empty( ) = abap_true.
           mo_form_data->to_abap( CHANGING cs_container = ls_repo_params ).
-          zcl_abapgit_services_repo=>new_online( ls_repo_params ).
-          ev_state = zcl_abapgit_gui=>c_event_state-go_back.
+          lo_new_online_repo = zcl_abapgit_services_repo=>new_online( ls_repo_params ).
+          CREATE OBJECT ei_page TYPE zcl_abapgit_gui_page_view_repo
+            EXPORTING
+              iv_key = lo_new_online_repo->get_key( ).
+          ev_state = zcl_abapgit_gui=>c_event_state-new_page_replacing.
         ELSE.
           ev_state = zcl_abapgit_gui=>c_event_state-re_render. " Display errors
         ENDIF.