From 20e7c5f910982095477fb86a743026c590a4eb99 Mon Sep 17 00:00:00 2001
From: Marc Bernard <59966492+mbtools@users.noreply.github.com>
Date: Sat, 3 Dec 2022 10:58:25 -0500
Subject: [PATCH] Fix detection of SAP GUI for Windows (#5913)

---
 .../zcl_abapgit_frontend_services.clas.abap   | 29 ++-----------------
 1 file changed, 3 insertions(+), 26 deletions(-)

diff --git a/src/ui/zcl_abapgit_frontend_services.clas.abap b/src/ui/zcl_abapgit_frontend_services.clas.abap
index 94f2cb078..be25ef209 100644
--- a/src/ui/zcl_abapgit_frontend_services.clas.abap
+++ b/src/ui/zcl_abapgit_frontend_services.clas.abap
@@ -324,32 +324,9 @@ CLASS zcl_abapgit_frontend_services IMPLEMENTATION.
 
   METHOD zif_abapgit_frontend_services~is_sapgui_for_windows.
 
-    DATA: lv_platform TYPE i.
-
-    cl_gui_frontend_services=>get_platform(
-      RECEIVING
-        platform             = lv_platform
-      EXCEPTIONS
-        error_no_gui         = 1
-        cntl_error           = 2
-        not_supported_by_gui = 3
-        OTHERS               = 4 ).
-    IF sy-subrc <> 0.
-      rv_result = abap_false.
-    ENDIF.
-
-    CASE lv_platform.
-      WHEN cl_gui_frontend_services=>platform_nt351 OR
-           cl_gui_frontend_services=>platform_nt40 OR
-           cl_gui_frontend_services=>platform_nt50 OR
-           cl_gui_frontend_services=>platform_windows95 OR
-           cl_gui_frontend_services=>platform_windows98 OR
-           cl_gui_frontend_services=>platform_windowsxp.
-        " Everything after Windows XP is reported as Windows XP
-        rv_result = abap_true.
-      WHEN OTHERS.
-        rv_result = abap_false.
-    ENDCASE.
+    CALL FUNCTION 'GUI_HAS_ACTIVEX'
+      IMPORTING
+        return = rv_result.
 
   ENDMETHOD.