Index: DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml
===================================================================
diff -u -r30655 -r30656
--- DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml	(.../Rug.cls.xml)	(revision 30655)
+++ DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml	(.../Rug.cls.xml)	(revision 30656)
@@ -25,40 +25,42 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Do ##super(Lade, HalffabItem, Kenmerken, ProductAPI)
-	Set ..LadeRugUtils = $$$Implementation(LadeRugUtils, ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefLadeRugUtils(##class(DOM.PM.enu.LadeVariant).TAOR()))
-	Quit $$$OK
+	do ##super(Lade, HalffabItem, Kenmerken, ProductAPI)
+	
+	set ..LadeRugUtils = $$$Implementation(LadeRugUtils, ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefLadeRugUtils(##class(DOM.PM.enu.LadeVariant).TAOR()))
+	
+	quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBreedteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefRugPlaat().GeefBreedteInMM()
+<Implementation><![CDATA[	quit ..GeefRugPlaat().GeefBreedteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefDikteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefRugPlaat().GeefDikteInMM()
+<Implementation><![CDATA[	quit ..GeefRugPlaat().GeefDikteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHoogteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefRugPlaat().GeefHoogteInMM()
+<Implementation><![CDATA[	quit ..GeefRugPlaat().GeefHoogteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefKleur">
 <ReturnType>DOM.PM.enu.TAORLadeKleur</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefRugPlaat().GeefKleur()
+<Implementation><![CDATA[	quit ..GeefRugPlaat().GeefKleur()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefKleuren">
 <ReturnType>%ArrayOfDataTypes</ReturnType>
 <Implementation><![CDATA[
-	#dim Kleuren As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+	#dim Kleuren As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()	
 	
 	do Kleuren.SetAt(..GeefKleur(), 1)
 	do Kleuren.SetAt("", 2)
@@ -70,7 +72,7 @@
 
 <Method name="GeefConcept">
 <ReturnType>DOM.PM.enu.TAORConcept</ReturnType>
-<Implementation><![CDATA[	Quit ..Lade.GeefConcept()
+<Implementation><![CDATA[	quit ..Lade.GeefConcept()
 ]]></Implementation>
 </Method>
 
@@ -88,38 +90,40 @@
 
 <Method name="GeefRol">
 <ReturnType>DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel</ReturnType>
-<Implementation><![CDATA[	Quit "Rug"
+<Implementation><![CDATA[	quit ##class(DOM.PM.Maatwerk.LadeInfo.enu.LadeOnderdeel).Rug()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefPlaten">
 <ReturnType>DOM.PM.Maatwerk.LadeInfo.RugPlaten</ReturnType>
 <Implementation><![CDATA[
-	set RugPlaten = ##class(DOM.PM.Maatwerk.LadeInfo.RugPlaten).%New()
-	#dim HalffabItemRugPlaat As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..HalffabItem.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).RugPlaat())
-	do RugPlaten.Insert(##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.RugPlaat).%New($this,HalffabItemRugPlaat,..Kenmerken))
+	#dim RugPlaten As DOM.PM.Maatwerk.LadeInfo.RugPlaten = ##class(DOM.PM.Maatwerk.LadeInfo.RugPlaten).%New()
+	#dim HalffabItemRugPlaat As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..GeefHalffabItemRugPlaat()
+	
+	do RugPlaten.Insert(##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.RugPlaat).%New($this, HalffabItemRugPlaat, ..Kenmerken))
+	
 	quit RugPlaten
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHalffabItemRugPlaat">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem</ReturnType>
-<Implementation><![CDATA[	Quit ..HalffabItem.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).RugPlaat())
+<Implementation><![CDATA[	quit ..HalffabItem.GeefHalffabItem(..TAORRol.RugPlaat)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefRugPlaat">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.LadeInfo.impl.TAX.RugPlaat</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.RugPlaat).%New($this,..GeefHalffabItemRugPlaat(),..Kenmerken)
+<Implementation><![CDATA[	quit ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.RugPlaat).%New($this, ..GeefHalffabItemRugPlaat(), ..Kenmerken)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefRugPlaatProductID">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefHalffabItemRugPlaat().GeefHalffab().GeefProductID()
+<Implementation><![CDATA[	quit ..GeefHalffabItemRugPlaat().GeefHalffab().GeefProductID()
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/LadeInfo/impl/TAX/Zijkant.cls.xml
===================================================================
diff -u -r30655 -r30656
--- DOM/PM/Maatwerk/LadeInfo/impl/TAX/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 30655)
+++ DOM/PM/Maatwerk/LadeInfo/impl/TAX/Zijkant.cls.xml	(.../Zijkant.cls.xml)	(revision 30656)
@@ -29,44 +29,45 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade,HalffabItem:DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem,Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,ProductAPI:DOM.PM.ProductAPI=""</FormalSpec>
+<FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade,HalffabItem:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem,Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,ProductAPI:DOM.PM.ProductAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Do ##super(Lade, HalffabItem, Kenmerken, ProductAPI)
-	Quit $$$OK
+	
+	quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefDikteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefZijkantPlaat().GeefDikteInMM()
+<Implementation><![CDATA[	quit ..GeefZijkantPlaat().GeefDikteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefLengteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefZijkantPlaat().GeefLengteInMM()
+<Implementation><![CDATA[	quit ..GeefZijkantPlaat().GeefLengteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHoogteInMM">
 <ReturnType>TECH.Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefZijkantPlaat().GeefHoogteInMM()
+<Implementation><![CDATA[	quit ..GeefZijkantPlaat().GeefHoogteInMM()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHoogte">
 <ReturnType>DOM.PM.enu.TAORZijkantHoogte</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefLade().GeefHoogte()
+<Implementation><![CDATA[	quit ..GeefLade().GeefHoogte()
 ]]></Implementation>
 </Method>
 
 <Method name="GeefKleur">
 <ReturnType>DOM.PM.enu.TAORLadeKleur</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefZijkantPlaat().GeefKleur()
+<Implementation><![CDATA[	quit ..GeefZijkantPlaat().GeefKleur()
 ]]></Implementation>
 </Method>
 
@@ -91,13 +92,13 @@
 
 <Method name="GeefZijkantRol">
 <ReturnType>DOM.PM.Maatwerk.Lade.enu.ZijkantRol</ReturnType>
-<Implementation><![CDATA[	quit $piece(..HalffabItem.GeefRol(),"Zijkant",2)
+<Implementation><![CDATA[	quit $piece(..HalffabItem.GeefRol(), "Zijkant", 2)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefConcept">
 <ReturnType>DOM.PM.enu.TAORConcept</ReturnType>
-<Implementation><![CDATA[	Quit ..Lade.GeefConcept()
+<Implementation><![CDATA[	quit ..Lade.GeefConcept()
 ]]></Implementation>
 </Method>
 
@@ -110,30 +111,32 @@
 <Method name="GeefPlaten">
 <ReturnType>DOM.PM.Maatwerk.LadeInfo.ZijkantPlaten</ReturnType>
 <Implementation><![CDATA[
-	set ZijkantPlaten = ##class(DOM.PM.Maatwerk.LadeInfo.ZijkantPlaten).%New()
+	#dim ZijkantPlaten As DOM.PM.Maatwerk.LadeInfo.ZijkantPlaten = ##class(DOM.PM.Maatwerk.LadeInfo.ZijkantPlaten).%New()
+	
 	do ZijkantPlaten.Insert(..GeefZijkantPlaat())
+	
 	quit ZijkantPlaten
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHalffabItemZijkantPlaat">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem</ReturnType>
-<Implementation><![CDATA[	Quit ..HalffabItem.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantPlaat())
+<Implementation><![CDATA[	quit ..HalffabItem.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantPlaat())
 ]]></Implementation>
 </Method>
 
 <Method name="GeefZijkantPlaat">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.LadeInfo.impl.TAX.ZijkantPlaat</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.ZijkantPlaat).%New($this,..GeefHalffabItemZijkantPlaat(),..Kenmerken)
+<Implementation><![CDATA[	quit ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.ZijkantPlaat).%New($this, ..GeefHalffabItemZijkantPlaat(), ..Kenmerken)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefZijkantPlaatProductID">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefHalffabItemZijkantPlaat().GeefHalffab().GeefProductID()
+<Implementation><![CDATA[	quit ..GeefHalffabItemZijkantPlaat().GeefHalffab().GeefProductID()
 ]]></Implementation>
 </Method>
 </Class>