Using proper way to get database SERVICE_NAME

jgebal · jgebal · commit 05748a086107 · 2018-03-16T23:39:59.000Z
diff --git a/test/api/test_ut_runner.pkb b/test/api/test_ut_runner.pkb
@@ -302,15 +302,17 @@ end;';
     end;
 
   procedure db_link_setup is
+    l_service_name varchar2(100);
     begin
+      select global_name into l_service_name from global_name;
       execute immediate
       'create public database link db_loopback connect to ut3_tester identified by ut3
         using ''(DESCRIPTION=
                   (ADDRESS=(PROTOCOL=TCP)
                     (HOST='||sys_context('userenv','SERVER_HOST')||')
                     (PORT=1521)
                   )
-                  (CONNECT_DATA=(SERVICE_NAME='||SYS_CONTEXT('USERENV', 'CON_NAME')||')))''';
+                  (CONNECT_DATA=(SERVICE_NAME='||l_service_name||')))''';
       execute immediate q'[
     create or replace package test_db_link is
       --%suite
