vhUnitTest.TestCase ") 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() ]]>