Index: AXimpl/ObjectValidator.cls.xml
===================================================================
diff -u -r48773 -r48796
--- AXimpl/ObjectValidator.cls.xml	(.../ObjectValidator.cls.xml)	(revision 48773)
+++ AXimpl/ObjectValidator.cls.xml	(.../ObjectValidator.cls.xml)	(revision 48796)
@@ -11,12 +11,12 @@
 </Property>
 
 <Method name="Validate">
-<FormalSpec>Object:AXif.DataTransferObject</FormalSpec>
+<FormalSpec>Object:AXif.DataTransferObject,MeldingIndienNietOk:%String="Validate object"</FormalSpec>
 <Implementation><![CDATA[
 	set TmpStorage = ..%New()
 	set TmpStorage.Object = Object
 	
-	do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(TmpStorage.%Save())
+	do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(TmpStorage.%Save(),MeldingIndienNietOk)
 	
 	do TmpStorage.%DeleteId(TmpStorage.%Oid())
 ]]></Implementation>