Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml
===================================================================
diff -u -r30633 -r30651
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml	(.../HFZijkantPlaatv000.cls.xml)	(revision 30633)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml	(.../HFZijkantPlaatv000.cls.xml)	(revision 30651)
@@ -3,6 +3,11 @@
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantPlaatv000">
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFZijkantPlaatv000,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
+<Property name="ZijkantRol">
+<Type>DOM.PM.Maatwerk.Calc.HF.enu.TAORRol</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="ZijkantPlaatRol">
 <Type>DOM.PM.Maatwerk.Lade.enu.ZijkantPlaatRol</Type>
 <Private>1</Private>
@@ -14,6 +19,7 @@
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	set ..ZijkantRol = SamengesteldHalffabItemBuilder.GeefRol()
 	set ..ZijkantPlaatRol = ZijkantPlaatRol
 	
 	quit ##super(SamengesteldHalffabItemBuilder)
@@ -39,7 +45,7 @@
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Decimal</ReturnType>
-<Implementation><![CDATA[	quit IngegevenKenmerken.LadeDiepte - $Select(IngegevenKenmerken.Concept = ##class(DOM.PM.enu.TAORConcept).Valinge():5, 1:13)
+<Implementation><![CDATA[	quit IngegevenKenmerken.LadeDiepte - $Select(IngegevenKenmerken.Concept = ..Enum.Concept.Valinge:5, 1:13)
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFBodemPlaatv000.cls.xml
===================================================================
diff -u -r30191 -r30651
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFBodemPlaatv000.cls.xml	(.../HFBodemPlaatv000.cls.xml)	(revision 30191)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFBodemPlaatv000.cls.xml	(.../HFBodemPlaatv000.cls.xml)	(revision 30651)
@@ -1,28 +1,34 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFBodemPlaatv000">
-<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFBodemPlaatv000</Super>
+<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFBodemPlaatv000,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
+<Property name="TAORRol">
+<Type>DOM.PM.Maatwerk.Calc.HF.enu.TAORRol.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Do ##super(SamengesteldHalffabItemBuilder)
+	do ##super(SamengesteldHalffabItemBuilder)
+
+	set ..AfhankelijkVan = ..AfhankelijkVan _ ..TAORRol.ZijkantLinks _ ";"
+	set ..AfhankelijkVan = ..AfhankelijkVan _ ..TAORRol.ZijkantRechts _ ";"
+	set ..AfhankelijkVan = ..AfhankelijkVan _ ..TAORRol.Rug _ ";"
+	set ..AfhankelijkVan = ..AfhankelijkVan _ ..TAORRol.Front
 	
-	Set ..AfhankelijkVan = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantLinks()_";"
-						  _##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).ZijkantRechts()_";"
-						  _##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Rug()_";"
-						  _##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Front()
-	Quit $$$OK
+	quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="GeefHalffabListToItemProcessor">
 <Private>1</Private>
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabListToItemProcessor</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFBodemPlaatv000Processor).%New()
+<Implementation><![CDATA[	quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFBodemPlaatv000Processor).%New()
 ]]></Implementation>
 </Method>
 
@@ -33,34 +39,37 @@
 <ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
 <Implementation><![CDATA[
 	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##class(%ArrayOfDataTypes).%New()
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefBodemPlaatBreedteInMM(IngegevenKenmerken),"Breedte")
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefBodemPlaatLengteInMM(IngegevenKenmerken),"Lengte")
-	Quit AfmetingPerBewerkteDimensie
+	
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefBodemPlaatBreedteInMM(IngegevenKenmerken), "Breedte")
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefBodemPlaatLengteInMM(IngegevenKenmerken), "Lengte")
+	
+	quit AfmetingPerBewerkteDimensie
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBodemPlaatLengteInMM">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.Integer</ReturnType>
-<Implementation><![CDATA[	Quit IngegevenKenmerken.InterneBreedte - $select(IngegevenKenmerken.Concept = ##class(DOM.PM.enu.TAORConcept).Valinge():31,1:32)
+<Implementation><![CDATA[	quit IngegevenKenmerken.InterneBreedte - $select(IngegevenKenmerken.Concept = ..Enum.Concept.Valinge:31, 1:32)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefBodemPlaatBreedteInMM">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Decimal</ReturnType>
-<Implementation><![CDATA[	Quit IngegevenKenmerken.LadeDiepte - 20 + $select(IngegevenKenmerken.Concept = ##class(DOM.PM.enu.TAORConcept).Baliko():-1,1:0)
+<Implementation><![CDATA[	quit IngegevenKenmerken.LadeDiepte - 20 + $select(IngegevenKenmerken.Concept = ..Enum.Concept.Baliko:-1, 1:0)
 ]]></Implementation>
 </Method>
 
 <Method name="PostProcessHalffabItem">
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	// Specifieke PostProcessor voor BodemPlaat !!! 
-	Set PostProcessor = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.BodemPlaatBewerktHalffabItemPostProcessor).%New(..GeefAfmetingAangerekendPerStukBerekenaar(), ..GeefTeBekomenAantal(IngegevenKenmerken), ..GeefBewerkteDimensies(IngegevenKenmerken), ..GeefTeBekomenAfmetingPerBewerkteDimensie(IngegevenKenmerken))
-	Do PostProcessor.Verwerk(HalffabItem, IngegevenKenmerken, Context)
+	#dim PostProcessor As DOM.PM.Maatwerk.Calc.HF.IBewerktHalffabItemPostProcessor = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.BodemPlaatBewerktHalffabItemPostProcessor).%New(..GeefAfmetingAangerekendPerStukBerekenaar(), ..GeefTeBekomenAantal(IngegevenKenmerken), ..GeefBewerkteDimensies(IngegevenKenmerken), ..GeefTeBekomenAfmetingPerBewerkteDimensie(IngegevenKenmerken))
+	
+	do PostProcessor.Verwerk(HalffabItem, IngegevenKenmerken, Context)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFFrontPlaatv000.cls.xml
===================================================================
diff -u -r30191 -r30651
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFFrontPlaatv000.cls.xml	(.../HFFrontPlaatv000.cls.xml)	(revision 30191)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFFrontPlaatv000.cls.xml	(.../HFFrontPlaatv000.cls.xml)	(revision 30651)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFFrontPlaatv000">
-<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFFrontPlaatv000</Super>
+<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFFrontPlaatv000,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
 <Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
@@ -11,16 +11,17 @@
 <Implementation><![CDATA[
 	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##super(IngegevenKenmerken)
 	
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefFrontPlaatHoogteInMM(IngegevenKenmerken),"Breedte")
-	Quit AfmetingPerBewerkteDimensie
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefFrontPlaatHoogteInMM(IngegevenKenmerken), "Breedte")
+	
+	quit AfmetingPerBewerkteDimensie
 ]]></Implementation>
 </Method>
 
 <Method name="GeefFrontPlaatHoogteInMM">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefFrontHoogteInMM(IngegevenKenmerken.LadeHoogte) - 0
+<Implementation><![CDATA[	quit ..GeefFrontHoogteInMM(IngegevenKenmerken.LadeHoogte) - 0
 ]]></Implementation>
 </Method>
 
@@ -29,26 +30,29 @@
 <Private>1</Private>
 <ReturnType>TECH.Decimal</ReturnType>
 <Implementation><![CDATA[
-	#dim FrontHoogteInMM As TECH.Decimal = $CASE(Hoogte, 
-												##class(DOM.PM.enu.TAORZijkantHoogte).N():	80,
-												##class(DOM.PM.enu.TAORZijkantHoogte).M():	103.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).K():	141.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).C():	191.5,
-												:0
-											)
-	If FrontHoogteInMM = 0 {
-		Set Exceptie = ##class(TECH.Exceptions.GeneralErrorException).%New("De front hoogte, '"_Hoogte_"', kan niet in mm omgezet worden.")
-		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	#dim FrontHoogteInMM As TECH.Decimal = ""
+	
+	if (Hoogte = ..Enum.ZijkantHoogte.N) {
+		set FrontHoogteInMM = 80
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.M) {
+		set FrontHoogteInMM = 103.5
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.K) {
+		set FrontHoogteInMM = 141.5
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.C) {
+		set FrontHoogteInMM = 191.5
+	} else {
+		do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("De front hoogte, '" _ Hoogte _ "', kan niet in mm omgezet worden."))
 	}
-	Quit FrontHoogteInMM
+
+	quit FrontHoogteInMM
 ]]></Implementation>
 </Method>
 
 <Method name="BuilderMoetWerken">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit 1
+<Implementation><![CDATA[	quit 1
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFRugPlaatv000.cls.xml
===================================================================
diff -u -r30142 -r30651
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFRugPlaatv000.cls.xml	(.../HFRugPlaatv000.cls.xml)	(revision 30142)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFRugPlaatv000.cls.xml	(.../HFRugPlaatv000.cls.xml)	(revision 30651)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFRugPlaatv000">
-<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFRugPlaatv000</Super>
+<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFRugPlaatv000,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
 <Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
@@ -10,17 +10,19 @@
 <ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
 <Implementation><![CDATA[
 	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##class(%ArrayOfDataTypes).%New()
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefRugPlaatBreedteInMM(IngegevenKenmerken),"Breedte")
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefRugPlaatLengteInMM(IngegevenKenmerken),"Lengte")
-	Quit AfmetingPerBewerkteDimensie
+	
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefRugPlaatBreedteInMM(IngegevenKenmerken), "Breedte")
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefRugPlaatLengteInMM(IngegevenKenmerken), "Lengte")
+	
+	quit AfmetingPerBewerkteDimensie
 ]]></Implementation>
 </Method>
 
 <Method name="GeefRugPlaatLengteInMM">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.Integer</ReturnType>
-<Implementation><![CDATA[	Quit IngegevenKenmerken.InterneBreedte - $select(IngegevenKenmerken.Concept=##class(DOM.PM.enu.TAORConcept).Valinge():31,1:42)
+<Implementation><![CDATA[	quit IngegevenKenmerken.InterneBreedte - $select(IngegevenKenmerken.Concept = ..Enum.Concept.Valinge:31, 1:42)
 ]]></Implementation>
 </Method>
 
@@ -30,15 +32,16 @@
 <ReturnType>%Decimal</ReturnType>
 <Implementation><![CDATA[
 	#dim LadeRugUtils As DOM.PM.Maatwerk.Lade.RugUtils = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI().GeefLadeRugUtils(##class(DOM.PM.enu.LadeVariant).TAOR())
-	Quit LadeRugUtils.GeefRugHoogteInMm(IngegevenKenmerken.LadeHoogte)
+	
+	quit LadeRugUtils.GeefRugHoogteInMm(IngegevenKenmerken.LadeHoogte)
 ]]></Implementation>
 </Method>
 
 <Method name="BuilderMoetWerken">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit (IngegevenKenmerken.ProductieWijze ? 1(1"R",1""))
+<Implementation><![CDATA[	quit (IngegevenKenmerken.ProductieWijze ? 1(1"R",1""))
 ]]></Implementation>
 </Method>
 </Class>