Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml
===================================================================
diff -u -r30413 -r30415
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml	(.../HFZijkantPlaatv000.cls.xml)	(revision 30413)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantPlaatv000.cls.xml	(.../HFZijkantPlaatv000.cls.xml)	(revision 30415)
@@ -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.HFZijkantPlaatv000">
-<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFZijkantPlaatv000</Super>
+<Super>DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.Generated.HFZijkantPlaatv000,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
 <Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
@@ -10,25 +10,27 @@
 <ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
 <Implementation><![CDATA[
 	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##class(%ArrayOfDataTypes).%New()
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefZijkantPlaatHoogteInMM(IngegevenKenmerken),##class(DOM.PM.enu.BewerkingDimensie).Breedte())
-	Do AfmetingPerBewerkteDimensie.SetAt(..GeefZijkantPlaatDiepteInMM(IngegevenKenmerken),##class(DOM.PM.enu.BewerkingDimensie).Lengte())
-	Quit AfmetingPerBewerkteDimensie
+	
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefZijkantPlaatHoogteInMM(IngegevenKenmerken), ##class(DOM.PM.enu.BewerkingDimensie).Breedte())
+	do AfmetingPerBewerkteDimensie.SetAt(..GeefZijkantPlaatDiepteInMM(IngegevenKenmerken), ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
+	
+	quit AfmetingPerBewerkteDimensie
 ]]></Implementation>
 </Method>
 
 <Method name="GeefZijkantPlaatDiepteInMM">
 <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 = ##class(DOM.PM.enu.TAORConcept).Valinge():5, 1:13)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefZijkantPlaatHoogteInMM">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Decimal</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefZijkantHoogteInMM(IngegevenKenmerken.LadeHoogte) - 0
+<Implementation><![CDATA[	quit ..GeefZijkantHoogteInMM(IngegevenKenmerken.LadeHoogte) - 0
 ]]></Implementation>
 </Method>
 
@@ -37,35 +39,39 @@
 <Private>1</Private>
 <ReturnType>TECH.Decimal</ReturnType>
 <Implementation><![CDATA[
-	#dim ZijkantHoogteInMM As TECH.Decimal = $CASE(Hoogte, 
-												##class(DOM.PM.enu.TAORZijkantHoogte).N():	64.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).M():	86.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).K():	124.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).C():	174.5,
-												##class(DOM.PM.enu.TAORZijkantHoogte).F():	238.5,
-												:0
-											)
-	If ZijkantHoogteInMM = 0 {
-		Set Exceptie = ##class(TECH.Exceptions.GeneralErrorException).%New("De zijkant hoogte, '"_Hoogte_"', kan niet in mm omgezet worden.")
-		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
-	}
-	Quit ZijkantHoogteInMM
+	#dim ZijkantHoogteInMM As TECH.Decimal = ""
+						
+	if (Hoogte = ..Enum.ZijkantHoogte.N) {
+		set ZijkantHoogteInMM = 64.5	
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.M) {
+		set ZijkantHoogteInMM = 86.5	
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.K) {
+		set ZijkantHoogteInMM = 124.5	
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.C) {
+		set ZijkantHoogteInMM = 174.5	
+	} elseif (Hoogte = ..Enum.ZijkantHoogte.F) {
+		set ZijkantHoogteInMM = 238.5	
+	} else {
+		do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("De zijkant hoogte, '" _ Hoogte _ "', kan niet in mm omgezet worden."))
+	}								
+
+	quit ZijkantHoogteInMM
 ]]></Implementation>
 </Method>
 
 <Method name="GeefTeBekomenAantal">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Decimal</ReturnType>
-<Implementation><![CDATA[	Quit 1
+<Implementation><![CDATA[	quit 1
 ]]></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/HFZijkantv000.cls.xml
===================================================================
diff -u -r30413 -r30415
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantv000.cls.xml	(.../HFZijkantv000.cls.xml)	(revision 30413)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFZijkantv000.cls.xml	(.../HFZijkantv000.cls.xml)	(revision 30415)
@@ -9,15 +9,16 @@
 <Private>1</Private>
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[
-	Set Builders = ##class(%ListOfObjects).%New()
+	#dim Builders As %ListOfObjects = ##class(%ListOfObjects).%New()
+	
 	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantPlaatv000).%New(##this))
 	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantPlaatv000).%New(##this))
-	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBestukkingv000).%New(##this))
-	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBestukkingVooraanv000).%New(##this))
-	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBevestigingVeerv001).%New(##this))
-	Do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandZijkantv000).%New(##this))
+	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBestukkingv000).%New(##this))
+	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBestukkingVooraanv000).%New(##this))
+	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFZijkantBevestigingVeerv001).%New(##this))
+	do Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFKantenBandZijkantv000).%New(##this))
 
-	Quit ##class(TECH.ListIterator).%New(Builders)
+	quit ##class(TECH.ListIterator).%New(Builders)
 ]]></Implementation>
 </Method>
 </Class>