Index: APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox.cls.xml
===================================================================
diff -u -r30616 -r30744
--- APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 30616)
+++ APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 30744)
@@ -42,16 +42,19 @@
 	Set mdParams("BREEDTE") = KartonSnijdenData.KartonSpecificatie.Volume.Breedte
 	Set mdParams("DIEPTE") = KartonSnijdenData.KartonSpecificatie.Volume.Diepte
 	Set mdParams("HOOGTE") = KartonSnijdenData.KartonSpecificatie.Volume.Hoogte
+	
+	; Visitor avant-la-lettre  :-P 
+	If KartonSnijdenData.%Extends(##class(APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenDataLODoos).%ClassName($$$True)) {
+		Set mdParams("BREEDTECP")= KartonSnijdenData.BreedteGeleidervak
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="SnijDoos">
-<FormalSpec><![CDATA[KartonSnijdenData:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData,WerklijstItemID:%String,&Params:%String]]></FormalSpec>
+<FormalSpec><![CDATA[KartonSnijdenData:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData,WerklijstItemID:%String,&Params:%String,IsRework:%Boolean]]></FormalSpec>
 <Private>1</Private>
-<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	#dim CallBack As %List = $LB("APPS.Halux.PPS.Verpakking.impl.KartonSnijder", "CallBackOptimizer", WerklijstItemID)
-	#dim Status As %Status
 	
 	#dim ProxyStatus As BL.Sys.Proxy.pxStatus
 	Set ProxyStatus = ..OptiBox.OneBox(
@@ -62,11 +65,11 @@
 			"T." _ KartonSnijdenData.ToeleveringID,
 			KartonSnijdenData.ProductID,
 			CallBack,
-			..GeefSnijPrioriteit(KartonSnijdenData, $$$False),   // UitvoeringInfo.IsRework 
+			..GeefSnijPrioriteit(KartonSnijdenData, IsRework),
 			0,		// PPSOutput
 			KartonSnijdenData.MachineID	
 			)
-			
+	
 	If ProxyStatus.IsOK {
 		Set Status = $$$OK 
 	} Else {
@@ -83,36 +86,6 @@
 <Implementation><![CDATA[	Quit $S(IsRework:7, 1: KartonSnijdenData.SnijPrioriteit)
 ]]></Implementation>
 </Method>
-
-<Method name="VoerUit">
-<FormalSpec>LODoosInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.LODoosUitvoeringInfo</FormalSpec>
-<ReturnType>%Status</ReturnType>
-</Method>
-
-<Method name="VerwerkLODoosUitvoeringInfo">
-<FormalSpec>LODoosInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.LODoosUitvoeringInfo</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	Kill Params
-	Set Params("BREEDTE") = LODoosInfo.Breedte
-	Set Params("DIEPTE") = LODoosInfo.Diepte
-	Set Params("HOOGTE") = LODoosInfo.Hoogte
-	Set Params("BREEDTECP")= LODoosInfo.BreedteGeleidervak
-	Quit ..SnijDoos(LODoosInfo, .Params)
-]]></Implementation>
-</Method>
-
-<Method name="VerwerkLadeDoosUitvoeringInfo">
-<FormalSpec>LadeDoosInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.LadeDoosUitvoeringInfo</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	Kill Params
-	Set Params("BREEDTE") = LadeDoosInfo.Breedte
-	Set Params("DIEPTE") = LadeDoosInfo.Diepte
-	Set Params("HOOGTE") = LadeDoosInfo.Hoogte
-	Quit ..SnijDoos(LadeDoosInfo, .Params)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml
===================================================================
diff -u -r30740 -r30744
--- vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml	(.../Test.cls.xml)	(revision 30740)
+++ vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml	(.../Test.cls.xml)	(revision 30744)
@@ -94,7 +94,7 @@
 
 <Method name="TestV1LosseOnderdelenDoos">
 <Implementation><![CDATA[
-	#dim KartonSnijdenData As APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData = ..GeefKartonSnijdenData("V1 LosseOnderdelen")
+	#dim KartonSnijdenData As APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData = ..GeefKartonSnijdenDataV1LosseOnderdelenDoos("V1 LosseOnderdelen")
 	#dim WerklijstItemID As %String = ..#DummyWerklijstItemID
 	#dim IsRework As %Boolean = $$$False
 	
@@ -103,20 +103,7 @@
 	Set KartonSnijdenData.KartonSpecificatie.Volume.Diepte = KartonSnijdenData.KartonSpecificatie.Volume.Diepte+1
 	Set KartonSnijdenData.KartonSpecificatie.Volume.Hoogte = KartonSnijdenData.KartonSpecificatie.Volume.Hoogte+1
 	
-	Set UitvoeringInfo = ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.LODoosUitvoeringInfo).%New()
-	Set UitvoeringInfo.BreedteGeleidervak = 30
-	Set UitvoeringInfo.AantalDozen = 1
-	Set UitvoeringInfo.Breedte = KartonSnijdenData.KartonSpecificatie.Volume.Breedte
-	Set UitvoeringInfo.Diepte = KartonSnijdenData.KartonSpecificatie.Volume.Diepte
-	Set UitvoeringInfo.Hoogte = KartonSnijdenData.KartonSpecificatie.Volume.Hoogte
-	Set UitvoeringInfo.DoosGroep = KartonSnijdenData.DoosGroep
-	Set UitvoeringInfo.DoosNaam = KartonSnijdenData.DoosNaam
-	Set UitvoeringInfo.IsRework = IsRework
-	Set UitvoeringInfo.ProductID = KartonSnijdenData.ProductID
-	Set UitvoeringInfo.ToeleveringID = KartonSnijdenData.ToeleveringID
-	Set UitvoeringInfo.WerklijstItemID = WerklijstItemID
-	
-	Do ..AssertKartonSnijderOudeWijze(UitvoeringInfo)
+	Do ..AssertKartonSnijderOptiBox(KartonSnijdenData, WerklijstItemID, IsRework)
 ]]></Implementation>
 </Method>
 
@@ -159,18 +146,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKartonSnijdenDataV1LosseOnderdelenDoos">
+<FormalSpec>DoosNaam:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData</ReturnType>
+<Implementation><![CDATA[
+	Set KartonSnijdenData = ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenDataLODoos).%New()
+	Set KartonSnijdenData.BreedteGeleidervak = 30
+	Do ..VulInKartonSnijdenData(KartonSnijdenData,DoosNaam)
+	Quit KartonSnijdenData
+]]></Implementation>
+</Method>
+
 <Method name="GeefKartonSnijdenData">
 <FormalSpec>DoosNaam:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData</ReturnType>
 <Implementation><![CDATA[
 	Set KartonSnijdenData = ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData).%New()
+	Do ..VulInKartonSnijdenData(KartonSnijdenData,DoosNaam)
+	Quit KartonSnijdenData
+]]></Implementation>
+</Method>
+
+<Method name="VulInKartonSnijdenData">
+<FormalSpec>KartonSnijdenData:APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenData,DoosNaam:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
 	Set KartonSnijdenData.DoosGroep = "TAORBOX"
 	Set KartonSnijdenData.DoosNaam = DoosNaam
 	Set KartonSnijdenData.ToeleveringID = ..#DummyToeleveringID
 	Set KartonSnijdenData.ProductID = ..#TestProductID
 	Set KartonSnijdenData.KartonSpecificatie = ..MaakBodemDoosKartonSpecificatie(777,444,111)
-	Quit KartonSnijdenData
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/PPS/Activiteit/impl/common/dto/KartonSnijdenDataLODoos.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/common/dto/KartonSnijdenDataLODoos.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/common/dto/KartonSnijdenDataLODoos.cls.xml	(revision 30744)
@@ -0,0 +1,50 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.common.dto.KartonSnijdenDataLODoos">
+<Super>%Library.SerialObject,APPS.Halux.Machine.KartonSnijder.data.KartonSnijdenData</Super>
+
+<Property name="BreedteGeleidervak">
+<Type>%Numeric</Type>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>KartonSnijdenDataLODoosState</State>
+<StreamLocation>^APPS.Halux598A.KartonSnijdenDFS</StreamLocation>
+<Data name="KartonSnijdenDataLODoosState">
+<Value name="1">
+<Value>DoosGroep</Value>
+</Value>
+<Value name="2">
+<Value>DoosNaam</Value>
+</Value>
+<Value name="3">
+<Value>MachineID</Value>
+</Value>
+<Value name="4">
+<Value>SnijPrioriteit</Value>
+</Value>
+<Value name="5">
+<Value>KartonSpecificatie</Value>
+</Value>
+<Value name="6">
+<Value>AantalDozen</Value>
+</Value>
+<Value name="7">
+<Value>SnijStatus</Value>
+</Value>
+<Value name="8">
+<Value>ToeleveringID</Value>
+</Value>
+<Value name="9">
+<Value>ProductID</Value>
+</Value>
+<Value name="10">
+<Value>BreedteGeleidervak</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>