Index: BL/Flow/Offerte/Parser/beNEWSOBELWOOD.cls.xml
===================================================================
diff -u -r29059 -r51771
--- BL/Flow/Offerte/Parser/beNEWSOBELWOOD.cls.xml	(.../beNEWSOBELWOOD.cls.xml)	(revision 29059)
+++ BL/Flow/Offerte/Parser/beNEWSOBELWOOD.cls.xml	(.../beNEWSOBELWOOD.cls.xml)	(revision 51771)
@@ -159,7 +159,8 @@
 	Do XMLReader.Correlate("ProjectItem","BL.Flow.Offerte.dto.KADEDI.ProjectItem") 
 	#dim IsOK As %Integer = XMLReader.Next(.ProjectItem,.Status)
 	If $$$ISERR(Status) {
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Correlate xml bestand New Sobelwoord niet gelukt",Status))
+		#dim Message As %String = "Correlate xml bestand New Sobelwoord niet gelukt. "_ ..GeefTekstVanTeNegerenTags(Status) _"Bij OV krijgt BramB een mail waarmee de bestelling alsnog manueem kan verwerkt worden."
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),Message,Status))
 	}
 	
 	If '$IsObject(ProjectItem) Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Kon geen ProjectItem teruggeven van bestand : '"_FileName_"'"))
@@ -168,6 +169,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefTekstVanTeNegerenTags">
+<FormalSpec>CorrelateErrorStatus:%Status</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim TekstVanTeNegerenTags As %String = ""
+	#dim StatusOmschrijving As %String = $$ParseStatus^vhLib(CorrelateErrorStatus)
+	
+	If (StatusOmschrijving [ "Datatype validation failed for tag, Key ") {
+		#dim TeNegerenTag As %String = "LA"   ; Indien meerdere tags te checken, dan List maken + While loop 
+	 	If (StatusOmschrijving [ "with value: "_TeNegerenTag) {
+			Set TekstVanTeNegerenTags = TekstVanTeNegerenTags _"Invalid Tag key '"_TeNegerenTag_"' mag genegeerd worden. "
+	 	}
+	}
+	Quit TekstVanTeNegerenTags
+]]></Implementation>
+</Method>
+
 <Method name="GeefLijnIdentificatie">
 <FormalSpec>FileName:%String,KADWrapper:BL.Flow.Offerte.impl.KADWrapper</FormalSpec>
 <Private>1</Private>