Index: WS/Transsmart/impl/TboxServicePortBase.cls.xml
===================================================================
diff -u -r59489 -r59578
--- WS/Transsmart/impl/TboxServicePortBase.cls.xml	(.../TboxServicePortBase.cls.xml)	(revision 59489)
+++ WS/Transsmart/impl/TboxServicePortBase.cls.xml	(.../TboxServicePortBase.cls.xml)	(revision 59578)
@@ -1,6 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WS.Transsmart.impl.TboxServicePortBase">
+<Abstract>1</Abstract>
 <Super>TECH.RegisteredObject</Super>
 
 <Property name="Logger">
@@ -29,13 +30,14 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefUrl">
-<ReturnType>%String</ReturnType>
+<Method name="ZetLocation">
+<FormalSpec>Omgeving:%String</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
-	if ##class(TECH.Config.ConfigMgr).Instance().GeefOmgeving()="PROD"{
-		Quit "https://connect.transsmart.com/TboxService/2_0"
+	if Omgeving="PROD"{
+		Set ..Location  = "https://connect.transsmart.com/TboxService/2_0"
 	} else {
-		Quit "https://accept-connect.transsmart.com/TboxService/2_0"
+		set ..Location = "https://accept-connect.transsmart.com/TboxService/2_0"
 	}
 ]]></Implementation>
 </Method>