Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml
===================================================================
diff -u -r69889 -r69890
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml	(.../BuilderHFv002.cls.xml)	(revision 69889)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/BuilderHFv002.cls.xml	(.../BuilderHFv002.cls.xml)	(revision 69890)
@@ -47,6 +47,7 @@
 	Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDiepteVerstellingSchroefv001).%New(##this)
 	Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDwarsverdelingv001).%New(##this)
 	Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDwarsverdelingHouderv001).%New(##this)
+	Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDwarsverdelingOnderv001).%New(##this)
 	Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDwarsverdelingDubbelHouderv001).%New(##this)
 	
 	Do ..VoegToeVerpakking()
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFDwarsverdelingOnderv001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFDwarsverdelingOnderv001.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFDwarsverdelingOnderv001.cls.xml	(revision 69890)
@@ -0,0 +1,83 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFDwarsverdelingOnderv001">
+<Super>DOM.PM.Maatwerk.TAX.impl.Base,DOM.PM.Maatwerk.Calc.HF.IBewerktHalffabItemBuilder</Super>
+
+<Property name="AfhankelijkVan">
+<Type>%String</Type>
+<InitialExpression>##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Dwarsverdeling()</InitialExpression>
+<Private>1</Private>
+<Parameter name="TRUNCATE" value="1"/>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..Rol=##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Dwarsverdeling()
+	Quit ##class(DOM.PM.Maatwerk.Calc.HF.IBewerktHalffabItemBuilder)##this.%OnNew(SamengesteldHalffabItemBuilder)
+]]></Implementation>
+</Method>
+
+<Method name="GenereerKenmerken">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	Set SelectieKenmerken=##class(%ArrayOfDataTypes).%New()
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.DwarsverdelingKleur,"DwarsverdelingKleur")
+	Quit SelectieKenmerken
+]]></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.Processor.HFItemProcessorExactEenBewerkt).%New()
+]]></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 ($IsObject(Context.HalffabItemsBoom.GeefHalffabItem("Dwarsverdeling"))) && (IngegevenKenmerken.DwarsverdelingType = ..Enum.DwarsverdelingType.Dubbel) && (IngegevenKenmerken.ProductieWijze ? 1(1""))
+]]></Implementation>
+</Method>
+
+<Method name="GeefBewerkteDimensies">
+<Private>1</Private>
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	Set BewerkteDimensies = ##class(%ListOfDataTypes).%New()
+	Do BewerkteDimensies.Insert("Lengte")
+	Quit BewerkteDimensies
+]]></Implementation>
+</Method>
+
+<Method name="GeefTeBekomenAfmetingPerBewerkteDimensie">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<ReturnTypeParams>ELEMENTTYPE="%Decimal"</ReturnTypeParams>
+<Implementation><![CDATA[
+	#dim AfmetingPerBewerkteDimensie As array of %Decimal = ##class(%ArrayOfDataTypes).%New()
+	Do AfmetingPerBewerkteDimensie.SetAt(IngegevenKenmerken.InterneBreedte - 160,"Lengte")
+	Quit AfmetingPerBewerkteDimensie
+]]></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[
+	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
+	Set HalffabItem.TeBekomenAantal = HalffabItem.TeBekomenAantal*IngegevenKenmerken.AantalDwarsverdelingen
+	Set HalffabItem.Aantal = HalffabItem.Aantal*IngegevenKenmerken.AantalDwarsverdelingen
+	Set HalffabItem.ProductieRoute = $$$If(IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.FlatpackV1, ..Enum.ProductieRoute.OnderdelenPicking, ..Enum.ProductieRoute.TeMonteren)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>