Index: DOM/PM/Product/impl/TAORMaatwerkProductCreator.cls.xml
===================================================================
diff -u -r58634 -r58635
--- DOM/PM/Product/impl/TAORMaatwerkProductCreator.cls.xml	(.../TAORMaatwerkProductCreator.cls.xml)	(revision 58634)
+++ DOM/PM/Product/impl/TAORMaatwerkProductCreator.cls.xml	(.../TAORMaatwerkProductCreator.cls.xml)	(revision 58635)
@@ -19,23 +19,25 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..KorttekstBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.KorttekstBepaler).%New()
+	Set ..KorttekstBepaler = ##class(DOM.PM.Maatwerk.TAX.impl.KorttekstBepaler).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="Creeer">
 <FormalSpec>ProductSpecificatie:DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,KostItem:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem,ProductData:DOM.PM.dto.ProductData=""</FormalSpec>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim ProductID As %String = ""
 	
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ProductSpecificatie.GeefIngegevenKenmerken()
 	
-	if IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.LosseComponentenInBulk {
-		set ProductID = ..ZoekProductIdViaKortTekst(..KorttekstBepaler.BepaalKorttekst("",IngegevenKenmerken,HalffabItemsBoom))
+	If IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.LosseComponentenInBulk {
+		Set ProductID = ..ZoekProductIdViaKortTekst(..KorttekstBepaler.BepaalKorttekst("",IngegevenKenmerken,HalffabItemsBoom))
 	}
 	
-	if '$length(ProductID) {
+	If ($$$Not($$$HasLength(ProductID))) {
 		Set ProductCreator = ##class(DOM.PM.impl.DataM.DataMTAORLadeCreator).%New(ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem, ProductData)
 		Set ProductID = ProductCreator.GeefPRNr()
 		Set BouwsteenCreator = ##class(DOM.PM.impl.DataM.DataMBouwsteenCreator).%New(ProductID, ProductSpecificatie, BerekeningsSpecificatie, HalffabItemsBoom, KostItem)
@@ -57,8 +59,8 @@
 <Private>1</Private>
 <ReturnType>TECH.Query.QueryAPI</ReturnType>
 <Implementation><![CDATA[
-	set r%QueryAPI = $$$LazyLoad(r%QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
-	quit r%QueryAPI
+	Set r%QueryAPI = $$$LazyLoad(r%QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
+	Quit r%QueryAPI
 ]]></Implementation>
 </Method>
 </Class>