Index: vhUnitTest/AXimpl/EventHandler/ResponseLogger/Log/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/EventHandler/ResponseLogger/Log/Test.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/EventHandler/ResponseLogger/Log/Test.cls.xml	(revision 42276)
@@ -0,0 +1,197 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.EventHandler.ResponseLogger.Log.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="MessageRepositoryStub">
+<Type>vhTest.Mock.AX.AifMessage.MessageRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="StoredMessage">
+<Type>AXdata.AifMessage.Message</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FailedMessage">
+<Type>AXdata.AifMessage.FailedMessage</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FaultMessageList">
+<Type>AXif.Common.Fault.MessageParts.AxdFaultMessageList</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="FailedMessageRepositoryMock">
+<Type>vhTest.Mock.AX.AifMessage.FailedMessageRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResponseMessage">
+<Type>AXaif.Message.Envelope</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MessageStream">
+<Type>%GlobalCharacterStream</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MailFake">
+<Type>vhTest.Fake.TECH.Mail.Mail</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="MailApiMock">
+<Type>vhTest.Mock.TECH.Mail.MailAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+ 	Do ##super(aTestName)
+ 	
+	do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	
+	Set ..StoredMessage = ..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 ..FailedMessage = ##class(AXdata.AifMessage.FailedMessage).%New()
+	
+	Set ..FaultMessageList = ##class(AXif.Common.Fault.MessageParts.AxdFaultMessageList).%New()
+	
+	Set ..FailedMessageRepositoryMock = ##class(vhTest.Mock.AX.AifMessage.FailedMessageRepository).%New()
+	
+	Set ..ResponseMessage = ##class(AXaif.Message.Envelope).%New()
+	Set ..ResponseMessage.Header.MessageId = "{654321-ABC-7654321}"
+	Set ..ResponseMessage.Header.RequestMessageId = "{123456-ABC-1234567}"
+	
+	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)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaardgedrag -&gt; geen mail versturen">
+<Implementation><![CDATA[
+	Do ..MessageRepositoryStub.VerwachtMethodCall("GeefViaRequestGuid","{123456-ABC-1234567}").DanReturn(..StoredMessage)
+	Do ..MessageRepositoryStub.VerwachtMethodCall("Bewaar",..StoredMessage)
+	
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Maak").ExactAantalKeer(0)
+
+	Do ..MessageStream.Write("<?xml version=""1.0"" encoding=""UTF-8""?> ... Response")
+	
+	Do ..MailApiMock.VerwachtMethodCall("VerstuurMail",..MailFake).ExactAantalKeer(0)
+	
+	set ReponseLogger = ##class(AXimpl.ResponseLogger).%New(..MessageRepositoryStub,..FailedMessageRepositoryMock,..MailApiMock)
+	Do ReponseLogger.Log(..ResponseMessage,..MessageStream)
+	
+	do $$$AssertEquals(..StoredMessage.Status,"Processed")
+	do $$$AssertEquals(..StoredMessage.Action,"http://schemas.microsoft.com/dynamics/2008/01/services/GeneralJournalService/create")
+	do $$$AssertEquals(..StoredMessage.Request.TimeStamp,"2011-06-30 09:00:00")
+	do $$$AssertEquals(..StoredMessage.Request.Stream.Read(),"<?xml version=""1.0"" encoding=""UTF-8""?> ... Request")
+	do $$$AssertEquals(..StoredMessage.Response.Stream.Read(),"<?xml version=""1.0"" encoding=""UTF-8""?> ... Response")
+	do $$$AssertEquals(..StoredMessage.Response.TimeStamp,"2011-06-30 09:15:00")
+	
+	do ..MessageRepositoryStub.Verifieer()
+	do ..FailedMessageRepositoryMock.Verifieer()
+	do ..MailApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Foutief gedrag - Fault met code -&gt; mail versturen">
+<Implementation><![CDATA[
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Maak").DanReturn(..FailedMessage)
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Bewaar",..FailedMessage)
+	
+	Set ..ResponseMessage.Body.MessageParts.Fault.Code = "Error"
+	
+	Do ..FaultMessageList.FaultMessage.SetAt("ErrorDetail","Error")
+	Do ..ResponseMessage.Body.MessageParts.Fault.Detail.FaultMessageList.Insert(..FaultMessageList)
+	
+	Do ..MailApiMock.VerwachtMethodCall("VerstuurMail",..MailFake).ExactAantalKeer(1)
+	
+	set ReponseLogger = ##class(AXimpl.ResponseLogger).%New(..MessageRepositoryStub,..FailedMessageRepositoryMock,..MailApiMock)
+	Do ReponseLogger.Log(..ResponseMessage,..MessageStream)
+	
+	do $$$AssertEquals(..FailedMessage.Message,..StoredMessage)
+	do $$$AssertEquals(..FailedMessage.Error.Code,"Error")
+	do $$$AssertEquals(..FailedMessage.Error.Detail,"ErrorDetail")
+	do $$$AssertEquals(..FailedMessage.TimeStamp,"2011-06-30 09:15:00")
+	
+	do ..FailedMessageRepositoryMock.Verifieer()
+	do ..MailApiMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Foutief gedrag - Fault met code NoFaultCode -&gt; geen mail versturen">
+<Implementation><![CDATA[
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Maak").DanReturn(..FailedMessage)
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Bewaar",..FailedMessage)
+	
+	Set ..ResponseMessage.Body.MessageParts.Fault.Code = "NoFaultCode"
+	Do ..ResponseMessage.Body.MessageParts.Fault.Reason.Text.SetAt("ErrorReason","EN-US")
+
+	Do ..MailApiMock.VerwachtMethodCall("VerstuurMail",..MailFake).ExactAantalKeer(0)
+	
+	set ReponseLogger = ##class(AXimpl.ResponseLogger).%New(..MessageRepositoryStub,..FailedMessageRepositoryMock,..MailApiMock)
+	Do ReponseLogger.Log(..ResponseMessage,..MessageStream)
+	
+	do $$$AssertEquals(..FailedMessage.Message,..StoredMessage)
+	do $$$AssertEquals(..FailedMessage.Error.Code,"NoFaultCode")
+	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="Test: Foutief gedrag - Fault met code NoValidDocumentIdentified -&gt; geen mail versturen">
+<Implementation><![CDATA[
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Maak").DanReturn(..FailedMessage)
+	Do ..FailedMessageRepositoryMock.VerwachtMethodCall("Bewaar",..FailedMessage)
+	
+	Set ..ResponseMessage.Body.MessageParts.Fault.Code = "NoValidDocumentIdentified"
+	Do ..ResponseMessage.Body.MessageParts.Fault.Reason.Text.SetAt("ErrorReason","EN-US")
+
+	Do ..MailApiMock.VerwachtMethodCall("VerstuurMail",..MailFake).ExactAantalKeer(0)
+	
+	set ReponseLogger = ##class(AXimpl.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>
+<Implementation><![CDATA[
+	set StoredMessage = ##class(AXdata.AifMessage.Message).%New()
+	set StoredMessage.Command = "SalesInvoice/Create"
+	set StoredMessage.Action = "http://schemas.microsoft.com/dynamics/2008/01/services/GeneralJournalService/create"
+	set StoredMessage.Status = "Pending"
+	set StoredMessage.Request.GUID = "{123456-ABC-1234567}"
+	set StoredMessage.Request.TimeStamp = "2011-06-30 09:00:00"
+	do StoredMessage.Request.Stream.Write("<?xml version=""1.0"" encoding=""UTF-8""?> ... Request")
+	quit StoredMessage
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/EventHandler/CustomerUpdaterPart2/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/EventHandler/CustomerUpdaterPart2/Test.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/EventHandler/CustomerUpdaterPart2/Test.cls.xml	(revision 42276)
@@ -0,0 +1,112 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.EventHandler.CustomerUpdaterPart2.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: read NOK -&gt; create klant uitvoeren">
+<Implementation><![CDATA[
+	#dim MessageID = "{123456-GUID-321}"	
+	
+	Set AifMessage = ##class(AXdata.AifMessage.Message).%New()
+	Set AifMessage.Command = "Customer/UpdatePart1"
+	Set AifMessage.SubjectId = "K||1234"
+	
+	Set MessageRepository = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	Do MessageRepository.VerwachtMethodCall("GeefViaRequestGuid",MessageID).DanReturn(AifMessage).ExactAantalKeer(1)
+		
+	Set Envelope = ##class(AXaif.Message.Envelope).%New()
+	Set Envelope.Header.RequestMessageId = MessageID
+	Set Envelope.Body.MessageParts.Fault.Code = "NoValidDocumentIdentified"
+	
+	Set GeneratorMock = ##class(vhTest.Mock.AXimpl.Generator).%New()
+	Do GeneratorMock.VerwachtMethodCall("Generate",..Matches.DataTransferObject(##class(AXimpl.Request).%New("Customer/Create","K||1234"))).ExactAantalKeer(1)
+	Set UpdaterPart2 = ##class(AXimpl.Dynamics.CustomerUpsertOut.EventHandler.CustomerUpdaterPart2).%New(MessageRepository, GeneratorMock)
+	Do UpdaterPart2.Verwerk(Envelope)
+		
+	Do MessageRepository.Verifieer()
+	Do GeneratorMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Command geen customer/UpdatePart1 -&gt; Geen verwerking">
+<Implementation><![CDATA[
+	#dim MessageID = "{123456-GUID-321}"
+		
+	Set AifMessage = ##class(AXdata.AifMessage.Message).%New()
+	Set AifMessage.Command = "SalesInvoice/Create"
+	Set AifMessage.SubjectId = "123456"
+	
+	Set MessageRepositoryStub = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	Do MessageRepositoryStub.IndienMethodCall("GeefViaRequestGuid",MessageID).DanReturn(AifMessage).ExactAantalKeer(1)
+		
+	Set Envelope = ##class(AXaif.Message.Envelope).%New()
+	Set Envelope.Header.RequestMessageId = MessageID
+
+	Set GeneratorMock = ##class(vhTest.Mock.AXimpl.Generator).%New()
+	Do GeneratorMock.VerwachtMethodCall("Generate",$$$ElkeWaarde).ExactAantalKeer(0)
+	Set UpdaterPart2 = ##class(AXimpl.Dynamics.CustomerUpsertOut.EventHandler.CustomerUpdaterPart2).%New(MessageRepositoryStub, GeneratorMock)
+	Do UpdaterPart2.Verwerk(Envelope)
+	
+	Do GeneratorMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Read OK -&gt; update uitvoeren">
+<Implementation><![CDATA[
+	#dim MessageID = "{123456-GUID-321}"	
+	
+	Set AifMessage = ##class(AXdata.AifMessage.Message).%New()
+	Set AifMessage.Command = "Customer/UpdatePart1"
+	Set AifMessage.SubjectId = "K||1234"
+	
+	Set MessageRepositoryStub = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	Do MessageRepositoryStub.IndienMethodCall("GeefViaRequestGuid",MessageID).DanReturn(AifMessage)
+		
+	Set Envelope = ##class(AXaif.Message.Envelope).%New()
+	Set Envelope.Header.RequestMessageId = MessageID
+		
+	Set Request = ##class(AXimpl.Request).%New("Customer/UpdatePart2","K||1234",Envelope)
+	Set GeneratorMock = ##class(vhTest.Mock.AXimpl.Generator).%New()
+	Do GeneratorMock.VerwachtMethodCall("Generate",..Matches.DataTransferObject(Request)).ExactAantalKeer(1)
+	
+	Set UpdaterPart2 = ##class(AXimpl.Dynamics.CustomerUpsertOut.EventHandler.CustomerUpdaterPart2).%New(MessageRepositoryStub, GeneratorMock)
+	Do UpdaterPart2.Verwerk(Envelope)
+		
+	Do GeneratorMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Alle andere AX-fouten worden gedisplayed">
+<Implementation><![CDATA[
+	#dim MessageID = "{123456-GUID-321}"	
+	
+	Set AifMessage = ##class(AXdata.AifMessage.Message).%New()
+	Set AifMessage.Command = "Customer/UpdatePart1"
+	Set AifMessage.SubjectId = "K||1234"
+	
+	Set MessageRepository = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	Do MessageRepository.IndienMethodCall("GeefViaRequestGuid",MessageID).DanReturn(AifMessage)
+		
+	Set Envelope = ##class(AXaif.Message.Envelope).%New()
+	Set Envelope.Header.RequestMessageId = MessageID
+	Set Envelope.Body.MessageParts.Fault.Code = "EenTotaalOnbekendeErrorCode"
+
+	Set GeneratorMock = ##class(vhTest.Mock.AXimpl.Generator).%New()
+	Do GeneratorMock.VerwachtMethodCall("Generate",$$$ElkeWaarde).ExactAantalKeer(0)
+
+	try {
+		Set UpdaterPart2 = ##class(AXimpl.Dynamics.CustomerUpsertOut.EventHandler.CustomerUpdaterPart2).%New(MessageRepository, GeneratorMock)
+		Do UpdaterPart2.Verwerk(Envelope)
+		Do ..Fail("Er was een exceptie verwacht")
+	} catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch(##class(AXimpl.Dynamics.CustomerUpsertOut.Exception.CustomerUpdatePart2UnknownFaultCodeException).%ClassName(1))
+		do $$$AssertEquals(Exception.GeefOmschrijving(),"Customer update, unknown faultcode : 'EenTotaalOnbekendeErrorCode'")
+	}		
+	
+	Do GeneratorMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/EventHandler/RequestLogger/RequestLoggerSpy.cls.xml
===================================================================
diff -u -r42273 -r42276
--- vhUnitTest/AXimpl/EventHandler/RequestLogger/RequestLoggerSpy.cls.xml	(.../AifMessage/EventHandler/RequestLogger/RequestLoggerSpy.cls.xml)	(revision 42273)
+++ vhUnitTest/AXimpl/EventHandler/RequestLogger/RequestLoggerSpy.cls.xml	(.../EventHandler/RequestLogger/RequestLoggerSpy.cls.xml)	(revision 42276)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
-<Class name="vhUnitTest.AXimpl.AifMessage.EventHandler.RequestLogger.RequestLoggerSpy">
+<Class name="vhUnitTest.AXimpl.EventHandler.RequestLogger.RequestLoggerSpy">
 <Super>AXimpl.RequestLogger</Super>
 
 <Method name="Log">
Index: vhUnitTest/AXimpl/EventHandler/RequestLogger/Log/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/EventHandler/RequestLogger/Log/Test.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/EventHandler/RequestLogger/Log/Test.cls.xml	(revision 42276)
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.EventHandler.RequestLogger.Log.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Log">
+<Implementation><![CDATA[
+	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	
+	Set AifMessage = ##class(AXdata.AifMessage.Message).%New()
+	Set MessageRepositoryMock = ##class(vhTest.Mock.AX.AifMessage.MessageRepository).%New()
+	Do MessageRepositoryMock.VerwachtMethodCall("Maak").DanReturn(AifMessage).ExactAantalKeer(1)
+	Do MessageRepositoryMock.VerwachtMethodCall("Bewaar",AifMessage).ExactAantalKeer(1)
+	
+	#dim Command As %String = "Customer/Create"
+	#dim Id As %String = "K||1000"
+	#dim Envelope As AXaif.Message.Envelope = ##class(AXaif.Message.Envelope).%New()
+	Set Envelope.Header.Action = "http://schemas.microsoft.com/dynamics/2008/01/services/CustomerService/create"
+	Set Envelope.Header.MessageId = "{12345-123-ABC}"
+	Set Envelope.Header.Company = "VHBE"
+	#dim MessageStream As %Stream.Object = ##class(%GlobalCharacterStream).%New()
+	Do MessageStream.Write("<XML></XML>")
+	
+	Set RequestLogger = ##class(AXimpl.RequestLogger).%New(MessageRepositoryMock)	
+	Do RequestLogger.Log(Command,Id,Envelope,MessageStream)
+		
+	Do $$$AssertEquals(AifMessage.Command,"Customer/Create")
+	Do $$$AssertEquals(AifMessage.SubjectId,"K||1000")
+	Do $$$AssertEquals(AifMessage.Status,"Pending")
+	Do $$$AssertEquals(AifMessage.Request.GUID,"{12345-123-ABC}")
+	Do $$$AssertEquals(AifMessage.Action,"http://schemas.microsoft.com/dynamics/2008/01/services/CustomerService/create")
+	Do $$$AssertEquals(AifMessage.Company,"VHBE")
+	Do $$$AssertEquals(AifMessage.Request.TimeStamp,"2011-06-30 09:15:00")
+	
+	Do $$$AssertNotEquals(AifMessage.Request.Stream,MessageStream)
+	Do $$$AssertEquals(AifMessage.Request.Stream.Read(),MessageStream.Read())
+	
+	Do MessageRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/EventHandler/RequestLogger/StartVerwerking/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/EventHandler/RequestLogger/StartVerwerking/Test.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/EventHandler/RequestLogger/StartVerwerking/Test.cls.xml	(revision 42276)
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.EventHandler.RequestLogger.StartVerwerking.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	do ##super(aTestName)
+	Kill %RequestLoggerSpy
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Kill %RequestLoggerSpy
+	do ##super(aTestName)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Eventdata wordt correct doorgegeven">
+<Implementation><![CDATA[
+	Set Data = ##class(AX.AifMessage.event.AifRequestSendEventData).%New()
+	Set Data.Command = "oink"
+	Set Data.SubjectId = "0"
+	Set Data.Message = ##class(AXaif.Message.Envelope).%New()
+	Set Data.MessageStream = ##class(%GlobalCharacterStream).%New()
+
+	Set Event = ##class(AX.AifMessage.event.AifRequestSendEvent).%New(Data)
+	
+    Set RequestLoggerSpy = ##class(vhUnitTest.AXimpl.EventHandler.RequestLogger.RequestLoggerSpy).%New()
+    Do RequestLoggerSpy.StartVerwerking(Event)
+  
+    Do $$$AssertEquals(%RequestLoggerSpy("Command"),Data.Command)
+    Do $$$AssertEquals(%RequestLoggerSpy("SubjectId"),Data.SubjectId)
+    Do $$$AssertEquals(%RequestLoggerSpy("Message"),Data.Message)
+    Do $$$AssertEquals(%RequestLoggerSpy("MessageStream"),Data.MessageStream)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
FishEye: Tag 42276 refers to a dead (removed) revision in file `vhUnitTest/AXimpl/AifMessage/EventHandler/RequestLogger/RequestLoggerSpy.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 42276 refers to a dead (removed) revision in file `vhUnitTest/AXimpl/AifMessage/EventHandler/RequestLogger/StartVerwerking/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 42276 refers to a dead (removed) revision in file `vhUnitTest/AXimpl/AifMessage/EventHandler/RequestLogger/Log/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 42276 refers to a dead (removed) revision in file `vhUnitTest/AXimpl/AifMessage/EventHandler/ResponseLogger/Log/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 42276 refers to a dead (removed) revision in file `vhUnitTest/AXimpl/AifMessage/EventHandler/CustomerUpdaterPart2/Test.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?