Index: vhUnitTest/AXimpl/AifMessage/EventHandler/ResponseLogger/Log/Test.cls.xml
===================================================================
diff -u -r41035 -r41761
--- vhUnitTest/AXimpl/AifMessage/EventHandler/ResponseLogger/Log/Test.cls.xml	(.../Test.cls.xml)	(revision 41035)
+++ vhUnitTest/AXimpl/AifMessage/EventHandler/ResponseLogger/Log/Test.cls.xml	(.../Test.cls.xml)	(revision 41761)
@@ -88,7 +88,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Foutief gedrag - Fault zonder code">
+<Method name="Test: NoFaultCode -&gt; geen mail versturen">
 <Implementation><![CDATA[
 	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
 	
@@ -108,14 +108,15 @@
 	set ResponseMessage.Header.RequestMessageId = "{123456-ABC-1234567}"
 	
 	set FaultMessageList = ##class(AXaif.Fault.AxdFaultMessageList).%New()
+	set ResponseMessage.Body.MessageParts.Fault.Code = "NoFaultCode"
 	do ResponseMessage.Body.MessageParts.Fault.Reason.Text.SetAt("ErrorReason","EN-US")
 
 	set MessageStream = ##class(%GlobalCharacterStream).%New()
 	
 	Set MailFake = ##class(vhTest.Fake.TECH.Mail.Mail).%New()
 	Set MailApiMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
 	Do MailApiMock.IndienMethodCall("MaakNieuwMail").DanReturn(MailFake)
-	Do MailApiMock.VerwachtMethodCall("VerstuurMail",MailFake).ExactAantalKeer(1)
+	Do MailApiMock.VerwachtMethodCall("VerstuurMail",MailFake).ExactAantalKeer(0)
 	
 	set ReponseLogger = ##class(AXimpl.AifMessage.EventHandler.ResponseLogger).%New(MessageRepositoryStub,FailedMessageRepositoryMock,MailApiMock)
 	do ReponseLogger.Log(ResponseMessage,MessageStream)
@@ -130,6 +131,49 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: NoValidDocumentIdentified -&gt; geen mail versturen">
+<Implementation><![CDATA[
+	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	
+	#dim StoredMessage As AXdata.AifMessage.Message = ..GetStoredMessage()
+	set MessageRepositoryStub = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	do MessageRepositoryStub.IndienMethodCall("GeefViaRequestGuid","{123456-ABC-1234567}").DanReturn(StoredMessage)
+	do MessageRepositoryStub.IndienMethodCall("Bewaar",StoredMessage)
+	
+	set FailedMessageRepositoryMock = ##class(vhTest.Mock.AX.AifMessage.FailedMessageRepository).%New()
+	
+	set FailedMessage = ##class(AXdata.AifMessage.FailedMessage).%New()
+	do FailedMessageRepositoryMock.VerwachtMethodCall("Maak").DanReturn(FailedMessage)
+	do FailedMessageRepositoryMock.VerwachtMethodCall("Bewaar",FailedMessage)
+		
+	set ResponseMessage = ##class(AXaif.Message.Envelope).%New()
+	set ResponseMessage.Header.MessageId = "{654321-ABC-7654321}"
+	set ResponseMessage.Header.RequestMessageId = "{123456-ABC-1234567}"
+	
+	set FaultMessageList = ##class(AXaif.Fault.AxdFaultMessageList).%New()
+	set ResponseMessage.Body.MessageParts.Fault.Code = "NoValidDocumentIdentified"
+	do ResponseMessage.Body.MessageParts.Fault.Reason.Text.SetAt("ErrorReason","EN-US")
+
+	set MessageStream = ##class(%GlobalCharacterStream).%New()
+	
+	Set MailFake = ##class(vhTest.Fake.TECH.Mail.Mail).%New()
+	Set MailApiMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New()
+	Do MailApiMock.IndienMethodCall("MaakNieuwMail").DanReturn(MailFake)
+	Do MailApiMock.VerwachtMethodCall("VerstuurMail",MailFake).ExactAantalKeer(0)
+	
+	set ReponseLogger = ##class(AXimpl.AifMessage.EventHandler.ResponseLogger).%New(MessageRepositoryStub,FailedMessageRepositoryMock,MailApiMock)
+	do ReponseLogger.Log(ResponseMessage,MessageStream)
+	
+	do $$$AssertEquals(FailedMessage.Message,StoredMessage)
+	do $$$AssertEquals(FailedMessage.Error.Code,"NoValidDocumentIdentified")
+	do $$$AssertEquals(FailedMessage.Error.Detail,"ErrorReason")
+	do $$$AssertEquals(FailedMessage.TimeStamp,"2011-06-30 09:15:00")
+	
+	do FailedMessageRepositoryMock.Verifieer()
+	do MailApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="GetStoredMessage">
 <Private>1</Private>
 <ReturnType>AXdata.AifMessage.Message</ReturnType>