Index: APPS/OV/impl/TranssmartTrackAndTrace.cls.xml
===================================================================
diff -u -r59731 -r71274
--- APPS/OV/impl/TranssmartTrackAndTrace.cls.xml	(.../TranssmartTrackAndTrace.cls.xml)	(revision 59731)
+++ APPS/OV/impl/TranssmartTrackAndTrace.cls.xml	(.../TranssmartTrackAndTrace.cls.xml)	(revision 71274)
@@ -39,13 +39,11 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>CommunicatieServiceLocator:APPS.TRANSP.GLS.GLSv1.CommunicatieServiceLocator</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..CommunicatieServiceLocator = $$$Inject(CommunicatieServiceLocator,##class(APPS.TRANSP.GLS.GLSv1.impl.CommunicatieServiceLocator).%New())
 	set ..TransportApi = ##class(DOM.DomeinContext).Instance().GeefTransportAPI() 
 	Quit $$$OK
 ]]></Implementation>
@@ -72,42 +70,13 @@
 <Implementation><![CDATA[
 	#dim URL As %String = ""
 
-	If Transporteur = ##class(DOM.TRANSP.enu.Transporteur).VRD() {
-		set URL = ..GeefFreightTrackAndTraceURL(Levering,Taal)
-	} elseif  Transporteur = ##class(DOM.TRANSP.enu.Transporteur).DHL() {
-		set URL = ..GeefParcelTrackAndTraceURL(Levering,Taal)
-	} else {
-		set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Voor transporteur '"_Transporteur_"' is Track And Trace niet mogelijk. Levering: "_Levering.GeefID())
-		do ##class(TECH.ExceptionHandler).Throw(Exception)
-	}
+	#dim DistributeurData As APPS.TRANSP.Transsmart.data.VerzendData = ..GeefLeveringVerzendData(Levering)
+	Set URL = DistributeurData.TrackAndTraceUrl	
 
 	Quit URL
 ]]></Implementation>
 </Method>
 
-<Method name="GeefFreightTrackAndTraceURL">
-<FormalSpec>Levering:DOM.TRANSP.Levering,Taal:DOM.enu.Taal</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim WebPagina As %String = "https://vrd-live-webportal.go4tms.net/User/Verzending/ToBeConfirmed"
-	#dim DistributeurData As APPS.TRANSP.Transsmart.data.VerzendData = ..GeefLeveringVerzendData(Levering)
-	#dim URL As %String = WebPagina_"/"_DistributeurData.TrackAndTraceID
-	
-	quit URL
-]]></Implementation>
-</Method>
-
-<Method name="GeefParcelTrackAndTraceURL">
-<FormalSpec>Levering:DOM.TRANSP.Levering,Taal:DOM.enu.Taal</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	#dim DistributeurData As APPS.TRANSP.Transsmart.data.VerzendData = ..GeefLeveringVerzendData(Levering)
-	#dim URL As %String = DistributeurData.TrackAndTraceUrl
-	
-	quit URL
-]]></Implementation>
-</Method>
-
 <Method name="GeefLeveringVerzendData">
 <FormalSpec>Levering:DOM.TRANSP.Levering</FormalSpec>
 <Private>1</Private>