Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestLadeType.cls.xml
===================================================================
diff -u -r37553 -r37564
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37553)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37564)
@@ -24,6 +24,7 @@
 <ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1()
 
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
 	Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken)
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml
===================================================================
diff -u -r37553 -r37564
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37553)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37564)
@@ -14,7 +14,7 @@
 	
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = VerpakkingConvertor.Converteer(MaatwerkLijnIterator)
 	
-	Do $$$AssertEquals(VerpakkingList.GetAt(1).LadeType, "")
+	Do $$$AssertEquals(VerpakkingList.Count(), 0)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml
===================================================================
diff -u -r37553 -r37564
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37553)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37564)
@@ -14,12 +14,12 @@
 </Method>
 
 <Method name="Test: geeft geen verpakkingtype van een LBX lade met verpakkingtype VHoss">
-<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.LBXVerpakkingType).VHoss(),"")
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.LBXVerpakkingType).VHoss())
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft geen verpakkingtype van een LBX lade met verpakkingtype Pallet">
-<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.LBXVerpakkingType).Pallet(),"")
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.LBXVerpakkingType).Pallet())
 ]]></Implementation>
 </Method>
 
@@ -48,6 +48,28 @@
 ]]></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>
Index: APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml
===================================================================
diff -u -r37557 -r37564
--- APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml	(.../VerpakkingConvertor.cls.xml)	(revision 37557)
+++ APPS/VKP/impl/OfferteService/VerpakkingConvertor.cls.xml	(.../VerpakkingConvertor.cls.xml)	(revision 37564)
@@ -7,22 +7,22 @@
 <FormalSpec>MaatwerkLijnIterator:TECH.Iterator</FormalSpec>
 <ReturnType>APPS.VKP.Offerte.dto.VerpakkingList</ReturnType>
 <Implementation><![CDATA[
-	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(APPS.VKP.Offerte.dto.VerpakkingList).%New()
+	#dim LadeVerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(APPS.VKP.Offerte.dto.VerpakkingList).%New()
 
 	While (MaatwerkLijnIterator.HasNext()) {
 		#dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = MaatwerkLijnIterator.Next()
-		#dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New()
-		Set Verpakking.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting())
-		Set Verpakking.Gewicht = Lijn.GeefTotaalGewicht()
-		Set Verpakking.WaardeGoederen = Lijn.GeefTotaalPrijs()
-		Set Verpakking.ProductID = Lijn.GeefProductID()
-		Set Verpakking.Aantal = Lijn.GeefAantal()
-		Set Verpakking.VolumeAandeel = Lijn.GeefVolumeAandeel()
-		Set Verpakking.VerpakkingType = ..GeefVerpakkingType(Lijn.GeefIngegevenKenmerken())
-		Set Verpakking.LadeType = ..GeefLadeType(Lijn.GeefIngegevenKenmerken())
-		Do VerpakkingList.Insert(Verpakking)
+		#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 VerpakkingList
+	Quit ..MaakVerzendVerpakkingList(LadeVerpakkingList)
 ]]></Implementation>
 </Method>
 
@@ -81,6 +81,44 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="MaakVerzendVerpakkingList">
+<FormalSpec>LadeVerpakkingList:APPS.VKP.Offerte.dto.VerpakkingList</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.VKP.Offerte.dto.VerpakkingList</ReturnType>
+<Implementation><![CDATA[
+	#dim VerzendVerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(APPS.VKP.Offerte.dto.VerpakkingList).%New()
+	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()))
+	
+	#dim LadeTypeIterator As TECH.ListIterator = ##class(APPS.VKP.Offerte.enu.LadeType).ValueListIterator()
+	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)
+		if (ProboxVerpakkingList.Count() > 0) {
+			#dim ProboxVerpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New()
+			Set ProboxVerpakking.VerpakkingType = ##class(APPS.VKP.Offerte.enu.VerpakkingType).Probox()
+			Set ProboxVerpakking.LadeType = LadeType
+			Set ProboxVerpakking.ProductID = ProboxVerpakkingList.GeefSamengesteldeProductID()
+			Set ProboxVerpakking.WaardeGoederen = ProboxVerpakkingList.GeefTotaalWaardeGoederen()
+			Set ProboxVerpakking.Gewicht = ProboxVerpakkingList.GeefTotaalGewicht()
+			Set ProboxVerpakking.VolumeAandeel = 1
+			Set ProboxVerpakking.Aantal = ##class(TECH.Math).Ceil(ProboxVerpakkingList.GeefTotaalVolumeAandeel())
+			Set ProboxVerpakking.Afmeting = ..GeefProboxAfmeting()
+			Do VerzendVerpakkingList.Insert(ProboxVerpakking)
+		}
+	}
+	Quit VerzendVerpakkingList
+]]></Implementation>
+</Method>
+
+<Method name="GeefProboxAfmeting">
+<Private>1</Private>
+<ReturnType>APPS.TRANSP.OfferteService.dto.Afmeting</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.TRANSP.OfferteService.dto.Afmeting).%New(132,60,80)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/VKP/Offerte/dto/VerpakkingList.cls.xml
===================================================================
diff -u -r37552 -r37564
--- APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 37552)
+++ APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 37564)
@@ -9,9 +9,9 @@
 
 <Method name="ZoekVerpakkingen">
 <FormalSpec>VerpakkingType:APPS.VKP.Offerte.enu.VerpakkingType="",LadeType:APPS.VKP.Offerte.enu.LadeType=""</FormalSpec>
-<ReturnType>TECH.ListOfObjects</ReturnType>
+<ReturnType>APPS.VKP.Offerte.dto.VerpakkingList</ReturnType>
 <Implementation><![CDATA[
-	#dim VerpakkingList As TECH.ListOfObjects = ##class(%ListOfObjects).%New()
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(APPS.VKP.Offerte.dto.VerpakkingList).%New()
 	#dim Counter As %Integer = 0
 	for Counter=1:1:..Count() {
 		#dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ..GetAt(Counter)
@@ -23,6 +23,64 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefTotaalVolumeAandeel">
+<ReturnType>TECH.Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim VolumeAandeel As TECH.Decimal = 0.0
+	#dim Counter As %Integer = 0
+	for Counter=1:1:..Count() {
+		Set VolumeAandeel = VolumeAandeel + (..GetAt(Counter).VolumeAandeel * ..GetAt(Counter).Aantal)
+	}
+	Quit VolumeAandeel
+]]></Implementation>
+</Method>
+
+<Method name="GeefTotaalWaardeGoederen">
+<ReturnType>TECH.Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim WaardeGoederen As TECH.Decimal = 0.0
+	#dim Counter As %Integer = 0
+	for Counter=1:1:..Count() {
+		Set WaardeGoederen = WaardeGoederen + (..GetAt(Counter).WaardeGoederen * ..GetAt(Counter).Aantal)
+	}
+	Quit WaardeGoederen
+]]></Implementation>
+</Method>
+
+<Method name="GeefTotaalGewicht">
+<ReturnType>TECH.Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim Gewicht As TECH.Decimal = 0.0
+	#dim Counter As %Integer = 0
+	for Counter=1:1:..Count() {
+		Set Gewicht = Gewicht + (..GetAt(Counter).Gewicht * ..GetAt(Counter).Aantal)
+	}
+	Quit Gewicht
+]]></Implementation>
+</Method>
+
+<Method name="GeefSamengesteldeProductID">
+<ReturnType>TECH.Decimal</ReturnType>
+<Implementation><![CDATA[
+	#dim SamengesteldeProductID As %String = ""
+	#dim Counter As %Integer = 0
+	for Counter=1:1:..Count() {
+		Set SamengesteldeProductID = SamengesteldeProductID _"\" _..GetAt(Counter).ProductID
+	}
+	Quit SamengesteldeProductID
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeList">
+<FormalSpec>VerpakkingList:APPS.VKP.Offerte.dto.VerpakkingList</FormalSpec>
+<Implementation><![CDATA[
+	#dim VerpakkingListIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(VerpakkingList)
+	While VerpakkingListIterator.HasNext() {
+		Do ..Insert(VerpakkingListIterator.Next())
+	}
+]]></Implementation>
+</Method>
+
 <Storage name="Custom">
 <Type>%Library.CompleteCustomStorage</Type>
 </Storage>
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestLadeType.cls.xml
===================================================================
diff -u -r37553 -r37564
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37553)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestLadeType.cls.xml	(.../TestLadeType.cls.xml)	(revision 37564)
@@ -24,7 +24,8 @@
 <ReturnType>vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01 = ##class(DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01).%New()
-
+	Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()
+	 
 	#dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New()
 	Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken)
 	
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml
===================================================================
diff -u -r37553 -r37564
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37553)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37564)
@@ -19,12 +19,12 @@
 </Method>
 
 <Method name="Test: geeft geen verpakkingtype terug van een TAX lade in BulkPerOnderdeelGegroepeerd verpakking">
-<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.TAORVerpakkingType).BulkPerOnderdeelGegroepeerd(),"")
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.TAORVerpakkingType).BulkPerOnderdeelGegroepeerd())
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft geen verpakkingtype terug van een TAX lade in LosseComponentenInBulk verpakking">
-<Implementation><![CDATA[	Do ..VerpakkinglistVerpakkingTypeTesten(1, ##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk(),"")
+<Implementation><![CDATA[	Do ..VerpakkinglistLeegTesten(1, ##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk())
 ]]></Implementation>
 </Method>
 
@@ -53,6 +53,28 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerpakkinglistLeegTesten">
+<FormalSpec>AantalMaatwerklijnen:%Integer=1,VerpakkingType:DOM.PM.enu.TAORVerpakkingType</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>