Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml
===================================================================
diff -u -r54466 -r54590
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml	(.../HFVerpakkingv001.cls.xml)	(revision 54466)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml	(.../HFVerpakkingv001.cls.xml)	(revision 54590)
@@ -34,12 +34,25 @@
 <Private>1</Private>
 </Property>
 
+<Property name="WikkelBreedteBepaler">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelBreedteBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WikkelLengteBepaler">
+<Type>DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelLengteBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder</FormalSpec>
+<FormalSpec>SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder,WikkelBreedteBepaler:DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelBreedteBepaler,WikkelLengteBepaler:DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelLengteBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	Set ..WikkelBreedteBepaler = $$$Inject(WikkelBreedteBepaler, ##class(DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelBreedteBepaler).%New())
+	Set ..WikkelLengteBepaler = $$$Inject(WikkelLengteBepaler, ##class(DOM.PM.Maatwerk.Calc.HF.impl.Wikkel.WikkelLengteBepaler).%New())
+
 	Set ..Rol = ..Enum.Rol.Verpakking
 	Set ..MaatwerkCalcAPI = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI()
 	
@@ -185,30 +198,39 @@
 <Method name="VerwerkProbox">
 <Private>1</Private>
 <Implementation><![CDATA[
-	if ..Context.GeefBerekenDatum() < $$INTDATE^vhLib.DataTypes("01.10.2017") {
-		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxWikkelv001).%New(##this))
-	} else {
-		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxWikkelv002).%New(##this))
+	If (..IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.LBXProductieWijze).Volledig()) {
+		if ..Context.GeefBerekenDatum() < $$INTDATE^vhLib.DataTypes("01.10.2017") {
+			Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxWikkelv001).%New(##this))
+		} else {
+			Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxWikkelv002).%New(##this))
+		}
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxPalletv001).%New(##this))
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxBodemdoosv001).%New(##this))
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxDekseldoosv001).%New(##this))
+		Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxOnderdelendoosv001).%New(##this))
+	} Else
+	{
+		Do ..Builders.Insert(..GeefVerpakkingBuilderWikkel())
 	}
-	Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxPalletv001).%New(##this))
-	Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxBodemdoosv001).%New(##this))
-	Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxDekseldoosv001).%New(##this))
-	Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxOnderdelendoosv001).%New(##this))
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkV1">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(..HalffabItemsBoom, ..IngegevenKenmerken)
-	#dim Specificaties As DOM.PM.Verpakking.dto.KartonSpecificaties = DoosBerekenaar.GeefKartonSpecificaties()
-	#dim Iterator As TECH.Iterator = Specificaties.GeefIterator()
-	
-	While Iterator.HasNext() {
-		#dim Specificatie As DOM.PM.Verpakking.dto.KartonSpecificatie = Iterator.Next()
-		#dim Builder As DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001 = ##class(DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001).%New(##this, Specificatie)
+	If (..IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.LBXProductieWijze).Volledig()) {
+		#dim DoosBerekenaar As APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar = ##class(APPS.Halux.PPS.TAORVerpakking.impl.DoosBerekenaar).%New(..HalffabItemsBoom, ..IngegevenKenmerken)
+		#dim Specificaties As DOM.PM.Verpakking.dto.KartonSpecificaties = DoosBerekenaar.GeefKartonSpecificaties()
+		#dim Iterator As TECH.Iterator = Specificaties.GeefIterator()
 		
-		Do ..Builders.Insert(Builder)
+		While Iterator.HasNext() {
+			#dim Specificatie As DOM.PM.Verpakking.dto.KartonSpecificatie = Iterator.Next()
+			#dim Builder As DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001 = ##class(DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001).%New(##this, Specificatie)
+			
+			Do ..Builders.Insert(Builder)
+		}
+	} Else {
+		Do ..Builders.Insert(..GeefVerpakkingBuilderWikkel())
 	}
 ]]></Implementation>
 </Method>
@@ -223,6 +245,21 @@
 	Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.Probox.Builder.HFProboxOnderdelendoosv001).%New(##this))
 ]]></Implementation>
 </Method>
+
+<Method name="GeefVerpakkingBuilderWikkel">
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001</ReturnType>
+<Implementation><![CDATA[
+	#dim Benaming As %String = ##class(DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel).Wikkel()
+	#dim KartonSamenstelling As DOM.PM.Verpakking.enu.KartonSamenstelling = ##class(DOM.PM.Verpakking.enu.KartonSamenstelling).Dun()
+	
+	#dim Breedte As TECH.Decimal = ..WikkelBreedteBepaler.BepaalWikkelBreedte(..IngegevenKenmerken)
+	#dim Lengte As TECH.Decimal = ..WikkelLengteBepaler.BepaalWikkelLengte(..IngegevenKenmerken)
+	Set KartonSpecificatie = ##class(DOM.PM.Verpakking.dto.KartonSpecificatie).%New(Benaming, Lengte, Breedte, KartonSamenstelling)
+	
+	Quit ##class(DOM.PM.Maatwerk.Calc.HF.impl.HFV1Verpakkingv001).%New(##this, KartonSpecificatie)
+]]></Implementation>
+</Method>
 </Class>