From 4cdb04c2c718aa05fd570390ef807366a590459f Mon Sep 17 00:00:00 2001
From: Marc Bernard <59966492+mbtools@users.noreply.github.com>
Date: Tue, 1 Jun 2021 13:05:49 +0200
Subject: [PATCH] SCVI: Replace generic with native check (#4808)

* SCVI: Replace generic with native check

Replaces generic exist check with native function call

* Variable

Co-authored-by: Lars Hvam <larshp@hotmail.com>
---
 src/objects/zcl_abapgit_object_scvi.clas.abap | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/src/objects/zcl_abapgit_object_scvi.clas.abap b/src/objects/zcl_abapgit_object_scvi.clas.abap
index bbc47b5df..512184854 100644
--- a/src/objects/zcl_abapgit_object_scvi.clas.abap
+++ b/src/objects/zcl_abapgit_object_scvi.clas.abap
@@ -22,7 +22,7 @@ ENDCLASS.
 
 
 
-CLASS ZCL_ABAPGIT_OBJECT_SCVI IMPLEMENTATION.
+CLASS zcl_abapgit_object_scvi IMPLEMENTATION.
 
 
   METHOD zif_abapgit_object~changed_by.
@@ -109,13 +109,17 @@ CLASS ZCL_ABAPGIT_OBJECT_SCVI IMPLEMENTATION.
 
   METHOD zif_abapgit_object~exists.
 
-    DATA: lo_screen_variant TYPE REF TO zcl_abapgit_objects_generic.
+    DATA: lv_screen_variant TYPE scvariant.
 
-    CREATE OBJECT lo_screen_variant
+    lv_screen_variant = ms_item-obj_name.
+
+    CALL FUNCTION 'RS_HDSYS_READ_SC_VARIANT_DB'
       EXPORTING
-        is_item = ms_item.
-
-    rv_bool = lo_screen_variant->exists( ).
+        scvariant  = lv_screen_variant
+      EXCEPTIONS
+        no_variant = 1
+        OTHERS     = 2.
+    rv_bool = boolc( sy-subrc = 0 ).
 
   ENDMETHOD.