mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
Fix detection of SAP GUI for Windows (#5913)
This commit is contained in:
parent
54168655b5
commit
20e7c5f910
|
@ -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.
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user