From e820c2e8203424aa45a96d84fa63f4d735f12761 Mon Sep 17 00:00:00 2001
From: atsy <atsybulsky@sbcg.com.ua>
Date: Thu, 9 Jun 2016 19:15:25 +0300
Subject: [PATCH] #241, move FORM run IF to lcl_app=>run()

---
 zabapgit.prog.abap | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/zabapgit.prog.abap b/zabapgit.prog.abap
index 54961d12a..3ebbdce16 100644
--- a/zabapgit.prog.abap
+++ b/zabapgit.prog.abap
@@ -21029,7 +21029,12 @@ CLASS lcl_app IMPLEMENTATION.
 
   METHOD run.
 
-    gui( )->go_home( ).
+    IF sy-batch = abap_true.
+      lcl_background=>run( ).
+    ELSE.
+      gui( )->go_home( ).
+      CALL SELECTION-SCREEN 1001. " trigger screen
+    ENDIF.
 
   ENDMETHOD.      "run
 
@@ -21096,13 +21101,7 @@ FORM run.
 
   TRY.
       lcl_persistence_migrate=>run( ).
-
-      IF sy-batch = abap_true.
-        lcl_background=>run( ).
-      ELSE.
-        lcl_app=>run( ).
-        CALL SELECTION-SCREEN 1001. " trigger screen
-      ENDIF.
+      lcl_app=>run( ).
     CATCH lcx_exception INTO lx_exception.
       MESSAGE lx_exception->mv_text TYPE 'E'.
   ENDTRY.