Index: APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV.cls.xml
===================================================================
diff -u -r31937 -r31955
--- APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV.cls.xml	(.../FakeForDEV.cls.xml)	(revision 31937)
+++ APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV.cls.xml	(.../FakeForDEV.cls.xml)	(revision 31955)
@@ -55,7 +55,20 @@
 	#dim LadeTAX As APPS.EDI.common.dto.v001.LadeTAX = EDIAanvraag.Product
 	Set IngegevenKenmerken = ##class(APPS.PM.Maatwerk.dto.TAORKenmerken).%New()
 	Set IngegevenKenmerken.LadeDiepte = LadeTAX.LadeDiepte
+	Set IngegevenKenmerken.LadeHoogte = LadeTAX.LadeHoogte
+	Set IngegevenKenmerken.Draagkracht = LadeTAX.Draagkracht
 	
+	#dim BinaireFoutWaarde As %BigInt = 0
+	If IngegevenKenmerken.LadeHoogte = "ZZ" {
+		Set BinaireFoutWaarde = BinaireFoutWaarde + 16
+	}
+	If IngegevenKenmerken.Draagkracht '? 1(1"",1"40",1"60") {
+		Set BinaireFoutWaarde = BinaireFoutWaarde + 32768
+	}
+	If BinaireFoutWaarde > 0 {
+		Do ##class(TECH.Exceptions.GeneralErrorException).Throw(BinaireFoutWaarde_";Ongeldige Kenmerkwaarden")
+	}
+
 	Quit IngegevenKenmerken
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV/GeefPrijs/Test.cls.xml
===================================================================
diff -u -r31943 -r31955
--- vhUnitTest/APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV/GeefPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 31943)
+++ vhUnitTest/APPS/EDI/PrijsBerekening/impl/PrijsBerekeningService/FakeForDEV/GeefPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 31955)
@@ -63,6 +63,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestFoutOngeldigeKenmerkwaarden">
+<Implementation><![CDATA[
+	#dim EDIAanvraag As APPS.EDI.PrijsBerekening.dto.Aanvraag = ..MaakEDIAanvraagTAX(1,"")
+	Set EDIAanvraag.Product.LadeHoogte = "ZZ"
+	Set EDIAanvraag.Product.Draagkracht = 44
+	
+	#dim VerwachteBinaireFoutWaarde As %BigInt = 32784   ; = 16 + 32768 
+	#dim OmschrijvingSubStrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(VerwachteBinaireFoutWaarde_";Ongeldige Kenmerkwaarden")
+	Set VerwachteExceptie = ##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",OmschrijvingSubStrings)
+	
+	Do ..AssertGeefPrijsVerwachtEenExceptie(EDIAanvraag,VerwachteExceptie)
+]]></Implementation>
+</Method>
+
 <Method name="AssertGeefPrijsVerwachtEenExceptie">
 <FormalSpec>EDIAanvraag:APPS.EDI.PrijsBerekening.dto.Aanvraag,VerwachteExceptie:Tools.Test.VerwachteExceptie</FormalSpec>
 <Private>1</Private>
@@ -83,9 +97,11 @@
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	Set Validator = ##class(Tools.Test.ExceptieValidator).%New(Exception, VerwachteExceptie)
-	#dim Message As %String = ##class(TECH.ListUtils).ListToPieces(Validator.GeefBezwaren(),"\")
-	Do $$$AssertTrue(Validator.IsGeldig(),"Exceptie-object: "_Message)
+	If $$$AssertTrue($IsObject(Exception)) {
+		Set Validator = ##class(Tools.Test.ExceptieValidator).%New(Exception, VerwachteExceptie)
+		#dim Message As %String = ##class(TECH.ListUtils).ListToPieces(Validator.GeefBezwaren(),"\")
+		Do $$$AssertTrue(Validator.IsGeldig(),"Exceptie-object: "_Message)
+	}
 ]]></Implementation>
 </Method>
 
Index: EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml
===================================================================
diff -u -r31931 -r31955
--- EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml	(.../RequestVerwerker.cls.xml)	(revision 31931)
+++ EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml	(.../RequestVerwerker.cls.xml)	(revision 31955)
@@ -25,6 +25,8 @@
 <Implementation><![CDATA[
 	Set LadeTAX = ##class(APPS.EDI.common.dto.v001.LadeTAX).%New()
 	Set LadeTAX.LadeDiepte = Lade.LadeDiepte
+	Set LadeTAX.LadeHoogte = Lade.LadeHoogte
+	Set LadeTAX.Draagkracht = Lade.Draagkracht
 	
 	Quit LadeTAX
 ]]></Implementation>