Index: vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestDataBouwer/TestBase.cls.xml
===================================================================
diff -u -r35164 -r40633
--- vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestDataBouwer/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 35164)
+++ vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestDataBouwer/TestBase.cls.xml	(.../TestBase.cls.xml)	(revision 40633)
@@ -21,17 +21,22 @@
 <Default>1202109</Default>
 </Parameter>
 
+<Property name="CommunicatieServiceLocatorMock">
+<Type>vhUnitTest.APPS.TRANSP.GLS.Bericht.RequestDataBouwer.CommunicatieServiceMock</Type>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
  	Do ##super(aTestName)
  	Do ##class(TECH.Context).Instance().PushMailAPIClassName(##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).%ClassName(1))
  	Do ##class(APPS.ApplicatieContext).Instance().PushTransportAPIClassName(##class(vhUnitTest.APPS.TRANSP.GLS.Bericht.RequestDataBouwer.TransportAPIMock).%ClassName(1))
+ 	Set ..CommunicatieServiceLocatorMock = ##class(vhUnitTest.APPS.TRANSP.GLS.Bericht.RequestDataBouwer.CommunicatieServiceMock).%New()
 ]]></Implementation>
 </Method>
 
 <Method name="AssertGLSBasis">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(Request.T050,"VanHoecke","Software name")	
@@ -40,7 +45,7 @@
 </Method>
 
 <Method name="AssertRequestBasis">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request,ReferentieSuffix:%String=..#ReferentieSuffix</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request,ReferentieSuffix:%String=..#ReferentieSuffix</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(Request.T545,##class(TECH.DateTime).GeefDatumInPuntNotatieLang(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()),"Datum doorsturen naar GLS bij etiket.")
@@ -51,7 +56,7 @@
 </Method>
 
 <Method name="AssertAdressen">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do ..AssertAfzenderAdres(Request)
@@ -60,7 +65,7 @@
 </Method>
 
 <Method name="AssertAfzenderAdres">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(Request.T810,"AfzenderNaam")
@@ -73,7 +78,7 @@
 </Method>
 
 <Method name="AssertLeverAdres">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(Request.T860,"LeverNaam")
@@ -87,7 +92,7 @@
 </Method>
 
 <Method name="AssertFalseHeeftProperty">
-<FormalSpec>Request:APPS.TRANSP.GLS.Bericht.dto.Request,PropertyNaam:%String</FormalSpec>
+<FormalSpec>Request:APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request,PropertyNaam:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[	Do $$$AssertFalse(##class(%Dictionary.CompiledProperty).%ExistsId(Request.%ClassName(1)_"||"_PropertyNaam),Request.%ClassName(1)_" heeft geen property met naam '"_PropertyNaam_"'")
 ]]></Implementation>
@@ -101,7 +106,7 @@
 	
 	Set LeveringData.OphaalTijdstip = ##class(TECH.DateTime).CurrentTimeStamp()
 	Set LeveringData.Referentie = ..#Referentie
-	Set LeveringData.GeleverdAanKlantID = "K||1000"
+	Set LeveringData.GeleverdAanKlantNummer = "1000"
 	Set LeveringData.Telefoon = "09/99\9-99.9 9"
 	
 	Set LeveringData.AfzenderAdres = ..GeefAfzenderAdres()