Index: vhUnitTest/AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter/Convert/TestContactInfo.cls.xml
===================================================================
diff -u
--- vhUnitTest/AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter/Convert/TestContactInfo.cls.xml	(revision 0)
+++ vhUnitTest/AXimpl/AifMessage/Converter/CustomerUpdatePart2Converter/Convert/TestContactInfo.cls.xml	(revision 35585)
@@ -0,0 +1,77 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.AXimpl.AifMessage.Converter.CustomerUpdatePart2Converter.Convert.TestContactInfo">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Telefoon1 en Telefoon2 worden gewijzigd">
+<Implementation><![CDATA[
+	set Request = ##class(AXimpl.AifMessage.Request).%New("Customer/UpdatePart2","K||1234")
+	set Request.Message.Body.MessageParts = ..BuildMessageParts($listbuild("Phone","Telefoon 1","09 111 11 11",$$$true),$listbuild("Phone","Telefoon 2","09 111 11 12",$$$false))
+	
+	set CreateConverterStub = ##class(vhTest.Mock.AXimpl.AifMessage.Converter.CustomerCreateConverter).%New()
+	do CreateConverterStub.IndienMethodCall("Convert",$$$ElkeWaarde).DanReturn(..BuildMessageParts($listbuild("Phone","Telefoon 1","09 222 22 22",$$$true),$listbuild("Phone","Telefoon 2","09 222 22 23",$$$false)))
+	set Converter = ##class(AXimpl.AifMessage.Converter.CustomerUpdatePart2Converter).%New(CreateConverterStub)
+	
+	#dim ContactViews As list of  AXaif.Customer.AxdEntityDirPartyContactInfoView = ..GetContactViews(Converter.Convert(Request))
+	
+	if $$$AssertEquals(ContactViews.Count(),2) {
+		do ..AssertContactView(ContactViews.GetAt(1),"update","Phone","Telefoon 1","09 222 22 22",$$$true)
+		do ..AssertContactView(ContactViews.GetAt(2),"update","Phone","Telefoon 2","09 222 22 23",$$$false)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="BuildMessageParts">
+<FormalSpec>Contacts...:%List</FormalSpec>
+<Private>1</Private>
+<ReturnType>AXaif.Message.MessageParts</ReturnType>
+<Implementation><![CDATA[
+	set MessageParts = ##class(AXaif.Message.MessageParts).%New()
+	
+	set CustTable = ##class(AXaif.Customer.AxdEntityCustTable).%New()
+	set CustTable.CustGroup = "EU"
+	
+	set DirParty = ##class(AXaif.Customer.AxdEntityDirPartyDirOrganization).%New()
+	
+	set ContactIterator = ##class(TECH.ArrayOneDimIterator).%New(.Contacts)
+	while ContactIterator.HasNext() {
+		#dim Contact As %String = ContactIterator.Next()
+		set ContactInfoView = ##class(AXaif.Customer.AxdEntityDirPartyContactInfoView).%New()
+		set ContactInfoView.Type = $listget(Contact,1)
+		set ContactInfoView.LocationName = $listget(Contact,2)
+		set ContactInfoView.Locator = $listget(Contact,3)
+		set ContactInfoView.IsPrimary = ##class(AXaif.Customer.AxdEnumNoYes).FromBoolean($listget(Contact,4))
+		do DirParty.DirPartyContactInfoView.Insert(ContactInfoView)
+	}
+	
+	do CustTable.DirParty.Insert(DirParty)
+		
+	do MessageParts.Customer.CustTable.Insert(CustTable)
+	
+	quit MessageParts
+]]></Implementation>
+</Method>
+
+<Method name="GetContactViews">
+<FormalSpec>MessageParts:AXaif.Message.MessageParts</FormalSpec>
+<Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit MessageParts.Customer.CustTable.GetAt(1).DirParty.GetAt(1).DirPartyContactInfoView
+]]></Implementation>
+</Method>
+
+<Method name="AssertContactView">
+<FormalSpec>ContactView:AXaif.Customer.AxdEntityDirPartyContactInfoView,Action:%String,Type:%String,Name:%String,Value:%String,IsPrimary:%Boolean</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	do $$$AssertEquals(ContactView.action,Action, ContactView.LocationName)
+	do $$$AssertEquals(ContactView.Type,Type, ContactView.LocationName)
+	do $$$AssertEquals(ContactView.LocationName,Name, ContactView.LocationName)
+	do $$$AssertEquals(ContactView.Locator,Value, ContactView.LocationName)
+	do $$$AssertEquals(ContactView.IsPrimary, ##class(AXaif.Customer.AxdEnumNoYes).FromBoolean(IsPrimary), ContactView.LocationName)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>