Index: vhTest/Mock/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml
===================================================================
diff -u -r36003 -r41633
--- vhTest/Mock/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 36003)
+++ vhTest/Mock/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41633)
@@ -21,6 +21,12 @@
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Bereken",CollisOpPallet)
 ]]></Implementation>
 </Method>
+
+<Method name="BerekenMetVastAantal">
+<FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet,AantalOpPallet:%Integer</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("BerekenMetVastAantal",CollisOpPallet,AantalOpPallet)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Utils/APPS/VKP/Offerte/dto/VerpakkingList.cls.xml
===================================================================
diff -u -r37590 -r41633
--- vhTest/Utils/APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 37590)
+++ vhTest/Utils/APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 41633)
@@ -66,6 +66,25 @@
 	Quit VerpakkingsList
 ]]></Implementation>
 </Method>
+
+<Method name="GeefTandemboxVerpakkingsList">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.VKP.Offerte.dto.VerpakkingList</ReturnType>
+<Implementation><![CDATA[
+	#dim VerpakkingsList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(APPS.VKP.Offerte.dto.VerpakkingList).%New()
+	#dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New()
+	Set Verpakking.VolumeAandeel = 0.25
+	Set Verpakking.Aantal = 2
+	Set Verpakking.Gewicht = 100
+	Set Verpakking.ProductID = 1
+	Set Verpakking.WaardeGoederen = 10.5 
+	Set Verpakking.Afmeting = ##class(APPS.TRANSP.dto.Afmeting).%New(90,80,70)
+	Set Verpakking.VerpakkingType = ##class(APPS.VKP.Offerte.enu.VerpakkingType).V1()
+	Set Verpakking.LadeType = ##class(APPS.VKP.Offerte.enu.LadeType).Tandembox()
+	Do VerpakkingsList.Insert(Verpakking)
+	Quit VerpakkingsList
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Fake/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml
===================================================================
diff -u -r40613 -r41633
--- vhTest/Fake/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 40613)
+++ vhTest/Fake/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41633)
@@ -18,6 +18,12 @@
 <FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="BerekenMetVastAantal">
+<FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet,AantalOpPallet:%Integer</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Fake/APPS/EC/Transport/Service.cls.xml
===================================================================
diff -u -r41491 -r41633
--- vhTest/Fake/APPS/EC/Transport/Service.cls.xml	(.../Service.cls.xml)	(revision 41491)
+++ vhTest/Fake/APPS/EC/Transport/Service.cls.xml	(.../Service.cls.xml)	(revision 41633)
@@ -13,6 +13,11 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BewaarTandemboxAls16OpPallet">
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="GeefMogelijkeZendingen">
 <FormalSpec>OfferteID:%String,Taal:DOM.enu.Taal="E",Sessie:APPS.EC.Transport.dto.KlantIdentificatie</FormalSpec>
 <ReturnType>APPS.EC.Transport.dto.VerzendingMogelijkheden</ReturnType>
Index: vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml
===================================================================
diff -u -r37590 -r41633
--- vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 37590)
+++ vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41633)
@@ -26,18 +26,26 @@
 <Method name="Bepaal">
 <FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput</FormalSpec>
 <ReturnType>APPS.TRANSP.OfferteService.dto.Palletten</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("Bepaal",BerekenInput)
+<Implementation><![CDATA[	Quit ..VerwerkMethodCall("Bepaal",BerekenInput)
 ]]></Implementation>
 </Method>
 
 <Method name="Bereken">
 <FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet</FormalSpec>
 <Implementation><![CDATA[
 	Do ..CollisOpPalletList.Insert(CollisOpPallet)
-	do ..VerwerkMethodCall("Bereken",CollisOpPallet)
+	Do ..VerwerkMethodCall("Bereken", CollisOpPallet)
 ]]></Implementation>
 </Method>
 
+<Method name="BerekenMetVastAantal">
+<FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet,AantalOpPallet:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	Do ..CollisOpPalletList.Insert(CollisOpPallet)
+	Do ..VerwerkMethodCall("BerekenMetVastAantal", CollisOpPallet, AantalOpPallet)
+]]></Implementation>
+</Method>
+
 <Method name="GeefCollisOpPalletList">
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[	Quit ..CollisOpPalletList
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml
===================================================================
diff -u -r37574 -r41633
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37574)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 41633)
@@ -3,6 +3,11 @@
 <Class name="vhUnitTest.APPS.VKP.impl.OfferteService.VerpakkingConvertor.Converteer.LBX.TestVerpakkingType">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Test: geeft verpakkingtype Probox terg van een LBX lade in Probox verpakkingtype">
+<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(2, ##class(DOM.PM.enu.LBXVerpakkingType).Probox(),##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox())
+]]></Implementation>
+</Method>
+
 <Method name="Test: geeft verpakkingtype Probox terug van een LBX lade in Probox verpakkingtype">
 <Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.LBXVerpakkingType).Probox(),##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox())
 ]]></Implementation>
Index: APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml
===================================================================
diff -u -r38250 -r41633
--- APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 38250)
+++ APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41633)
@@ -28,13 +28,18 @@
 <Private>1</Private>
 </Property>
 
+<Property name="StapelingBewaarder">
+<Type>APPS.TRANSP.Offerte.impl.DHL.StapelingBewaarder</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Logger">
 <Type>vhLib.Logger</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>StapelingRepository:APPS.TRANSP.Offerte.impl.DHL.StapelingRepository,OptiboxRequestComposer:APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestComposer,OptiboxRequestWriter:APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestWriter</FormalSpec>
+<FormalSpec>StapelingRepository:APPS.TRANSP.Offerte.impl.DHL.StapelingRepository,OptiboxRequestComposer:APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestComposer,OptiboxRequestWriter:APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestWriter,StapelingBewaarder:APPS.TRANSP.Offerte.impl.DHL.StapelingBewaarder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -44,6 +49,8 @@
 	Set ..StapelingRepository = $$$Inject(StapelingRepository,##class(APPS.TRANSP.Offerte.impl.DHL.StapelingRepository).%New())
 	Set ..OptiboxRequestComposer = $$$Inject(OptiboxRequestComposer, ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestComposer).%New())
 	Set ..OptiboxRequestWriter = $$$Inject(OptiboxRequestWriter, ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.RequestWriter).%New())
+	Set ..StapelingBewaarder = ##class(APPS.TRANSP.Offerte.impl.DHL.StapelingBewaarder).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -81,6 +88,43 @@
 	Do ..OptiboxRequestWriter.WriteRequest(CollisOpPallet.Referentie _CollisOpPallet.Groep, ..OptiboxRequestComposer.Compose(CollisOpPallet))
 ]]></Implementation>
 </Method>
+
+<Method name="BerekenMetVastAantal">
+<FormalSpec>CollisOpPallet:APPS.TRANSP.Stapeling.dto.CollisOpPallet,AantalOpPallet:%Integer</FormalSpec>
+<Implementation><![CDATA[
+	#dim StapelaarResultaat As APPS.TRANSP.Stapeling.dto.StapelingResultaat = ##class(APPS.TRANSP.Stapeling.dto.StapelingResultaat).%New()
+	Set StapelaarResultaat.Referentie = CollisOpPallet.Referentie
+	Set StapelaarResultaat.Groep = CollisOpPallet.Groep 
+
+	#dim TotaalAantalCollis As %Integer = 0	
+	#dim TotaalGewichtInKG As %Integer = 0	
+	#dim CollisIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(CollisOpPallet.Collis)
+	#dim PalletHoogte As %Integer = 0
+	While CollisIterator.HasNext()
+	{
+		#dim ColliOpPallet As APPS.TRANSP.Stapeling.dto.ColliOpPallet = CollisIterator.Next()
+		Set TotaalAantalCollis = TotaalAantalCollis + ColliOpPallet.Aantal
+		Set TotaalGewichtInKG = TotaalGewichtInKG + ColliOpPallet.GewichtInKg
+	}
+	
+	#dim TotaalAantalPalletten As %Integer = ##class(TECH.Math).Ceil(TotaalAantalCollis / AantalOpPallet)
+	#dim PalletGewichtInKG = ##class(TECH.Math).Ceil(TotaalGewichtInKG / TotaalAantalPalletten)
+	#dim PalletSpecificaties As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.container 
+	Set PalletSpecificaties = ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.PalletSpecifications).GeefEuroPallet()
+	
+	#dim AantalPalletten As %Integer 
+	For AantalPalletten=1:1:TotaalAantalPalletten {
+		#dim Pallet As APPS.TRANSP.Stapeling.dto.Pallet = ##class(APPS.TRANSP.Stapeling.dto.Pallet).%New()
+		Set Pallet.GewichtInKG = PalletGewichtInKG
+		Set Pallet.Afmeting.Hoogte = PalletSpecificaties.height
+		Set Pallet.Afmeting.Lengte = PalletSpecificaties.depth
+		Set Pallet.Afmeting.Breedte = PalletSpecificaties.width
+		Do StapelaarResultaat.Palletten.Insert(Pallet)
+	}
+	
+	Do ..StapelingBewaarder.Bewaar(StapelaarResultaat)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/VKP/Offerte/enu/LadeType.cls.xml
===================================================================
diff -u -r41566 -r41633
--- APPS/VKP/Offerte/enu/LadeType.cls.xml	(.../LadeType.cls.xml)	(revision 41566)
+++ APPS/VKP/Offerte/enu/LadeType.cls.xml	(.../LadeType.cls.xml)	(revision 41633)
@@ -6,11 +6,11 @@
 <Super>TECH.Enumeration</Super>
 
 <Parameter name="VALUELIST">
-<Default>,TAOR,LBX_Pure</Default>
+<Default>,TAOR,LBX_Pure,TBX_Antaro</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>,TA'OR BOX,LEGRABOX pure</Default>
+<Default>,TA'OR BOX,LEGRABOX pure, TANDEMBOX Antaro</Default>
 </Parameter>
 
 <Method name="LegraboxPure">
Index: APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml
===================================================================
diff -u -r41569 -r41633
--- APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml	(.../VerpakkingConvertor.cls.xml)	(revision 41569)
+++ APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml	(.../VerpakkingConvertor.cls.xml)	(revision 41633)
@@ -11,18 +11,16 @@
 
 	While (MaatwerkLijnIterator.HasNext()) {
 		#dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = MaatwerkLijnIterator.Next()
-		if $$$Not(..GeefLadeType(Lijn.GeefIngegevenKenmerken()) = ##class(APPS.VKP.Offerte.enu.LadeType).Tandembox()) {
-			#dim LadeVerpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New()
-			Set LadeVerpakking.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting())
-			Set LadeVerpakking.Gewicht = Lijn.GeefTotaalGewicht()
-			Set LadeVerpakking.WaardeGoederen = Lijn.GeefTotaalPrijs()
-			Set LadeVerpakking.ProductID = Lijn.GeefProductID()
-			Set LadeVerpakking.Aantal = Lijn.GeefAantal()
-			Set LadeVerpakking.VolumeAandeel = Lijn.GeefVolumeAandeel()
-			Set LadeVerpakking.VerpakkingType = ..GeefVerpakkingType(Lijn.GeefIngegevenKenmerken())
-			Set LadeVerpakking.LadeType = ..GeefLadeType(Lijn.GeefIngegevenKenmerken())
-			Do LadeVerpakkingList.Insert(LadeVerpakking)
-		}
+		#dim LadeVerpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New()
+		Set LadeVerpakking.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting())
+		Set LadeVerpakking.Gewicht = Lijn.GeefTotaalGewicht()
+		Set LadeVerpakking.WaardeGoederen = Lijn.GeefTotaalPrijs()
+		Set LadeVerpakking.ProductID = Lijn.GeefProductID()
+		Set LadeVerpakking.Aantal = Lijn.GeefAantal()
+		Set LadeVerpakking.VolumeAandeel = Lijn.GeefVolumeAandeel()
+		Set LadeVerpakking.VerpakkingType = ..GeefVerpakkingType(Lijn.GeefIngegevenKenmerken())
+		Set LadeVerpakking.LadeType = ..GeefLadeType(Lijn.GeefIngegevenKenmerken())
+		Do LadeVerpakkingList.Insert(LadeVerpakking)
 	}
 	Quit ..MaakVerzendVerpakkingList(LadeVerpakkingList)
 ]]></Implementation>
@@ -100,8 +98,17 @@
 	Do VerzendVerpakkingList.VoegToeList(LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).V1(),##class(APPS.VKP.Offerte.enu.LadeType).Taorbox()))
 	Do VerzendVerpakkingList.VoegToeList(LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).FlatpackV1(),##class(APPS.VKP.Offerte.enu.LadeType).Taorbox()))
 	Do VerzendVerpakkingList.VoegToeList(LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).V1(),##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure()))
+	Do VerzendVerpakkingList.VoegToeList(LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).V1(),##class(APPS.VKP.Offerte.enu.LadeType).Tandembox()))
 	
-	#dim LadeTypeIterator As TECH.ListIterator = ##class(APPS.VKP.Offerte.enu.LadeType).ValueListIterator()
+	// omdat palletten voor tandembox berekend worden per vast aantal lades (16 op 1 pallet) en dus niet afhankelijk is van afmeting of gewicht,
+	// mogen we tandembox probox niet omzetten naar proboxdozen als verpakking voor op een pallet te zetten. We hebben hiervoor het juiste aantal lades nodig.
+	Do VerzendVerpakkingList.VoegToeList(LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox(),##class(APPS.VKP.Offerte.enu.LadeType).Tandembox()))
+	
+	#dim LadeTypesVoorProbox As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	Do LadeTypesVoorProbox.Insert(##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure())
+	Do LadeTypesVoorProbox.Insert(##class(APPS.VKP.Offerte.enu.LadeType).Taorbox())
+	
+	#dim LadeTypeIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(LadeTypesVoorProbox)
 	While LadeTypeIterator.HasNext() {
 		#dim LadeType As APPS.VKP.Offerte.enu.LadeType = LadeTypeIterator.Next()
 		#dim ProboxVerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = LadeVerpakkingList.ZoekVerpakkingen(##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox(),LadeType)
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestVerpakkingType.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestVerpakkingType.cls.xml	(revision 0)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestVerpakkingType.cls.xml	(revision 41633)
@@ -0,0 +1,101 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.VKP.impl.OfferteService.VerpakkingConvertor.Converteer.TBX.TestVerpakkingType">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: geeft verpakkingtype Probox terug van een TBX lade in Probox verpakkingtype">
+<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.TBXVerpakking).ProboxMetOnderdelen(),##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox())
+]]></Implementation>
+</Method>
+
+<Method name="Test: geeft verpakkingtype V1 terug van een TBX lade in V1 verpakkingtype">
+<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen(),##class(APPS.VKP.Offerte.enu.VerpakkingType).V1())
+]]></Implementation>
+</Method>
+
+<Method name="Test: geeft geen verpakkingtype van een TBX lade met verpakkingtype VHoss">
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.TBXVerpakking).KastMetOnderdelen())
+]]></Implementation>
+</Method>
+
+<Method name="Test: geeft geen verpakkingtype van een TBX lade met verpakkingtype Pallet">
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.TBXVerpakking).Pallet())
+]]></Implementation>
+</Method>
+
+<Method name="VerpakkinglistVerpakkingTypeTesten">
+<FormalSpec>AantalMaatwerklijnen:%Integer=1,VerpakkingType:DOM.PM.enu.TBXVerpakking,VerwachtResultaat:APPS.VKP.Offerte.enu.VerpakkingType</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim MaatwerkLijnList As %ListOfObjects = ##class(%ListOfObjects).%New()
+
+	#dim MaatwerkLijnNummer As %Integer
+	for MaatwerkLijnNummer=1:1:AantalMaatwerklijnen {
+		Do MaatwerkLijnList.Insert(..MaakMaatwerkLijn(MaatwerkLijnNummer, VerpakkingType))
+	}
+
+	#dim MaatwerkLijnIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(MaatwerkLijnList)
+	
+	#dim VerpakkingConvertor As APPS.VKP.impl.OfferteService.VerpakkingConvertor
+	Set VerpakkingConvertor = ##class(APPS.VKP.impl.OfferteService.VerpakkingConvertor).%New()
+	
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = VerpakkingConvertor.Converteer(MaatwerkLijnIterator)
+	
+	for MaatwerkLijnNummer=1:1:AantalMaatwerklijnen
+	{
+		Do ..AssertVerpakkingType(VerpakkingList.GetAt(MaatwerkLijnNummer), VerwachtResultaat)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerpakkinglistLeegTesten">
+<FormalSpec>AantalMaatwerklijnen:%Integer=1,VerpakkingType:DOM.PM.enu.LBXVerpakkingType</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim MaatwerkLijnList As %ListOfObjects = ##class(%ListOfObjects).%New()
+
+	#dim MaatwerkLijnNummer As %Integer
+	for MaatwerkLijnNummer=1:1:AantalMaatwerklijnen {
+		Do MaatwerkLijnList.Insert(..MaakMaatwerkLijn(MaatwerkLijnNummer, VerpakkingType))
+	}
+
+	#dim MaatwerkLijnIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(MaatwerkLijnList)
+	
+	#dim VerpakkingConvertor As APPS.VKP.impl.OfferteService.VerpakkingConvertor
+	Set VerpakkingConvertor = ##class(APPS.VKP.impl.OfferteService.VerpakkingConvertor).%New()
+	
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = VerpakkingConvertor.Converteer(MaatwerkLijnIterator)
+	
+	Do $$$AssertEquals(VerpakkingList.Count(), 0)
+]]></Implementation>
+</Method>
+
+<Method name="AssertVerpakkingType">
+<FormalSpec>Verpakking:APPS.VKP.Offerte.dto.Verpakking,VerwachtResultaat:APPS.VKP.Offerte.enu.VerpakkingType</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Do $$$AssertEquals(Verpakking.VerpakkingType, VerwachtResultaat)
+]]></Implementation>
+</Method>
+
+<Method name="MaakMaatwerkLijn">
+<FormalSpec>MaatwerkLijnNummer:%Integer,Verpakking:DOM.PM.enu.TBXVerpakking</FormalSpec>
+<Private>1</Private>
+<ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
+	Do IngegevenKenmerken.MaakVariantAntaro()
+	Set IngegevenKenmerken.LegacyKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).%New()
+	Set IngegevenKenmerken.LegacyKenmerken.ItemVPK = Verpakking
+
+	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
+	Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken)
+	Do MaatwerkLijn.ZetVolumeAandeel(0.25)
+	Do MaatwerkLijn.ZetTotaalGewicht(10)
+	
+	Quit MaatwerkLijn
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EC/Transport/Service.cls.xml
===================================================================
diff -u -r41491 -r41633
--- APPS/EC/Transport/Service.cls.xml	(.../Service.cls.xml)	(revision 41491)
+++ APPS/EC/Transport/Service.cls.xml	(.../Service.cls.xml)	(revision 41633)
@@ -39,7 +39,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>OfferteService:APPS.VKP.OfferteService,NaarBerekenInputConverter:APPS.VKP.OfferteService.impl.NaarBerekenInputConverter,ZendingDetails:APPS.EC.Transport.impl.ZendingDetails,VerzendingMogelijkheidRepository:APPS.EC.Transport.impl.VerzendingMogelijkheidRepository,WinkelKarService:APPS.EC.Winkelkar.WinkelkarService,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler,BerekeningFoutenRepository</FormalSpec>
+<FormalSpec>OfferteService:APPS.VKP.OfferteService,NaarBerekenInputConverter:APPS.VKP.OfferteService.impl.NaarBerekenInputConverter,ZendingDetails:APPS.EC.Transport.impl.ZendingDetails,VerzendingMogelijkheidRepository:APPS.EC.Transport.impl.VerzendingMogelijkheidRepository,WinkelKarService:APPS.EC.Winkelkar.WinkelkarService,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler,BerekeningFoutenRepository:APPS.EC.Transport.impl.BerekeningFoutenRepository</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -52,6 +52,7 @@
 	Set ..WinkelKarService = $$$Inject(WinkelKarService, ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
 	Set ..StapelingBepaler = $$$Inject(StapelingBepaler, ##class(APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New())
 	Set ..BerekeningFoutenRepository = $$$Inject(BerekeningFoutenRepository, ##class(APPS.EC.Transport.impl.BerekeningFoutenRepository).%New())
+
 	quit $$$OK
 ]]></Implementation>
 </Method>
@@ -69,6 +70,7 @@
 		#dim BerekenInput As APPS.TRANSP.OfferteService.dto.BerekenInput
 		Set BerekenInput = ..NaarBerekenInputConverter.Convert(Verpakkingen, LeverAdres, OfferteID, VroegsteAfhaalDatum)
 		Set VerzendingMogelijkheden = ..ZendingDetails.GeefZendingDetails(BerekenInput, Taal, Sessie)
+		
 	} catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Do ..BewaarBerekeningFouten(Exception.ToStream(), BerekenInput)
@@ -89,8 +91,13 @@
 		#dim VerpakkingTypeIterator As TECH.ListIterator = ##class(APPS.VKP.Offerte.enu.VerpakkingType).ValueListIterator()
 		While VerpakkingTypeIterator.HasNext(){
 			#dim VerpakkingType As APPS.VKP.Offerte.enu.VerpakkingType = VerpakkingTypeIterator.Next()
-			#dim CollisOpPallet As APPS.TRANSP.Stapeling.dto.CollisOpPallet 
-			If (VerpakkingType '= ##class(APPS.VKP.Offerte.enu.VerpakkingType).FlatpackV1()) || (LadeType '= ##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure()) {
+			#dim CollisOpPallet As APPS.TRANSP.Stapeling.dto.CollisOpPallet
+			Set CollisOpPallet = ..MaakCollisOpPallet(Verpakkingen.ZoekVerpakkingen(VerpakkingType, LadeType), OfferteID, VerpakkingType, LadeType)
+			if (LadeType = ##class(APPS.VKP.Offerte.enu.LadeType).Tandembox()) {
+				if $IsObject(CollisOpPallet) && (CollisOpPallet.Collis.Count() > 0) {
+					Do ..StapelingBepaler.BerekenMetVastAantal(CollisOpPallet, 16)
+				}
+			} elseIf (VerpakkingType '= ##class(APPS.VKP.Offerte.enu.VerpakkingType).FlatpackV1()) || (LadeType '= ##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure()) {
 				Set CollisOpPallet = ..MaakCollisOpPallet(Verpakkingen.ZoekVerpakkingen(VerpakkingType, LadeType), OfferteID, VerpakkingType, LadeType)
 				if $IsObject(CollisOpPallet) && (CollisOpPallet.Collis.Count() > 0) {
 					Do ..StapelingBepaler.Bereken(CollisOpPallet)
Index: APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u -r39573 -r41633
--- APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml	(.../MaatwerkLijnBuilder.cls.xml)	(revision 39573)
+++ APPS/EC/Winkelkar/impl/MaatwerkLijnBuilder.cls.xml	(.../MaatwerkLijnBuilder.cls.xml)	(revision 41633)
@@ -242,50 +242,56 @@
 <Method name="BerekenMaatwerkLijnGewicht">
 <FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Implementation><![CDATA[
-	Quit:(..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken()))
-	
-	#dim BerekenTotaalGewichtOpdracht As APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht).%New()
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
-	#dim CommandList As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BerekenTotaalGewichtOpdracht)
-	Do ##class(TECH.IteratorUitvoerder).%New(HalffabItemsBoom.GeefHalffabItemsIterator(), CommandList).VoerUit()
-	Do Lijn.ZetTotaalGewicht(BerekenTotaalGewichtOpdracht.GeefResultaat())
+	If (..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken())) {
+		Do Lijn.ZetTotaalGewicht(1)
+	} else {
+		#dim BerekenTotaalGewichtOpdracht As APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht = ##class(APPS.EC.Winkelkar.impl.MaatwerkLijnGewichtOpdracht).%New()
+		#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
+		#dim CommandList As %ListOfObjects = ##class(TECH.ListUtils).CreateListOfObjects(BerekenTotaalGewichtOpdracht)
+		Do ##class(TECH.IteratorUitvoerder).%New(HalffabItemsBoom.GeefHalffabItemsIterator(), CommandList).VoerUit()
+		Do Lijn.ZetTotaalGewicht(BerekenTotaalGewichtOpdracht.GeefResultaat())
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="ZetVerpakteAfmeting">
 <FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Implementation><![CDATA[
-	Quit:(..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken()))
-	
-	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
-	#dim VerpakteAfmetingBerekenaar	As APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar
-	Set VerpakteAfmetingBerekenaar = ..VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom,Lijn.GeefIngegevenKenmerken())
-	if $IsObject(VerpakteAfmetingBerekenaar) {
-		Do Lijn.ZetVerpakteAfmeting(VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting())
+	If (..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken())) {
+		Do Lijn.ZetVerpakteAfmeting(##class(APPS.Halux.common.impl.VerpakteAfmeting).%New(1,1,1))
+	} else {
+		#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = ..MaatwerkCalcAPI.GeefHalffabItemsBoom(Lijn.GeefIngegevenKenmerken()) 
+		#dim VerpakteAfmetingBerekenaar	As APPS.EC.Winkelkar.VerpakteAfmetingBerekenaar
+		Set VerpakteAfmetingBerekenaar = ..VerpakteAfmetingBerekenaarFactory.GeefVerpakteAfmetingBerekenaar(HalffabItemsBoom,Lijn.GeefIngegevenKenmerken())
+		if $IsObject(VerpakteAfmetingBerekenaar) {
+			Do Lijn.ZetVerpakteAfmeting(VerpakteAfmetingBerekenaar.GeefVerpakteAfmeting())
+		}
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="ZetVolumeAandeel">
 <FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Implementation><![CDATA[
-	Quit:(..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken()))
-	
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = Lijn.GeefIngegevenKenmerken()
-	#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
-	#dim IsVariantTAX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox())	
-	#dim IsVariantLBX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure())	
-	
-	if IsFamilieLade {
-	 	If IsVariantTAX {
-			#dim TAXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = IngegevenKenmerken
-			if (TAXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).Probox()) {
-				Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
-			} 
-		} elseif IsVariantLBX {
-			#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = IngegevenKenmerken
-			if (LBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).Probox()) {
-				Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
+	if (..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken())) {
+		Do Lijn.ZetVolumeAandeel(0.125)
+	} else {
+		#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = Lijn.GeefIngegevenKenmerken()
+		#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
+		#dim IsVariantTAX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Taorbox())	
+		#dim IsVariantLBX As %Boolean = (IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure())	
+		
+		if IsFamilieLade {
+		 	If IsVariantTAX {
+				#dim TAXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = IngegevenKenmerken
+				if (TAXKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).Probox()) {
+					Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
+				} 
+			} elseif IsVariantLBX {
+				#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = IngegevenKenmerken
+				if (LBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).Probox()) {
+					Do Lijn.ZetVolumeAandeel(..VerpakkingService.ProboxVolumeAandeel(Lijn.GeefIngegevenKenmerken()))
+				}
 			}
 		}
 	}
@@ -294,9 +300,7 @@
 
 <Method name="BewaarLijn">
 <FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
-<Implementation><![CDATA[
-	Quit:(..IngegevenKenmerkenTypeAPI.IsTandemboxLade(Lijn.GeefIngegevenKenmerken()))
-	Do Lijn.Save()
+<Implementation><![CDATA[	Do Lijn.Save()
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml
===================================================================
diff -u -r41607 -r41633
--- vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml	(.../TestBerekenPalletGegevens.cls.xml)	(revision 41607)
+++ vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml	(.../TestBerekenPalletGegevens.cls.xml)	(revision 41633)
@@ -15,33 +15,28 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: BerekenPalletGegevens roept StapelingBepaler Bereken op met CollisOpPallet per combinatie verpakkingtype en ladetype">
+<Method name="Test: BerekenPalletGegevens roept voor LadeType Tandembox de StapelingBepaler BerekenMetVastAantal op met aantal 16">
 <Implementation><![CDATA[
 	#dim OfferteID As %String = 999
 	
 	#dim DummyVerpakkingen As APPS.VKP.Offerte.dto.VerpakkingList
-	Set DummyVerpakkingen = ##class(vhTest.Utils.APPS.VKP.Offerte.dto.VerpakkingList).GeefVerpakkingsList()
+	Set DummyVerpakkingen = ##class(vhTest.Utils.APPS.VKP.Offerte.dto.VerpakkingList).GeefTandemboxVerpakkingsList()
 	
-	Set VerkoopOfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
-	Do VerkoopOfferteServiceMock.VerwachtMethodCall("GeefProductVerpakkingDetails",OfferteID).DanReturn(DummyVerpakkingen)
+	Set VerkoopOfferteServiceStub = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
+	Do VerkoopOfferteServiceStub.IndienMethodCall("GeefProductVerpakkingDetails",OfferteID).DanReturn(DummyVerpakkingen)
 	
 	Set StapelingBepalerSpy = ##class(vhTest.Spy.APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()
-	Do StapelingBepalerSpy.VerwachtMethodCall("Bereken",$$$ElkeWaarde)
+	Do StapelingBepalerSpy.VerwachtMethodCall("BerekenMetVastAantal", $$$ElkeWaarde, 16)
 	
-	Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceMock, , , , , StapelingBepalerSpy)
+	Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceStub, , , , , StapelingBepalerSpy)
 	Do Service.BerekenPalletGegevens(OfferteID)
 	
-	Do VerkoopOfferteServiceMock.Verifieer()
-	Do StapelingBepalerSpy.Verifieer()
-	
 	#dim CollisOpPalletList As %ListOfObjects = StapelingBepalerSpy.GeefCollisOpPalletList()
-	if $$$AssertEquals(CollisOpPalletList.Count(),5) {
-		Do $$$AssertEquals(CollisOpPalletList.GetAt(1).Groep, ##class(APPS.VKP.Offerte.enu.LadeType).Taorbox() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).V1())
-		Do $$$AssertEquals(CollisOpPalletList.GetAt(2).Groep,##class(APPS.VKP.Offerte.enu.LadeType).Taorbox() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox())
-		Do $$$AssertEquals(CollisOpPalletList.GetAt(3).Groep,##class(APPS.VKP.Offerte.enu.LadeType).Taorbox() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).FlatpackV1())
-		Do $$$AssertEquals(CollisOpPalletList.GetAt(4).Groep, ##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).V1())
-		Do $$$AssertEquals(CollisOpPalletList.GetAt(5).Groep, ##class(APPS.VKP.Offerte.enu.LadeType).LegraboxPure() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox())
+	if $$$AssertEquals(CollisOpPalletList.Count(),1) {
+		Do $$$AssertEquals(CollisOpPalletList.GetAt(1).Groep, ##class(APPS.VKP.Offerte.enu.LadeType).Tandembox() _"_" _##class(APPS.VKP.Offerte.enu.VerpakkingType).V1())
 	}
+
+	Do StapelingBepalerSpy.Verifieer()
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml
===================================================================
diff -u -r37574 -r41633
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37574)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 41633)
@@ -3,7 +3,7 @@
 <Class name="vhUnitTest.APPS.VKP.impl.OfferteService.VerpakkingConvertor.Converteer.TBX.TestLadeType">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: geeft geen ladetype terug van een TBX lade">
+<Method name="Test: geeft TBX ladetype terug van een TBX lade">
 <Implementation><![CDATA[
 	#dim MaatwerkLijnList As %ListOfObjects = ##class(%ListOfObjects).%New( )
 	Do MaatwerkLijnList.Insert(..MaakMaatwerkLijn())
@@ -14,7 +14,7 @@
 	
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = VerpakkingConvertor.Converteer(MaatwerkLijnIterator)
 	
-	Do $$$AssertEquals(VerpakkingList.Count(), 0)
+	Do $$$AssertEquals(VerpakkingList.GetAt(1).LadeType, ##class(APPS.VKP.Offerte.enu.LadeType).Tandembox())
 ]]></Implementation>
 </Method>
 
@@ -30,6 +30,9 @@
 <ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
+	Do IngegevenKenmerken.MaakVariantAntaro()
+	Set IngegevenKenmerken.LegacyKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).%New()
+	Set IngegevenKenmerken.LegacyKenmerken.ItemVPK = ##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen()
 
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
 	Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken)