Index: vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml
===================================================================
diff -u -r29059 -r40945
--- vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml	(.../TestParcelRequest.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/TRANSP/GLS/Bericht/RequestStringBouwer/TestParcelRequest.cls.xml	(.../TestParcelRequest.cls.xml)	(revision 40945)
@@ -5,9 +5,9 @@
 
 <Method name="TestStandaardBericht">
 <Implementation><![CDATA[
-	#dim ParcelRequest As APPS.TRANSP.GLS.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.Bericht.impl.RequestStringBouwer).%New()
+	Set Builder = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	#dim Request As %String = Builder.MaakRequest(ParcelRequest)
 	
 	Do ..AssertRequest(Request,"T050:Shipping Software |T051:V 12 |T084:P |T090:NOPRINT |T100:BE |T330:1040 |T400:001234567895 |T530:55,0 |T545:20.06.2009 |T805:12134567 |T810:Test Customer |T820:Test Street 12 |T821:BE |T822:9999 |T823:Somewhere |T854:MyReference |T860:COMPANY NAME. |T861:COMPANY SECOND NAME |T863:COMPANY STREET 00 |T864:ETTERBEEK |T8700:BE7100 |T8748:  |T8904:002 |T8905:002 |T8914:HILDADOI |T8915:0561000542 |")
@@ -16,9 +16,9 @@
 
 <Method name="TestBerichtNederland">
 <Implementation><![CDATA[
-	#dim ParcelRequest As APPS.TRANSP.GLS.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.Bericht.impl.RequestStringBouwer).%New()
+	Set Builder = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	#dim Request As %String = Builder.MaakRequest(ParcelRequest)
 	
 	Do ..AssertRequest(Request,"T050:Shipping Software |T051:V 12 |T084:P |T090:NOPRINT |T100:NL |T330:1040 |T400:001234567895 |T530:55,0 |T545:20.06.2009 |T805:12134567 |T810:Test Customer |T820:Test Street 12 |T821:NL |T822:9999 |T823:Somewhere |T854:MyReference |T860:COMPANY NAME. |T861:COMPANY SECOND NAME |T863:COMPANY STREET 00 |T864:ETTERBEEK |T8700:BE7100 |T8904:002 |T8905:002 |T8914:HILDADOI |T8915:0561000542 |")
@@ -27,9 +27,9 @@
 
 <Method name="TestRequiredVelden">
 <Implementation><![CDATA[
-	Set SimpelDto = ##class(APPS.TRANSP.GLS.Bericht.dto.ParcelRequest).%New()
+	Set SimpelDto = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.dto.ParcelRequest).%New()
 	Set SimpelDto.T051 = "V 1.5.2"
-	Set Builder = ##class(APPS.TRANSP.GLS.Bericht.impl.RequestStringBouwer).%New()
+	Set Builder = ##class(APPS.TRANSP.GLS.GLSv1.Bericht.impl.RequestStringBouwer).%New()
 	Try {
 		#dim Request As %String = Builder.MaakRequest(SimpelDto)
 	}Catch{