Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml
===================================================================
diff -u -r37565 -r37567
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37565)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37567)
@@ -87,6 +87,7 @@
 
 	#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)
 	
 	Quit MaatwerkLijn
 ]]></Implementation>
Index: APPS/VKP/Offerte/dto/VerpakkingList.cls.xml
===================================================================
diff -u -r37564 -r37567
--- APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 37564)
+++ APPS/VKP/Offerte/dto/VerpakkingList.cls.xml	(.../VerpakkingList.cls.xml)	(revision 37567)
@@ -29,6 +29,8 @@
 	#dim VolumeAandeel As TECH.Decimal = 0.0
 	#dim Counter As %Integer = 0
 	for Counter=1:1:..Count() {
+		Do ..Valideer(..GetAt(Counter).VolumeAandeel, ..GetAt(Counter).ProductID, "VolumeAandeel")
+		Do ..Valideer(..GetAt(Counter).Aantal, ..GetAt(Counter).ProductID, "Aantal")
 		Set VolumeAandeel = VolumeAandeel + (..GetAt(Counter).VolumeAandeel * ..GetAt(Counter).Aantal)
 	}
 	Quit VolumeAandeel
@@ -50,12 +52,12 @@
 <Method name="GeefTotaalGewicht">
 <ReturnType>TECH.Decimal</ReturnType>
 <Implementation><![CDATA[
-	#dim Gewicht As TECH.Decimal = 0.0
+	#dim TotaalGewicht As TECH.Decimal = 0.0
 	#dim Counter As %Integer = 0
 	for Counter=1:1:..Count() {
-		Set Gewicht = Gewicht + (..GetAt(Counter).Gewicht * ..GetAt(Counter).Aantal)
+		Set TotaalGewicht = TotaalGewicht + (..GetAt(Counter).Gewicht * ..GetAt(Counter).Aantal)
 	}
-	Quit Gewicht
+	Quit TotaalGewicht
 ]]></Implementation>
 </Method>
 
@@ -81,6 +83,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Valideer">
+<FormalSpec>Waarde:%CacheString,ProductID:%String,Property:%String</FormalSpec>
+<Implementation><![CDATA[
+	if (Waarde = "") {
+		#dim Melding As %String = "Verpakking " _ProductID _" heeft een " _Property _" met lege waarde."
+		#dim Exception As TECH.Exceptions.InvalidInputException = ##class(TECH.Exceptions.InvalidInputException).%New(Melding)
+		do ##class(TECH.ExceptionHandler).Throw(Exception)
+	}
+]]></Implementation>
+</Method>
+
 <Storage name="Custom">
 <Type>%Library.CompleteCustomStorage</Type>
 </Storage>
Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml
===================================================================
diff -u -r37565 -r37567
--- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37565)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml	(.../TestVerpakkingType.cls.xml)	(revision 37567)
@@ -92,6 +92,7 @@
 
 	#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)
 	
 	Quit MaatwerkLijn
 ]]></Implementation>
Index: vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalVolumeAandeel/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalVolumeAandeel/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalVolumeAandeel/Test.cls.xml	(revision 37567)
@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.VKP.Offerte.dto.VerpakkingList.GeefTotaalVolumeAandeel.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: geeft het totale volumeaandeel van een verpakkingslijst waarbij het verpakking aantal 1 is">
+<Implementation><![CDATA[
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(vhTest.Utils.APPS.VKP.Offerte.dto.VerpakkingList).GeefVerpakkingsList()
+	Set VerpakkingList.GetAt(1).VolumeAandeel = 0.3
+	Set VerpakkingList.GetAt(1).Aantal = 1
+	Set VerpakkingList.GetAt(2).VolumeAandeel = 0.5
+	Set VerpakkingList.GetAt(2).Aantal = 1
+	Set VerpakkingList.GetAt(3).VolumeAandeel = 0.7
+	Set VerpakkingList.GetAt(3).Aantal = 1
+	Set VerpakkingList.GetAt(4).VolumeAandeel = 0.11
+	Set VerpakkingList.GetAt(4).Aantal = 1
+	Set VerpakkingList.GetAt(5).VolumeAandeel = 0.13
+	Set VerpakkingList.GetAt(5).Aantal = 1
+	
+	Do $$$AssertEquals(VerpakkingList.GeefTotaalVolumeAandeel(),1.74)
+]]></Implementation>
+</Method>
+
+<Method name="Test: geeft het totale volumeaandeel van een verpakkingslijst waarbij het verpakking aantal per verpakking verschillend is">
+<Implementation><![CDATA[
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(vhTest.Utils.APPS.VKP.Offerte.dto.VerpakkingList).GeefVerpakkingsList()
+	Set VerpakkingList.GetAt(1).VolumeAandeel = 0.3
+	Set VerpakkingList.GetAt(1).Aantal = 1
+	Set VerpakkingList.GetAt(2).VolumeAandeel = 0.5
+	Set VerpakkingList.GetAt(2).Aantal = 2
+	Set VerpakkingList.GetAt(3).VolumeAandeel = 0.7
+	Set VerpakkingList.GetAt(3).Aantal = 3
+	Set VerpakkingList.GetAt(4).VolumeAandeel = 0.11
+	Set VerpakkingList.GetAt(4).Aantal = 4
+	Set VerpakkingList.GetAt(5).VolumeAandeel = 0.13
+	Set VerpakkingList.GetAt(5).Aantal = 5
+	
+	Do $$$AssertEquals(VerpakkingList.GeefTotaalVolumeAandeel(),4.49)
+]]></Implementation>
+</Method>
+
+<Method name="Test: geeft een foutmelding van een verpakkingslijst met een verpakking waarbij het Volume aandeel leeg is">
+<Implementation><![CDATA[
+	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = ##class(vhTest.Utils.APPS.VKP.Offerte.dto.VerpakkingList).GeefVerpakkingsList()
+	Set VerpakkingList.GetAt(1).VolumeAandeel = 0.3
+	Set VerpakkingList.GetAt(1).Aantal = 1
+	Set VerpakkingList.GetAt(2).VolumeAandeel = 0.5
+	Set VerpakkingList.GetAt(2).Aantal = 2
+	Set VerpakkingList.GetAt(3).VolumeAandeel = ""
+	Set VerpakkingList.GetAt(3).Aantal = 3
+	Set VerpakkingList.GetAt(4).VolumeAandeel = 0.11
+	Set VerpakkingList.GetAt(4).Aantal = 4
+	Set VerpakkingList.GetAt(5).VolumeAandeel = 0.13
+	Set VerpakkingList.GetAt(5).Aantal = 5
+	
+	#dim Omschrijvingen As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Verpakking 3 heeft een VolumeAandeel met lege waarde.")	
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Omschrijvingen))
+
+	Do VerpakkingList.GeefTotaalVolumeAandeel()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>