Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r57267 -r57270
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 57267)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 57270)
@@ -3,25 +3,66 @@
 <Class name="vhUnitTest.WSimpl.AX.CalculatedProduct.RequestConverter.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Parameter name="RandomProductId">
+<Type>%String</Type>
+<Default>RandomProductId</Default>
+</Parameter>
+
+<Parameter name="RandomDossierNr">
+<Type>%String</Type>
+<Default>RandomDossierNr</Default>
+</Parameter>
+
+<Parameter name="RandomNettoAankoopPrijs">
+<Type>%String</Type>
+<Default>RandomNettoAankoopPrijs</Default>
+</Parameter>
+
+<Parameter name="RandomGewicht">
+<Type>%String</Type>
+<Default>RandomGewicht</Default>
+</Parameter>
+
+<Parameter name="RandomMessageId">
+<Type>%String</Type>
+<Default>RandomMessageId</Default>
+</Parameter>
+
+<Parameter name="RandomKorttekst">
+<Type>%String</Type>
+<Default>RandomKorttekst</Default>
+</Parameter>
+
+<Parameter name="RandomEANCode">
+<Type>%String</Type>
+<Default>RandomEANCode</Default>
+</Parameter>
+
+<Parameter name="RandomAfbeeldingPad">
+<Type>%String</Type>
+<Default>RandomAfbeeldingPad</Default>
+</Parameter>
+
+<Parameter name="RandomSourcingDataAreaId">
+<Type>%String</Type>
+<Default>RandomSourcingDataAreaId</Default>
+</Parameter>
+
 <Method name="Test: RequestConverter converteert een AxdEntityRequest naar een AxdEntityConfigVariant">
 <Implementation><![CDATA[
 	If ($$$Not(##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol())) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 		Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
@@ -30,17 +71,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -57,25 +98,21 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol =&gt; Nieuwe implementatie NIET igv TBX">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).TBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).TBX())
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 		Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
@@ -84,17 +121,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -111,25 +148,21 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol =&gt; Nieuwe implementatie NIET igv TAX">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).TAX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).TAX())
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 		Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
@@ -138,17 +171,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -172,7 +205,7 @@
 		
 		#dim DummyRequest As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest).%New()
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(DummyRequest, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(DummyRequest, ..#RandomMessageId)
 		
 		Do $$$AssertEquals(ConfigVariant.ErrorText, RandomExceptionMessage)
 	}
@@ -181,16 +214,14 @@
 
 <Method name="Test: RequestConverter vult velden altijd in">
 <Implementation><![CDATA[
-	#dim RandomMessageId As %String = "RandomMessageId"
-	
 	#dim ProductServiceStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
 	Do ProductServiceStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
 	
-	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest("RandomProductId")
+	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub)
-	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, RandomMessageId)
+	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 	
-	Do $$$AssertEquals(ConfigVariant.MessageId, RandomMessageId)
+	Do $$$AssertEquals(ConfigVariant.MessageId, ..#RandomMessageId)
 	Do $$$AssertEquals(ConfigVariant.RequestMessageId, Request.MessageId)
 	Do $$$AssertEquals(ConfigVariant.ItemId, Request.ItemId)
 	Do $$$AssertEquals(ConfigVariant.ConfigVariantId, Request.MessageId)
@@ -203,18 +234,12 @@
 <Method name="Test: RequestConverter vult velden in op basis van het gevonden Product">
 <Implementation><![CDATA[
 	If ($$$Not(##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol())) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomEANCode As %String = "RandomEANCode"
-		#dim RandomKorttekst As %String = "RandomKorttekst"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"	
-		#dim RandomGewicht As %String = "RandomGewicht"	
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(RandomEANCode)
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(RandomKorttekst)
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 
 		#dim ProductServiceStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
@@ -228,33 +253,31 @@
 		#dim BouwstenenConverterStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwstenenConverter = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.BouwstenenConverter).%New()
 		Do BouwstenenConverterStub.IndienMethodCall("Convert", ProductStub, $$$ElkeWaarde).DanReturn(RandomBouwstenen)
 		
-		#dim RandomSourcingDataAreaId As %String = "RandomSourcingDataAreaId"
 		#dim SourcingDataAreaIdBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerStub.IndienMethodCall("Bepaal", ProductStub).DanReturn(RandomSourcingDataAreaId)
+		Do SourcingDataAreaIdBepalerStub.IndienMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim GeformatteerdeNettoAankoopPrijs As %String = "GeformatteerdeNettoAankoopPrijs"
 		#dim GeformatteerdeGewicht As %String = "GeformatteerdeGewicht"
 		#dim FormatterStub As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterStub.IndienMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn(GeformatteerdeNettoAankoopPrijs)
-		Do FormatterStub.IndienMethodCall("FormatNumber", RandomGewicht, 2).DanReturn(GeformatteerdeGewicht)
+		Do FormatterStub.IndienMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn(GeformatteerdeNettoAankoopPrijs)
+		Do FormatterStub.IndienMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn(GeformatteerdeGewicht)
 		
-		#dim RandomAfbeeldingPad As %String = "RandomAfbeeldingPad"
 		#dim AfbeeldingServiceStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceStub.IndienMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(RandomAfbeeldingPad)
+		Do AfbeeldingServiceStub.IndienMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest("RandomProductId")
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub, VariantDescriptionBepalerStub, BouwstenenConverterStub, SourcingDataAreaIdBepalerStub, FormatterStub, AfbeeldingServiceStub)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
-		Do $$$AssertEquals(ConfigVariant.GTIN, RandomEANCode)
-		Do $$$AssertEquals(ConfigVariant.ProductName, RandomKorttekst)
+		Do $$$AssertEquals(ConfigVariant.GTIN, ..#RandomEANCode)
+		Do $$$AssertEquals(ConfigVariant.ProductName, ..#RandomKorttekst)
 		Do $$$AssertEquals(ConfigVariant.CostPrice, GeformatteerdeNettoAankoopPrijs)
 		Do $$$AssertEqualsList(ConfigVariant.VariantDescription, RandomVariantDescription)
 		Do $$$AssertEqualsList(ConfigVariant.BOMLine, RandomBouwstenen)
-		Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, RandomSourcingDataAreaId)
-		Do $$$AssertEquals(ConfigVariant.Image, RandomAfbeeldingPad)
+		Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, ..#RandomSourcingDataAreaId)
+		Do $$$AssertEquals(ConfigVariant.Image, ..#RandomAfbeeldingPad)
 		Do $$$AssertEquals(ConfigVariant.Weight, GeformatteerdeGewicht)
-		Do $$$AssertEquals(ConfigVariant.Attribute.GetAt(1).ValueTxt, "RandomProductId")
+		Do $$$AssertEquals(ConfigVariant.Attribute.GetAt(1).ValueTxt, ..#RandomProductId)
 	}
 ]]></Implementation>
 </Method>
@@ -271,11 +294,11 @@
 	Do VariantDescriptionBepalerStub.IndienMethodCall("Bepaal", ProductDummy, $$$ElkeWaarde).DanReturn(RandomVariantDescription)
 	
 	#dim SourcingDataAreaIdBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-	Do SourcingDataAreaIdBepalerStub.IndienMethodCall("Bepaal", $$$ElkeWaarde).DanReturn("RandomSourcingDataAreaId")		
+	Do SourcingDataAreaIdBepalerStub.IndienMethodCall("Bepaal", $$$ElkeWaarde).DanReturn(..#RandomSourcingDataAreaId)		
 	
-	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest("RandomProductId")
+	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub, VariantDescriptionBepalerStub, "", SourcingDataAreaIdBepalerStub)
-	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 	
 	Do $$$AssertEquals(ConfigVariant.SourcingRouteId, "")
 ]]></Implementation>
@@ -284,26 +307,22 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Fixed">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "Fixed"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 				
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.VerwachtMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
 		Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
@@ -312,17 +331,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -339,26 +358,22 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is ChangeRequest en GeefProduct geeft leeg">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "ChangeRequest"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 				
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn("")
+		Do ProductServiceMock.IndienMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn("")
 		Do ProductServiceMock.VerwachtMethodCall("GeefProductGemaaktVolgensAxKenmerken", Request).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
@@ -368,17 +383,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -395,26 +410,22 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is ChangeRequest en GeefProduct geeft GenerischProduct">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$True)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "ChangeRequest"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.IndienMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		Do ProductServiceMock.VerwachtMethodCall("GeefProductGemaaktVolgensAxKenmerken", Request).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
@@ -424,17 +435,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -451,16 +462,12 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Customizable en AdminProductNummer is niet meegegeven =&gt; Nieuw product volgens kenmerken">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		
 		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest("")
 		Set Request.AttrVsAdminProdNr = "Customizable"
@@ -478,17 +485,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -505,20 +512,18 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Customizable en AdminProductNummer is meegegeven maar GeefProduct geeft leeg">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "Customizable"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", RandomProductId).DanReturn($$$False)
-		Do ProductServiceMock.IndienMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn("")
+		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", ..#RandomProductId).DanReturn($$$False)
+		Do ProductServiceMock.IndienMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn("")
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock,,,,,,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		Do $$$AssertEquals(ConfigVariant.ErrorText, "Voor het in BOMBOL door AX aangeleverde AdminProductNummer 'RandomProductId' is in Cache geen product gevonden.")
@@ -529,23 +534,21 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Customizable en AdminProductNummer is meegegeven maar GeefProduct geeft GenerischProduct">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$True)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "Customizable"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", RandomProductId).DanReturn($$$False)
-		Do ProductServiceMock.IndienMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", ..#RandomProductId).DanReturn($$$False)
+		Do ProductServiceMock.IndienMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock,,,,,,, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		Do $$$AssertEquals(ConfigVariant.ErrorText, "Voor het in BOMBOL door AX aangeleverde AdminProductNummer 'RandomProductId' is in Cache een generisch product gevonden, dat daarom niet geüpdatet wordt.")
@@ -556,36 +559,31 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Customizable en AdminProductNummer is meegegeven =&gt; Product update">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		#dim RandomDossierNr As %String = "RandomDossierNr"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		Do ProductStub.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
-		Do ProductStub.IndienMethodCall("GeefDossierNr").DanReturn(RandomDossierNr)
+		Do ProductStub.IndienMethodCall("GeefDossierNr").DanReturn(..#RandomDossierNr)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "Customizable"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 		
 		Set ProductData = ##class(DOM.PM.dto.ProductData).%New()
-		Set ProductData.PRNr = RandomProductId
-		Set ProductData.DossierNummer = RandomDossierNr
+		Set ProductData.PRNr = ..#RandomProductId
+		Set ProductData.DossierNummer = ..#RandomDossierNr
 		
 		#dim ProductDataFactoryStub As vhTest.Mock.DOM.PM.dto.ProductDataFactory = ##class(vhTest.Mock.DOM.PM.dto.ProductDataFactory).%New()
-		Do ProductDataFactoryStub.IndienMethodCall("MaakProductData", RandomProductId, RandomDossierNr).DanReturn(ProductData)
+		Do ProductDataFactoryStub.IndienMethodCall("MaakProductData", ..#RandomProductId, ..#RandomDossierNr).DanReturn(ProductData)
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", RandomProductId).DanReturn($$$False)
-		Do ProductServiceMock.IndienMethodCall("GeefProduct", RandomProductId, Request.ItemId).DanReturn(ProductStub)
+		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", ..#RandomProductId).DanReturn($$$False)
+		Do ProductServiceMock.IndienMethodCall("GeefProduct", ..#RandomProductId, Request.ItemId).DanReturn(ProductStub)
 		Do ProductServiceMock.VerwachtMethodCall("GeefProductGemaaktVolgensAxKenmerken", Request, ProductData).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
@@ -595,17 +593,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock, ProductDataFactoryStub, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 		
@@ -622,33 +620,28 @@
 <Method name="Test: IsActiefAttrVsAdminProdNrInBomBol en AttrVsAdminProdNr is Customizable en AdminProductNummer is meegegeven maar HeeftBezwaarVoorProductDelete is True">
 <Implementation><![CDATA[
 	If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefAttrVsAdminProdNrInBomBol()) {
-		#dim RandomProductId As %String = "RandomProductId"
-		#dim RandomNettoAankoopPrijs As %String = "RandomNettoAankoopPrijs"
-		#dim RandomGewicht As %String = "RandomGewicht"
-		#dim RandomDossierNr As %String = "RandomDossierNr"
-		
 		#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
-		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn("RandomEANCode")
-		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn("RandomKorttekst")
-		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(RandomNettoAankoopPrijs)
-		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(RandomGewicht)
-		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(RandomProductId)
+		Do ProductStub.IndienMethodCall("GeefEANCode").DanReturn(..#RandomEANCode)
+		Do ProductStub.IndienMethodCall("GeefKorttekst").DanReturn(..#RandomKorttekst)
+		Do ProductStub.IndienMethodCall("GeefNettoAankoopPrijsInclCif").DanReturn(..#RandomNettoAankoopPrijs)
+		Do ProductStub.IndienMethodCall("GeefGewichtInGram").DanReturn(..#RandomGewicht)
+		Do ProductStub.IndienMethodCall("GeefPRNr").DanReturn(..#RandomProductId)
 		
-		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(RandomProductId)
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest(..#RandomProductId)
 		Set Request.AttrVsAdminProdNr = "Customizable"
 		
 		#dim LadeVariantBepaler As vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.LadeVariantBepaler).%New()
-		Do LadeVariantBepaler.IndienMethodCall("Bepaal", RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
+		Do LadeVariantBepaler.IndienMethodCall("Bepaal", ..#RandomProductId, Request.Attribute).DanReturn(##class(AXimpl.PM.enu.LadeVariant).LBX())
 		
 		Set ProductData = ##class(DOM.PM.dto.ProductData).%New()
-		Set ProductData.PRNr = RandomProductId
-		Set ProductData.DossierNummer = RandomDossierNr
+		Set ProductData.PRNr = ..#RandomProductId
+		Set ProductData.DossierNummer = ..#RandomDossierNr
 		
 		#dim ProductDataFactoryStub As vhTest.Mock.DOM.PM.dto.ProductDataFactory = ##class(vhTest.Mock.DOM.PM.dto.ProductDataFactory).%New()
-		Do ProductDataFactoryStub.IndienMethodCall("MaakProductData", RandomProductId, RandomDossierNr).DanReturn(ProductData)
+		Do ProductDataFactoryStub.IndienMethodCall("MaakProductData", ..#RandomProductId, ..#RandomDossierNr).DanReturn(ProductData)
 		
 		#dim ProductServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", RandomProductId).DanReturn($$$True)
+		Do ProductServiceMock.IndienMethodCall("HeeftBezwaarVoorProductDelete", ..#RandomProductId).DanReturn($$$True)
 		Do ProductServiceMock.VerwachtMethodCall("GeefProductGemaaktVolgensAxKenmerken", Request).DanReturn(ProductStub)
 		
 		#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
@@ -658,17 +651,17 @@
 		Do BouwstenenConverterMock.VerwachtMethodCall("Convert", ProductStub, Request.MessageId).DanReturn(##class(%ListOfObjects).%New())
 		
 		#dim SourcingDataAreaIdBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
-		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn("RandomSourcingDataAreaId")
+		Do SourcingDataAreaIdBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(..#RandomSourcingDataAreaId)
 		
 		#dim FormatterMock As vhTest.Mock.AXimpl.Formatter = ##class(vhTest.Mock.AXimpl.Formatter).%New()
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
-		Do FormatterMock.VerwachtMethodCall("FormatNumber", RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomNettoAankoopPrijs, 2).DanReturn("GeformatteerdeRandomNettoAankoopPrijs")
+		Do FormatterMock.VerwachtMethodCall("FormatNumber", ..#RandomGewicht, 2).DanReturn("GeformatteerdeRandomGewicht")
 		
 		#dim AfbeeldingServiceMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.AfbeeldingService).%New()
-		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn("RandomAfbeeldingPad")
+		Do AfbeeldingServiceMock.VerwachtMethodCall("GeefAfbeeldingPad", ProductStub).DanReturn(..#RandomAfbeeldingPad)
 		
 		#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceMock, VariantDescriptionBepalerMock, BouwstenenConverterMock, SourcingDataAreaIdBepalerMock, FormatterMock, AfbeeldingServiceMock, ProductDataFactoryStub, LadeVariantBepaler)
-		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, ..#RandomMessageId)
 		
 		Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))