Index: vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml
===================================================================
diff -u -r40367 -r40945
--- vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml	(.../TestParcelRequest.cls.xml)	(revision 40367)
+++ vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml	(.../TestParcelRequest.cls.xml)	(revision 40945)
@@ -5,7 +5,7 @@
 
 <Method name="TestStandaardBericht">
 <Implementation><![CDATA[
-	#dim ParcelRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest = ##class(vhUnitTest.APPS.TRANSP.GLS.Bericht.dto.Helper).GeefParcelStandaardDto()
+	#dim ParcelRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest = ##class(vhTest.Utils.APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request).GeefParcelStandaardDto()
 	
 	Set Builder = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	#dim Request As %String = Builder.MaakRequest(ParcelRequest)
@@ -16,7 +16,7 @@
 
 <Method name="TestBerichtNederland">
 <Implementation><![CDATA[
-	#dim ParcelRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest = ##class(vhUnitTest.APPS.TRANSP.GLS.Bericht.dto.Helper).GeefParcelNederlandDto()
+	#dim ParcelRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest = ##class(vhTest.Utils.APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request).GeefParcelNederlandDto()
 	
 	Set Builder = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	#dim Request As %String = Builder.MaakRequest(ParcelRequest)
Index: vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestFreightRequest.cls.xml
===================================================================
diff -u -r40367 -r40945
--- vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestFreightRequest.cls.xml	(.../TestFreightRequest.cls.xml)	(revision 40367)
+++ vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestFreightRequest.cls.xml	(.../TestFreightRequest.cls.xml)	(revision 40945)
@@ -5,7 +5,7 @@
 
 <Method name="TestStandaardBericht">
 <Implementation><![CDATA[
-	#dim FreightRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.FreightRequest = ##class(vhUnitTest.APPS.TRANSP.GLS.Bericht.dto.Helper).GeefFreightStandaardDto()
+	#dim FreightRequest As APPS.TRANSP.GLS.GLSv1.Bericht.dto.FreightRequest = ##class(vhTest.Utils.APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request).GeefFreightStandaardDto()
 	
 	Set RequestStringBouwer = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	#dim Request As %String = RequestStringBouwer.MaakRequest(FreightRequest)
Index: vhTest/Utils/APPS/TRANSP/GLS/GLSv1/Bericht/dto/Request.cls.xml
===================================================================
diff -u
--- vhTest/Utils/APPS/TRANSP/GLS/GLSv1/Bericht/dto/Request.cls.xml	(revision 0)
+++ vhTest/Utils/APPS/TRANSP/GLS/GLSv1/Bericht/dto/Request.cls.xml	(revision 40945)
@@ -0,0 +1,111 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.APPS.TRANSP.GLS.GLSv1.Bericht.dto.Request">
+<Super>%RegisteredObject</Super>
+
+<Method name="GeefFreightStandaardDto">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.TRANSP.GLS.GLSv1.Bericht.dto.FreightRequest</ReturnType>
+<Implementation><![CDATA[
+		Set dto = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.dto.FreightRequest).%New()
+		Set dto.T050 = "Shipping Software"
+		Set dto.T051 = "V 12"
+		Set dto.T100 = "BE"
+		Set dto.T330 = "1040"
+		Set dto.T400 = "001234567895"
+		Set dto.T530 = "250,0"
+		Set dto.T545 = "20.06.2009"
+		Set dto.T805 = "12134567"
+		Set dto.T810 = "Test Customer"
+		Set dto.T820 = "Test Street 12"
+		Set dto.T821 = "BE"
+		Set dto.T822 = "9999"
+		Set dto.T823 = "Somewhere"
+		Set dto.T852 = " "
+		Set dto.T854 = "MyReference"
+		Set dto.T860 = "COMPANY NAME."
+		Set dto.T861 = "COMPANY SECOND NAME"
+		Set dto.T863 = "COMPANY STREET 00"
+		Set dto.T864 = "ETTERBEEK"
+		Set dto.T1267 = "Y"
+		Set dto.T8904 = "002"
+		Set dto.T8905 = "002"
+		Set dto.T8914 = "HILDADOI"
+		Set dto.T8915 = "0561000542"
+		Set dto.TPT = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.enu.PackageType).Pallet()	
+		
+		Quit dto
+]]></Implementation>
+</Method>
+
+<Method name="GeefParcelStandaardDto">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest</ReturnType>
+<Implementation><![CDATA[
+		Set dto = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest).%New()
+		Set dto.T050 = "Shipping Software"
+		Set dto.T051 = "V 12"
+		Set dto.T100 = "BE"
+		Set dto.T330 = "1040"
+		Set dto.T400 = "001234567895"
+		Set dto.T530 = "55,0"
+		Set dto.T545 = "20.06.2009"
+		Set dto.T805 = "12134567"
+		Set dto.T810 = "Test Customer"
+		Set dto.T820 = "Test Street 12"
+		Set dto.T821 = "BE"
+		Set dto.T822 = "9999"
+		Set dto.T823 = "Somewhere"
+		Set dto.T854 = "MyReference"
+		Set dto.T860 = "COMPANY NAME."
+		Set dto.T861 = "COMPANY SECOND NAME"
+		Set dto.T863 = "COMPANY STREET 00"
+		Set dto.T864 = "ETTERBEEK"
+		Set dto.T8700 = "BE7100"
+		Set dto.T8748 = " "
+		Set dto.T8904 = "002"
+		Set dto.T8905 = "002"
+		Set dto.T8914 = "HILDADOI"
+		Set dto.T8915 = "0561000542"	
+		
+		Quit dto
+]]></Implementation>
+</Method>
+
+<Method name="GeefParcelNederlandDto">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest</ReturnType>
+<Implementation><![CDATA[
+		Set dto = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest).%New()
+		Set dto.T050 = "Shipping Software"
+		Set dto.T051 = "V 12"
+		Set dto.T100 = "NL"
+		Set dto.T330 = "1040"
+		Set dto.T400 = "001234567895"
+		Set dto.T530 = "55,0"
+		Set dto.T545 = "20.06.2009"
+		Set dto.T805 = "12134567"
+		Set dto.T810 = "Test Customer"
+		Set dto.T820 = "Test Street 12"
+		Set dto.T821 = "NL"
+		Set dto.T822 = "9999"
+		Set dto.T823 = "Somewhere"
+		Set dto.T854 = "MyReference"
+		Set dto.T860 = "COMPANY NAME."
+		Set dto.T861 = "COMPANY SECOND NAME"
+		Set dto.T863 = "COMPANY STREET 00"
+		Set dto.T864 = "ETTERBEEK"
+		Set dto.T8700 = "BE7100"
+		Set dto.T8748 = ""
+		Set dto.T8904 = "002"
+		Set dto.T8905 = "002"
+		Set dto.T8914 = "HILDADOI"
+		Set dto.T8915 = "0561000542"	
+		
+		Quit dto
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>