Index: vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml
===================================================================
diff -u -r32835 -r32850
--- vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 32835)
+++ vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 32850)
@@ -14,7 +14,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "TeVerzendenItems")
+		Do $$$AssertEquals(Exceptie.ToString(), "Er zijn geeen teverzenditems meegegeven.\TeVerzendenItems\0")
 	}
 ]]></Implementation>
 </Method>
@@ -40,7 +40,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "Woonplaats")
+		Do $$$AssertEquals(Exceptie.ToString(), "Er is geen woonplaats meegegeven.\Woonplaats\")
 	}
 ]]></Implementation>
 </Method>
@@ -55,7 +55,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "Postcode")
+		Do $$$AssertEquals(Exceptie.ToString(), "Er is geen postcode meegegeven.\Postcode\")
 	}
 ]]></Implementation>
 </Method>
@@ -70,7 +70,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "LandCode")
+		Do $$$AssertEquals(Exceptie.ToString(), "Er is geen landcode meegegeven.\LandCode\")
 	}
 ]]></Implementation>
 </Method>
@@ -85,7 +85,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "ProvincieCode")
+		Do $$$AssertEquals(Exceptie.ToString(), "De provinciecode vereist voor landcode US of CA.\ProvincieCode\")
 	}
 ]]></Implementation>
 </Method>
@@ -119,7 +119,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "GewensteLeverDatum")
+		Do $$$AssertEquals(Exceptie.ToString(), "De gewenste leverdatum kan voor 29.02.16 plaatsvinden.\GewensteLeverDatum\11.03.15")
 	}
 ]]></Implementation>
 </Method>
@@ -134,7 +134,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exceptions.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "GewensteLeverDatum")
+		Do $$$AssertEquals(Exceptie.ToString(), "De gewenste leverdatum kan niet na 24.04.16 plaatsvinden.\GewensteLeverDatum\29.11.35")
 	}
 ]]></Implementation>
 </Method>
@@ -149,7 +149,7 @@
 	} catch {
 		#dim Exceptie As TECH.Exception.TemplateBaseException = ##class(TECH.ExceptionHandler).Catch()
 		Do $$$AssertEquals(Exceptie.GeefExceptionCode(),##class(TECH.enu.ExceptionCode).InvalidInput())
-		Do $$$AssertEquals(Exceptie.ToString(), "GewensteLeverDatum,GewensteLeverDatum")
+		Do $$$AssertEquals(Exceptie.ToString(), "Er is geen gewenste leverdatum meegegeven;.\GewensteLeverDatum\24.02.16,De gewenste leverdatum kan voor 29.02.16 plaatsvinden.\GewensteLeverDatum\24.02.16")
 	}
 ]]></Implementation>
 </Method>
Index: APPS/TRANSP/UPS/impl/BerekenInputValidator.cls.xml
===================================================================
diff -u -r32835 -r32850
--- APPS/TRANSP/UPS/impl/BerekenInputValidator.cls.xml	(.../BerekenInputValidator.cls.xml)	(revision 32835)
+++ APPS/TRANSP/UPS/impl/BerekenInputValidator.cls.xml	(.../BerekenInputValidator.cls.xml)	(revision 32850)
@@ -11,51 +11,55 @@
 <FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput</FormalSpec>
 <Implementation><![CDATA[
 	If ($$$Not($IsObject(BerekenInput.LeverAdres))) {
-		Do ..RegistreerFoutmelding("LeverAdres")
+		Do ..RegistreerFoutmelding("Er is geen leveradres meegegeven.", "LeverAdres", BerekenInput.LeverAdres)
 	}
 	
 	If ((BerekenInput.LeverAdres.LandCode = "US") || (BerekenInput.LeverAdres.LandCode = "CA")) && (BerekenInput.LeverAdres.ProvincieCode = "")
 	{
-		Do ..RegistreerFoutmelding("ProvincieCode")
+		Do ..RegistreerFoutmelding("De provinciecode vereist voor landcode US of CA.", "ProvincieCode", BerekenInput.LeverAdres.ProvincieCode)
 	}
 	
 	If (BerekenInput.LeverAdres.LandCode = "") 
 	{
-		Do ..RegistreerFoutmelding("LandCode")
+		Do ..RegistreerFoutmelding("Er is geen landcode meegegeven.", "LandCode",BerekenInput.LeverAdres.LandCode)
 	}
 
 	If (BerekenInput.LeverAdres.Postcode = "") 
 	{
-		Do ..RegistreerFoutmelding("Postcode")
+		Do ..RegistreerFoutmelding("Er is geen postcode meegegeven.","Postcode", BerekenInput.LeverAdres.Postcode)
 	}
 
 	If (BerekenInput.LeverAdres.Woonplaats = "") 
 	{
-		Do ..RegistreerFoutmelding("Woonplaats")
+		Do ..RegistreerFoutmelding("Er is geen woonplaats meegegeven.","Woonplaats",BerekenInput.LeverAdres.Woonplaats)
 	}
 
+	#dim GewensteLeverDatum As %String = ##class(TECH.DateTime).GeefDatumInPuntNotatie(BerekenInput.GewensteLeverDatum)
+
 	If (BerekenInput.GewensteLeverDatum = "") 
 	{
-		Do ..RegistreerFoutmelding("GewensteLeverDatum")
+		Do ..RegistreerFoutmelding("Er is geen gewenste leverdatum meegegeven;.","GewensteLeverDatum", GewensteLeverDatum)
 	}
 
 	If (BerekenInput.GewensteLeverDatum < ..GeefDatumPlusProductieDagen()) 
 	{
-		Do ..RegistreerFoutmelding("GewensteLeverDatum")
+		#dim GeefDatumPlusProductieDagen As %String = ##class(TECH.DateTime).GeefDatumInPuntNotatie(..GeefDatumPlusProductieDagen())
+		Do ..RegistreerFoutmelding("De gewenste leverdatum kan voor " _GeefDatumPlusProductieDagen _" plaatsvinden.","GewensteLeverDatum",GewensteLeverDatum)
 	}
 	
-	If (BerekenInput.GewensteLeverDatum > ..GeefUitersteDatum() ) 
+	If (BerekenInput.GewensteLeverDatum > ..GeefUitersteDatum()) 
 	{
-		Do ..RegistreerFoutmelding("GewensteLeverDatum")
+		#dim GeefUitersteDatum As %String = ##class(TECH.DateTime).GeefDatumInPuntNotatie(..GeefUitersteDatum())
+		Do ..RegistreerFoutmelding("De gewenste leverdatum kan niet na " _GeefUitersteDatum _" plaatsvinden.","GewensteLeverDatum",GewensteLeverDatum)
 	}
 	
 	If ($$$Not($IsObject(BerekenInput.TeVerzendenItems)) || (BerekenInput.TeVerzendenItems.Count() = 0)) 
 	{
-		Do ..RegistreerFoutmelding("TeVerzendenItems")
+		Do ..RegistreerFoutmelding("Er zijn geeen teverzenditems meegegeven.","TeVerzendenItems", BerekenInput.TeVerzendenItems.Count())
 	}
 	
 	If (..BerekenAantalPakjes(BerekenInput) > ##class(APPS.TRANSP.UPS.impl.Settings).%GetParameter("MaximumTeVerzendenPakketten")) {
-		Do ..RegistreerFoutmelding("MaximumTeVerzendenPakketten")
+		Do ..RegistreerFoutmelding("Het maximum aantal pakketen is overschreden","MaximumTeVerzendenPakketten",..BerekenAantalPakjes(BerekenInput))
 	}
 	
 	if $IsObject(..Exceptie) {
@@ -117,12 +121,13 @@
 </Method>
 
 <Method name="RegistreerFoutmelding">
-<FormalSpec>PropertyNaam:%String</FormalSpec>
+<FormalSpec>Melding:%String,ObjectNaam:%String,Waarde:%String</FormalSpec>
 <Implementation><![CDATA[
+	#dim Omschrijving As TECH.Exceptions.TemplateBaseExcception.Description = ##class(TECH.Exceptions.TemplateBaseExcception.Description).%New(Melding, ObjectNaam, Waarde)
 	if ($IsObject(..Exceptie)) {
-		Do ..Exceptie.AddObject(PropertyNaam)
+		Do ..Exceptie.AddObject(Omschrijving)
 	} else {
-		Set ..Exceptie= ##class(TECH.Exceptions.TemplateBaseException).%New(##class(TECH.enu.ExceptionCode).InvalidInput(), PropertyNaam)
+		Set ..Exceptie= ##class(TECH.Exceptions.TemplateBaseException).%New(##class(TECH.enu.ExceptionCode).InvalidInput(), Omschrijving)
 	}
 ]]></Implementation>
 </Method>