--- ibx/trunk/fbintf/testsuite/Test16.pas	2020/07/17 22:57:55	307
+++ ibx/trunk/fbintf/testsuite/Test16.pas	2020/07/18 10:26:30	308
@@ -133,11 +133,7 @@ var SPB: ISPB;
 begin
   if not FirebirdAPI.HasServiceAPI then Exit;
 
-  ServerName := Owner.GetEmployeeDatabaseName;
-  I := Pos(':',ServerName);
-  if i > 0 then
-    DBName := system.copy(ServerName,i+1,length(ServerName) - 2);
-  system.Delete(ServerName,i,Length(ServerName)-i+1);
+  ServerName := Owner.Server;
 
   SPB := FirebirdAPI.AllocateSPB;
   SPB.Add(isc_spb_user_name).setAsString(Owner.GetUserName);