Index: zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml
===================================================================
diff -u -r31602 -r31958
--- zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml	(.../FlatpackV1Service.cls.xml)	(revision 31602)
+++ zTryout/WV/FPV1/DOM/impl/FlatpackV1Service.cls.xml	(.../FlatpackV1Service.cls.xml)	(revision 31958)
@@ -1,13 +1,14 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="zTryout.WV.FPV1.DOM.impl.FlatpackV1Service">
-<Super>TECH.RegisteredObject</Super>
+<Super>TECH.RegisteredObject,zTryout.WV.FPV1.DOM.FlatpackV1Service</Super>
 
 <Method name="GeefDraagPlaatVoorOnderdelen">
 <FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade</FormalSpec>
 <ReturnType>zTryout.WV.FPV1.DOM.dto.DraagPlaat</ReturnType>
 <Implementation><![CDATA[
-	Set StapelbareBreedteBepaler = ##class(zTryout.WV.FPV1.DOM.impl.StapelbareBreedteBepaler).%New()
+	#dim StapelbareBreedteBepaler As  zTryout.WV.FPV1.DOM.impl.StapelbareBreedteBepaler = ##class(zTryout.WV.FPV1.DOM.impl.StapelbareBreedteBepaler).%New()
+	
 	Quit StapelbareBreedteBepaler.GeefDraagPlaat(Lade)
 ]]></Implementation>
 </Method>
@@ -23,21 +24,67 @@
 <ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[
 	#dim GewichtInGram As %Numeric = ""
-	If DraagPlaat.Lengte = 700 {
-		Set GewichtInGram = $S(DraagPlaat.Breedte=190:35, 1:37.5)
-	}
-	ElseIf DraagPlaat.Lengte = 1060 {
-		Set GewichtInGram = $S(DraagPlaat.Breedte=190:50, 1:55)
-	}
-	ElseIf DraagPlaat.Lengte = 1260 {
-		Set GewichtInGram = $S(DraagPlaat.Breedte=190:70, 1:75)
-	}
-	Else {
+	
+	If (DraagPlaat.Lengte = 700) {
+		Set GewichtInGram = $Select((DraagPlaat.Breedte = 190):35, 1:37.5)
+	} ElseIf (DraagPlaat.Lengte = 1060) {
+		Set GewichtInGram = $Select((DraagPlaat.Breedte = 190):50, 1:55)
+	} ElseIf (DraagPlaat.Lengte = 1260) {
+		Set GewichtInGram = $Select((DraagPlaat.Breedte = 190):70, 1:75)
+	} Else {
 		;Exception TO DO 
 	}
+	
 	Quit GewichtInGram
 ]]></Implementation>
 </Method>
+
+<Method name="GeefDoosVariant">
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	Quit ..BepaalDoosVariantBreedteCode(DraagPlaat) _ ..BepaalDoosVariantLengteCode(DraagPlaat)
+]]></Implementation>
+</Method>
+
+<Method name="BepaalDoosVariantBreedteCode">
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim BreedteCode As TECH.String
+	
+	If (DraagPlaat.Breedte = 190) {
+		Set BreedteCode = "S"	
+	} ElseIf (DraagPlaat.Breedte = 250) {
+		Set BreedteCode = "B"	
+	} Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen BreedteCode gevonden voor DraagPlaat met breedte: '" _ DraagPlaat.Breedte _ "'."))
+	}
+	
+	Quit BreedteCode
+]]></Implementation>
+</Method>
+
+<Method name="BepaalDoosVariantLengteCode">
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim LengteCode As TECH.String
+	
+	If (DraagPlaat.Lengte = 700) {
+		Set LengteCode = "1"	
+	} ElseIf (DraagPlaat.Lengte = 1060) {
+		Set LengteCode = "2"	
+	} ElseIf (DraagPlaat.Lengte = 1260) {
+		Set LengteCode = "3"	
+	} Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen LengteCode gevonden voor DraagPlaat met lengte: '" _ DraagPlaat.Lengte _ "'."))
+	}
+
+	Quit LengteCode
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Mock/zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml
===================================================================
diff -u
--- vhTest/Mock/zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml	(revision 0)
+++ vhTest/Mock/zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml	(revision 31958)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.zTryout.WV.FPV1.DOM.FlatpackV1Service">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>zTryout.WV.FPV1.DOM.FlatpackV1Service,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefDoosVariant">
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDoosVariant",DraagPlaat)
+]]></Implementation>
+</Method>
+
+<Method name="GeefDraagPlaatVoorOnderdelen">
+<FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade</FormalSpec>
+<ReturnType>zTryout.WV.FPV1.DOM.dto.DraagPlaat</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDraagPlaatVoorOnderdelen",Lade)
+]]></Implementation>
+</Method>
+
+<Method name="GeefWikkelFolieGewichtInGram">
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWikkelFolieGewichtInGram",DraagPlaat)
+]]></Implementation>
+</Method>
+
+<Method name="GeefWikkelFolieProductID">
+<ReturnType>DOM.common.ProductID</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWikkelFolieProductID")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml
===================================================================
diff -u
--- zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml	(revision 0)
+++ zTryout/WV/FPV1/DOM/FlatpackV1Service.cls.xml	(revision 31958)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.WV.FPV1.DOM.FlatpackV1Service">
+<Abstract>1</Abstract>
+<Super>TECH.Interface</Super>
+
+<Method name="GeefDraagPlaatVoorOnderdelen">
+<Abstract>1</Abstract>
+<FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade</FormalSpec>
+<ReturnType>zTryout.WV.FPV1.DOM.dto.DraagPlaat</ReturnType>
+</Method>
+
+<Method name="GeefWikkelFolieProductID">
+<Abstract>1</Abstract>
+<ReturnType>DOM.common.ProductID</ReturnType>
+</Method>
+
+<Method name="GeefWikkelFolieGewichtInGram">
+<Abstract>1</Abstract>
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<ReturnType>%Numeric</ReturnType>
+</Method>
+
+<Method name="GeefDoosVariant">
+<Abstract>1</Abstract>
+<FormalSpec>DraagPlaat:zTryout.WV.FPV1.DOM.dto.DraagPlaat</FormalSpec>
+<ReturnType>TECH.String</ReturnType>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportManueel/15000/Productie_009_ImportFile_15000_20141114_091500.txt
===================================================================
diff -u -r31953 -r31958
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportManueel/15000/Productie_009_ImportFile_15000_20141114_091500.txt	(.../Productie_009_ImportFile_15000_20141114_091500.txt)	(revision 31953)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportManueel/15000/Productie_009_ImportFile_15000_20141114_091500.txt	(.../Productie_009_ImportFile_15000_20141114_091500.txt)	(revision 31958)
@@ -1,15 +1,15 @@
 Rol	Aantal	PlaatMateriaal	Barcode	LadeSequentieNr	DossierCode	ExtraInfo	Lengte	Breedte	Dikte	Kleur	Decor	EtiketLijn1	EtiketLijn2	EtiketLijn3	EtiketInfo	EtiketLijn4
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
-Rug	1	FINEER.NN.130	RCV05690BS00001D1	1	LI7K		574	169.5	13	NN	Fineer	RUG/NN-NN/574x169.5/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		RCV05690BS00001D1/B:600xH:210
-Bodem	1	FINEER.NN.065	B50B05690VS00001S2	1	LI7K		574	500.8	6.5	NN	Fineer	BOD(SCH:BO)/NN/574x480/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		B50B05690VS00001S2/B:600xD:500
-Front	1	FINEER.NN.090	FCV05850BS00001D1	1	LI7K		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		FCV05850BS00001D1/B:600xH:210
-ZijkantPlaat	1	MELAMINE.W.065	ZCV50L00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCV50L00002/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00002/D:500xH:210
-ZijkantPlaat	1	MELAMINE.W.065	ZCV50R00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCV50R00002/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00002/D:500xH:210
-Rug	1	MELAMINE.W.130	RCV05690VS00002D1	2	LI7L		574	169.5	13	W	Melamine	RUG/W-NN/574x169.5/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		RCV05690VS00002D1/B:600xH:210
-Bodem	1	MELAMINE.S.065	B50W05690VS00002S2	2	LI7L		574	500.8	6.5	S	Melamine	BOD(SCH:BO)/S/574x480/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		B50W05690VS00002S2/B:600xD:500
-Front	1	FINEER.NN.090	FCV05850BS00002D1	2	LI7L		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		FCV05850BS00002D1/B:600xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
+Rug	1	FINEER.NN.130	RCV05690BS00001D1	1	LI7K		574	169.5	13	NN	Fineer	RUG/NN-NN/574x169.5/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		RCV05690BS00001D1/B:600xH:210
+Bodem	1	FINEER.NN.065	B50B05690VS00001S2	1	LI7K		574	500.8	6.5	NN	Fineer	BOD(SCH:BO)/NN/574x480/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		B50B05690VS00001S2/B:600xD:500
+Front	1	FINEER.NN.090	FCV05850BS00001D1	1	LI7K		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		FCV05850BS00001D1/B:600xH:210
+ZijkantPlaat	1	MELAMINE.W.065	ZCV50L00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCV50L00002/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00002/D:500xH:210
+ZijkantPlaat	1	MELAMINE.W.065	ZCV50R00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCV50R00002/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00002/D:500xH:210
+Rug	1	MELAMINE.W.130	RCV05690VS00002D1	2	LI7L		574	169.5	13	W	Melamine	RUG/W-NN/574x169.5/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		RCV05690VS00002D1/B:600xH:210
+Bodem	1	MELAMINE.S.065	B50W05690VS00002S2	2	LI7L		574	500.8	6.5	S	Melamine	BOD(SCH:BO)/S/574x480/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		B50W05690VS00002S2/B:600xD:500
+Front	1	FINEER.NN.090	FCV05850BS00002D1	2	LI7L		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		FCV05850BS00002D1/B:600xH:210
Index: vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking/GeefDoosVariant/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking/GeefDoosVariant/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking/GeefDoosVariant/Test.cls.xml	(revision 31958)
@@ -0,0 +1,70 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.LadeInfo.impl.TAX.Verpakking.GeefDoosVariant.Test">
+<Super>vhUnitTest.DOM.PM.Maatwerk.TAX.Base</Super>
+
+<Property name="HalffabItemsBoom">
+<Type>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="IngegevenKenmerken">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Verpakking">
+<Type>DOM.PM.Maatwerk.LadeInfo.impl.TAX.Verpakking</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:TECH.String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+
+	Set ..IngegevenKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardLade()
+	Set ..HalffabItemsBoom = ..GeefCustomizedHalffabItemsBoom(..IngegevenKenmerken, ##class(DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilderList).%New())
+]]></Implementation>
+</Method>
+
+<Method name="Test: DoosVariant is leeg voor alle VerpakkingTypes uitgezonderd voor FlatpackV1">
+<Implementation><![CDATA[
+	Do ..AssertDoosVariantVoorVerpakkingType(..Enum.VerpakkingType.V1, "")
+	Do ..AssertDoosVariantVoorVerpakkingType(..Enum.VerpakkingType.Probox, "")
+	Do ..AssertDoosVariantVoorVerpakkingType(..Enum.VerpakkingType.BulkPerOnderdeelGegroepeerd, "")
+	Do ..AssertDoosVariantVoorVerpakkingType(..Enum.VerpakkingType.LosseComponentenInBulk, "")
+]]></Implementation>
+</Method>
+
+<Method name="Test: FlatpackV1Service wordt opgeroepen voor DoosVariant met VerpakkingType FlatpackV1">
+<Implementation><![CDATA[
+	#dim FlatpackV1ServiceMock As vhTest.Mock.zTryout.WV.FPV1.DOM.FlatpackV1Service = ##class(vhTest.Mock.zTryout.WV.FPV1.DOM.FlatpackV1Service).%New()
+	#dim DraagPlaat As zTryout.WV.FPV1.DOM.dto.DraagPlaat = ##class(zTryout.WV.FPV1.DOM.dto.DraagPlaat).%New()
+	
+	Set ..IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.FlatpackV1
+	Set ..Verpakking = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Verpakking).%New(..HalffabItemsBoom, ..IngegevenKenmerken, FlatpackV1ServiceMock)
+
+	Do FlatpackV1ServiceMock.VerwachtMethodCall("GeefDraagPlaatVoorOnderdelen", $$$ElkeWaarde).DanReturn(DraagPlaat)
+	Do FlatpackV1ServiceMock.VerwachtMethodCall("GeefDoosVariant", DraagPlaat)
+	
+	Do ..Verpakking.GeefDoosVariant()
+	
+	Do FlatpackV1ServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="AssertDoosVariantVoorVerpakkingType">
+<FormalSpec>VerpakkingType:DOM.PM.enu.TAORVerpakkingType,VerwachteWaarde:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ..IngegevenKenmerken.VerpakkingType = VerpakkingType
+	Set ..Verpakking = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.Verpakking).%New(..HalffabItemsBoom, ..IngegevenKenmerken)
+	
+	Do $$$AssertEquals(..Verpakking.GeefDoosVariant(), VerwachteWaarde)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/GeefDoosVariant/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/GeefDoosVariant/Test.cls.xml	(revision 0)
+++ vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/GeefDoosVariant/Test.cls.xml	(revision 31958)
@@ -0,0 +1,106 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.zTryout.WV.FPV1.DOM.impl.FlatpackV1Service.GeefDoosVariant.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="FlatpackV1Service">
+<Type>zTryout.WV.FPV1.DOM.FlatpackV1Service</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Set ..FlatpackV1Service = ##class(zTryout.WV.FPV1.DOM.impl.FlatpackV1Service).%New()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Exceptie bij ophalen van DoosVariantCode voor ongeldige DraagPlaat breedte">
+<Implementation><![CDATA[
+	#define OngeldigeBreedte 123
+	#define GeldigeLengte 700
+	
+	Do ..AssertExceptieVoorDraagPlaatAfmetingen($$$OngeldigeBreedte, $$$GeldigeLengte, "Geen BreedteCode gevonden voor DraagPlaat met breedte:")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Exceptie bij ophalen van DoosVariantCode voor ongeldige DraagPlaat lengte">
+<Implementation><![CDATA[
+	#define GeldigeBreedte 190
+	#define OngeldigeLengte 123
+	
+	Do ..AssertExceptieVoorDraagPlaatAfmetingen($$$GeldigeBreedte, $$$OngeldigeLengte, "Geen LengteCode gevonden voor DraagPlaat met lengte:")
+]]></Implementation>
+</Method>
+
+<Method name="Test: DoosVariantCode voor geldige DraagPlaat breedtes">
+<Implementation><![CDATA[
+	Do ..AssertDoosVariantBreedteCode(190, "S")
+	Do ..AssertDoosVariantBreedteCode(250, "B")
+]]></Implementation>
+</Method>
+
+<Method name="Test: DoosVariantCode voor geldige DraagPlaat lengtes">
+<Implementation><![CDATA[
+	Do ..AssertDoosVariantLengteCode(700, "1")
+	Do ..AssertDoosVariantLengteCode(1060, "2")
+	Do ..AssertDoosVariantLengteCode(1260, "3")
+]]></Implementation>
+</Method>
+
+<Method name="AssertExceptieVoorDraagPlaatAfmetingen">
+<FormalSpec>Breedte:%Numeric,Lengte:%Numeric,VerwachteExceptieOmschrijving:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SubStrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(VerwachteExceptieOmschrijving)
+
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", SubStrings))
+	Do ..GeefDoosVariant(Breedte, Lengte)
+]]></Implementation>
+</Method>
+
+<Method name="AssertDoosVariantBreedteCode">
+<FormalSpec>Breedte:%Numeric,VerwachteWaarde:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define GeldigeLengte 700
+	
+	#dim DoosVariant As TECH.String = ..GeefDoosVariant(Breedte, $$$GeldigeLengte)
+	#dim BreedteCode As TECH.String = $Extract(DoosVariant, 1, 1)
+	
+	Do $$$AssertEquals(BreedteCode, VerwachteWaarde)
+]]></Implementation>
+</Method>
+
+<Method name="AssertDoosVariantLengteCode">
+<FormalSpec>Lengte:%Numeric,VerwachteWaarde:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define GeldigeBreedte 190
+	
+	#dim DoosVariant As TECH.String = ..GeefDoosVariant($$$GeldigeBreedte, Lengte)
+	#dim LengteCode As TECH.String = $Extract(DoosVariant, 2, 2)
+	
+	Do $$$AssertEquals(LengteCode, VerwachteWaarde)
+]]></Implementation>
+</Method>
+
+<Method name="GeefDoosVariant">
+<FormalSpec>Breedte:%Numeric,Lengte:%Numeric</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim DraagPlaat As zTryout.WV.FPV1.DOM.dto.DraagPlaat = ##class(zTryout.WV.FPV1.DOM.dto.DraagPlaat).%New()
+	
+	Set DraagPlaat.Breedte = Breedte
+	Set DraagPlaat.Lengte = Lengte
+	
+	Quit ..FlatpackV1Service.GeefDoosVariant(DraagPlaat)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_011_98_ZijkantPlaat92x25.TXT
===================================================================
diff -u -r31953 -r31958
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_011_98_ZijkantPlaat92x25.TXT	(.../Productie_011_98_ZijkantPlaat92x25.TXT)	(revision 31953)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Productie_011_98_ZijkantPlaat92x25.TXT	(.../Productie_011_98_ZijkantPlaat92x25.TXT)	(revision 31958)
@@ -1,11 +1,11 @@
 %BTW% /AF="C:\Bartender\Templates\ZijkantPlaat 92x25.btw" /PRN="98" /R=3 /P  /D=<Trigger File Name> /CLOSE
 %END%
 Barcode	Lijn1	Lijn2	Lijn3	Lijn4
-ZCB50L00001	ZCB50L00001	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1
-ZCB50R00001	ZCB50R00001	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1
+ZCB50L00001	ZCB50L00001	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1
+ZCB50R00001	ZCB50R00001	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1
 				
 				
-ZCV50L00002	ZCV50L00002	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1
-ZCV50R00002	ZCV50R00002	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1
+ZCV50L00002	ZCV50L00002	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1
+ZCV50R00002	ZCV50R00002	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1
 				
 				
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportAuto/15000/Productie_006_ImportFile_15000_20141114_091500.txt
===================================================================
diff -u -r31953 -r31958
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportAuto/15000/Productie_006_ImportFile_15000_20141114_091500.txt	(.../Productie_006_ImportFile_15000_20141114_091500.txt)	(revision 31953)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/Biesse/ImportAuto/15000/Productie_006_ImportFile_15000_20141114_091500.txt	(.../Productie_006_ImportFile_15000_20141114_091500.txt)	(revision 31958)
@@ -1,15 +1,15 @@
 Rol	Aantal	PlaatMateriaal	Barcode	LadeSequentieNr	DossierCode	ExtraInfo	Lengte	Breedte	Dikte	Kleur	Decor	EtiketLijn1	EtiketLijn2	EtiketLijn3	EtiketInfo	EtiketLijn4
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
-Rug	1	FINEER.NN.130	RCV05690BS00001D1	1	LI7K		574	169.5	13	NN	Fineer	RUG/NN-NN/574x169.5/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		RCV05690BS00001D1/B:600xH:210
-Bodem	1	FINEER.NN.065	B50B05690VS00001S2	1	LI7K		574	500.8	6.5	NN	Fineer	BOD(SCH:BO)/NN/574x480/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		B50B05690VS00001S2/B:600xD:500
-Front	1	FINEER.NN.090	FCV05850BS00001D1	1	LI7K		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2//UNITTEST KLA/2222 - 1:1		FCV05850BS00001D1/B:600xH:210
-ZijkantPlaat	1	MELAMINE.W.065	ZCV50L00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCV50L00002/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50L00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00002/D:500xH:210
-ZijkantPlaat	1	MELAMINE.W.065	ZCV50R00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCV50R00002/D:500xH:210
-ZijkantPlaat	1	FINEER.NN.065	ZCB50R00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00002/D:500xH:210
-Rug	1	MELAMINE.W.130	RCV05690VS00002D1	2	LI7L		574	169.5	13	W	Melamine	RUG/W-NN/574x169.5/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		RCV05690VS00002D1/B:600xH:210
-Bodem	1	MELAMINE.S.065	B50W05690VS00002S2	2	LI7L		574	500.8	6.5	S	Melamine	BOD(SCH:BO)/S/574x480/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		B50W05690VS00002S2/B:600xD:500
-Front	1	FINEER.NN.090	FCV05850BS00002D1	2	LI7L		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2//UNITTEST KLA/2222 - 1:1		FCV05850BS00002D1/B:600xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00001	1	LI7K		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00001/D:500xH:210
+Rug	1	FINEER.NN.130	RCV05690BS00001D1	1	LI7K		574	169.5	13	NN	Fineer	RUG/NN-NN/574x169.5/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		RCV05690BS00001D1/B:600xH:210
+Bodem	1	FINEER.NN.065	B50B05690VS00001S2	1	LI7K		574	500.8	6.5	NN	Fineer	BOD(SCH:BO)/NN/574x480/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		B50B05690VS00001S2/B:600xD:500
+Front	1	FINEER.NN.090	FCV05850BS00001D1	1	LI7K		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7K/AL/MET FRONT/	14a/000(1)/KAR 1:1/1	T2/B1/UNITTEST KLA/2222 - 1:1		FCV05850BS00001D1/B:600xH:210
+ZijkantPlaat	1	MELAMINE.W.065	ZCV50L00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCV50L00002/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50L00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50L00002/D:500xH:210
+ZijkantPlaat	1	MELAMINE.W.065	ZCV50R00002	2	LI7L		500	179.5	6.5	W	Melamine	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCV50R00002/D:500xH:210
+ZijkantPlaat	1	FINEER.NN.065	ZCB50R00002	2	LI7L		500	179.5	6.5	NN	Fineer	ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1	nolabel	ZCB50R00002/D:500xH:210
+Rug	1	MELAMINE.W.130	RCV05690VS00002D1	2	LI7L		574	169.5	13	W	Melamine	RUG/W-NN/574x169.5/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		RCV05690VS00002D1/B:600xH:210
+Bodem	1	MELAMINE.S.065	B50W05690VS00002S2	2	LI7L		574	500.8	6.5	S	Melamine	BOD(SCH:BO)/S/574x480/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		B50W05690VS00002S2/B:600xD:500
+Front	1	FINEER.NN.090	FCV05850BS00002D1	2	LI7L		590	196.5	9	NN	Fineer	FRO/NN-NN/196.5x590/LI7L/AL/MET FRONT/	14a/000(2)/KAR 1:1/2*	T2/B1/UNITTEST KLA/2222 - 1:1		FCV05850BS00002D1/B:600xH:210
Index: vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/Test.cls.xml	(revision 0)
+++ vhUnitTest/zTryout/WV/FPV1/DOM/impl/FlatpackV1Service/Test.cls.xml	(revision 31958)
@@ -0,0 +1,106 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.zTryout.WV.FPV1.DOM.impl.FlatpackV1Service.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="FlatpackV1Service">
+<Type>zTryout.WV.FPV1.DOM.FlatpackV1Service</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Set ..FlatpackV1Service = ##class(zTryout.WV.FPV1.DOM.impl.FlatpackV1Service).%New()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Exceptie bij ophalen van DoosVariantCode voor ongeldige DraagPlaat breedte">
+<Implementation><![CDATA[
+	#define OngeldigeBreedte 123
+	#define GeldigeLengte 700
+	
+	Do ..AssertExceptieVoorDraagPlaatAfmetingen($$$OngeldigeBreedte, $$$GeldigeLengte, "Geen BreedteCode gevonden voor DraagPlaat met breedte:")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Exceptie bij ophalen van DoosVariantCode voor ongeldige DraagPlaat lengte">
+<Implementation><![CDATA[
+	#define GeldigeBreedte 190
+	#define OngeldigeLengte 123
+	
+	Do ..AssertExceptieVoorDraagPlaatAfmetingen($$$GeldigeBreedte, $$$OngeldigeLengte, "Geen LengteCode gevonden voor DraagPlaat met lengte:")
+]]></Implementation>
+</Method>
+
+<Method name="Test: DoosVariantCode voor geldige DraagPlaat breedtes">
+<Implementation><![CDATA[
+	Do ..AssertDoosVariantBreedteCode(190, "S")
+	Do ..AssertDoosVariantBreedteCode(250, "B")
+]]></Implementation>
+</Method>
+
+<Method name="Test: DoosVariantCode voor geldige DraagPlaat lengtes">
+<Implementation><![CDATA[
+	Do ..AssertDoosVariantLengteCode(700, "1")
+	Do ..AssertDoosVariantLengteCode(1060, "2")
+	Do ..AssertDoosVariantLengteCode(1260, "3")
+]]></Implementation>
+</Method>
+
+<Method name="AssertExceptieVoorDraagPlaatAfmetingen">
+<FormalSpec>Breedte:%Numeric,Lengte:%Numeric,VerwachteExceptieOmschrijving:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SubStrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(VerwachteExceptieOmschrijving)
+
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", SubStrings))
+	Do ..GeefDoosVariant(Breedte, Lengte)
+]]></Implementation>
+</Method>
+
+<Method name="AssertDoosVariantBreedteCode">
+<FormalSpec>Breedte:%Numeric,VerwachteWaarde:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define GeldigeLengte 700
+	
+	#dim DoosVariant As TECH.String = ..GeefDoosVariant(Breedte, $$$GeldigeLengte)
+	#dim BreedteCode As TECH.String = $Extract(DoosVariant, 1, 1)
+	
+	Do $$$AssertEquals(BreedteCode, VerwachteWaarde)
+]]></Implementation>
+</Method>
+
+<Method name="AssertDoosVariantLengteCode">
+<FormalSpec>Lengte:%Numeric,VerwachteWaarde:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define GeldigeBreedte 190
+	
+	#dim DoosVariant As TECH.String = ..GeefDoosVariant($$$GeldigeBreedte, Lengte)
+	#dim LengteCode As TECH.String = $Extract(DoosVariant, 2, 2)
+	
+	Do $$$AssertEquals(LengteCode, VerwachteWaarde)
+]]></Implementation>
+</Method>
+
+<Method name="GeefDoosVariant">
+<FormalSpec>Breedte:%Numeric,Lengte:%Numeric</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim DraagPlaat As zTryout.WV.FPV1.DOM.dto.DraagPlaat = ##class(zTryout.WV.FPV1.DOM.dto.DraagPlaat).%New()
+	
+	Set DraagPlaat.Breedte = Breedte
+	Set DraagPlaat.Lengte = Lengte
+	
+	Quit ..FlatpackV1Service.GeefDoosVariant(DraagPlaat)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/External_SQL.DB_ZijkantKamerFreesData.xml
===================================================================
diff -u -r31953 -r31958
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/External_SQL.DB_ZijkantKamerFreesData.xml	(.../External_SQL.DB_ZijkantKamerFreesData.xml)	(revision 31953)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/TestFlatpackV1/StartBatch/External_SQL.DB_ZijkantKamerFreesData.xml	(.../External_SQL.DB_ZijkantKamerFreesData.xml)	(revision 31958)
@@ -20,11 +20,11 @@
 PrintBarcodeRight = ZCB50R00001
 PrintTextLeft1 = ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/
 PrintTextLeft2 = 14a/000(1)/KAR 1:1/1
-PrintTextLeft3 = T2//UNITTEST KLA/2222 - 1:1
+PrintTextLeft3 = T2/B1/UNITTEST KLA/2222 - 1:1
 PrintTextLeft4 = ZCB50L00001
 PrintTextRight1 = ZIJ/NN-NN-NN/179.5x500/LI7K/AL/MET FRONT/
 PrintTextRight2 = 14a/000(1)/KAR 1:1/1
-PrintTextRight3 = T2//UNITTEST KLA/2222 - 1:1
+PrintTextRight3 = T2/B1/UNITTEST KLA/2222 - 1:1
 PrintTextRight4 = ZCB50R00001
 ProductCode = ""
 ProgramLeftInner = C:\TWINcat\CNC\C_OUT_L.nc
@@ -55,11 +55,11 @@
 PrintBarcodeRight = ZCV50R00002
 PrintTextLeft1 = ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/
 PrintTextLeft2 = 14a/000(2)/KAR 1:1/2*
-PrintTextLeft3 = T2//UNITTEST KLA/2222 - 1:1
+PrintTextLeft3 = T2/B1/UNITTEST KLA/2222 - 1:1
 PrintTextLeft4 = ZCV50L00002
 PrintTextRight1 = ZIJ/NN-NN-W/179.5x500/LI7L/AL/MET FRONT/
 PrintTextRight2 = 14a/000(2)/KAR 1:1/2*
-PrintTextRight3 = T2//UNITTEST KLA/2222 - 1:1
+PrintTextRight3 = T2/B1/UNITTEST KLA/2222 - 1:1
 PrintTextRight4 = ZCV50R00002
 ProductCode = ""
 ProgramLeftInner = C:\TWINcat\CNC\C_OUT_L.nc
Index: DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking.cls.xml
===================================================================
diff -u -r29641 -r31958
--- DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking.cls.xml	(.../Verpakking.cls.xml)	(revision 29641)
+++ DOM/PM/Maatwerk/LadeInfo/impl/TAX/Verpakking.cls.xml	(.../Verpakking.cls.xml)	(revision 31958)
@@ -1,8 +1,34 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.LadeInfo.impl.TAX.Verpakking">
-<Super>DOM.PM.Maatwerk.LadeInfo.impl.Verpakking</Super>
+<Super>DOM.PM.Maatwerk.LadeInfo.impl.Verpakking,DOM.PM.Maatwerk.TAX.impl.Base</Super>
 
+<Property name="FlatpackV1Service">
+<Type>zTryout.WV.FPV1.DOM.FlatpackV1Service</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MaatwerkCalcAPI">
+<Type>DOM.PM.MaatwerkCalcAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenLadeKenmerken,FlatpackV1Service:zTryout.WV.FPV1.DOM.FlatpackV1Service=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ##super(HalffabItemsBoom, IngegevenKenmerken)
+	
+	Set ..FlatpackV1Service = $$$Implementation(FlatpackV1Service, ##class(zTryout.WV.FPV1.DOM.impl.FlatpackV1Service).%New())
+	Set ..MaatwerkCalcAPI = ##class(DOM.DomeinContext).Instance().GeefMaatwerkCalcAPI()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="GeefType">
 <ReturnType>DOM.PM.enu.TAORVerpakkingType</ReturnType>
 <Implementation><![CDATA[	Quit ..IngegevenKenmerken.VerpakkingType
@@ -11,9 +37,26 @@
 
 <Method name="GeefDoosVariant">
 <ReturnType>TECH.String</ReturnType>
-<Implementation><![CDATA[	Quit ""
+<Implementation><![CDATA[	Quit ..BepaalDoosVariant()
 ]]></Implementation>
 </Method>
+
+<Method name="BepaalDoosVariant">
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim DoosVariant As TECH.String = ""
+	
+	If (..GeefType() = ..Enum.VerpakkingType.FlatpackV1) {
+		#dim Lade As DOM.PM.Maatwerk.LadeInfo.Lade = ..MaatwerkCalcAPI.GeefLadeInfo(..HalffabItemsBoom, ..IngegevenKenmerken)
+		#dim DraagPlaat As zTryout.WV.FPV1.DOM.dto.DraagPlaat = ..FlatpackV1Service.GeefDraagPlaatVoorOnderdelen(Lade)
+		
+		Set DoosVariant = ..FlatpackV1Service.GeefDoosVariant(DraagPlaat)
+	}
+	
+	Quit DoosVariant
+]]></Implementation>
+</Method>
 </Class>