Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml
===================================================================
diff -u -r37358 -r37437
--- vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 37358)
+++ vhUnitTest/EXT/Unishop/PurchaseOrder001/OrderConverter/Converteer/Test.cls.xml	(.../Test.cls.xml)	(revision 37437)
@@ -84,7 +84,7 @@
 	Set TeConverterenOrder = ##class(EXT.Unishop.PurchaseOrder001.CreateOrder.Order).%New()
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeVoorgedefinieerdProduct(Orderlijnen)
-	Set Orderlijnen.GetAt(1).Product.Korttekst = "OllekeBolleke"
+	Set Orderlijnen.GetAt(1).Product.Korttekst = $$$DummyString
 	
 	Set TeConverterenOrder.Lijnen = Orderlijnen
 	
@@ -106,8 +106,8 @@
 	Set TeConverterenOrder = ##class(EXT.Unishop.PurchaseOrder001.CreateOrder.Order).%New()
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeVoorgedefinieerdProduct(Orderlijnen)
-	Set Orderlijnen.GetAt(1).Product.Korttekst = "OllekeBolleke"
-	Set Orderlijnen.GetAt(1).Product.PakketReferentie = "Knol"
+	Set Orderlijnen.GetAt(1).Product.Korttekst = $$$DummyString
+	Set Orderlijnen.GetAt(1).Product.PakketReferentie = $$$DummyString
 	
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Zowel <ProductCodeVendor> als <ProductCodeCustomer> zijn ingevuld")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings))
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml
===================================================================
diff -u -r35715 -r37437
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 35715)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 37437)
@@ -35,9 +35,9 @@
 
 <Method name="Test willekeurige bestandsnaam">
 <Implementation><![CDATA[
-	#dim BestandVolledigeNaam As %String = "ollekebollekeknol"
+	#dim BestandVolledigeNaam As %String = $$$DummyString
 	
-	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("BestandVerwerker : ongeldige Bestandnaam 'ollekebollekeknol'")
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("BestandVerwerker : ongeldige Bestandnaam '"_$$$DummyString_"'")
 	do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings))	
 	
 	#dim AanvraagHeader As APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.AanvraagHeader