Index: AXimpl/RequestComposer.cls.xml
===================================================================
diff -u -r43016 -r48773
--- AXimpl/RequestComposer.cls.xml	(.../RequestComposer.cls.xml)	(revision 43016)
+++ AXimpl/RequestComposer.cls.xml	(.../RequestComposer.cls.xml)	(revision 48773)
@@ -13,20 +13,26 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ObjectValidator">
+<Type>AXimpl.ObjectValidator</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="ConfigOut">
 <Type>AXimpl.ConfigOut</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>MessageManager:AXimpl.MessageManager</FormalSpec>
+<FormalSpec>MessageManager:AXimpl.MessageManager,ObjectValidator:AXimpl.ObjectValidator</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	set ..FirmaBepaler = ##class(AXimpl.InterneFirmaBepaler).%New()
 	set ..MessageManager = $$$Inject(MessageManager,##class(AXimpl.MessageManager).%New())
+	set ..ObjectValidator = $$$Inject(ObjectValidator,##class(AXimpl.ObjectValidator).%New())
 	set ..ConfigOut = ##class(AXimpl.ConfigOut).%New()
 	Quit $$$OK
 ]]></Implementation>
@@ -45,6 +51,8 @@
 	set Envelope.Header.Action = ..ConfigOut.GetAction(Request)
 	set Envelope.Body.MessageParts = ..ConfigOut.GetConverter(Request).Convert(Request,MessageId)
 	
+	do ..ObjectValidator.Validate(Envelope)
+	
 	quit Envelope
 ]]></Implementation>
 </Method>