Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r37782 -r37783
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37782)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37783)
@@ -43,13 +43,16 @@
 <Implementation><![CDATA[
 	Do ..Partij.IndienMethodCall("GeefToenaam").DanReturn("Een toenaam die zeker meer dan 50 karakters lang zou moeten zijn")
 	
-	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)	
 	
+	Do ..Partij.IndienMethodCall("GeefTelefax").DanReturn("eenFaxNummer")
+	
 	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Klantnummer,"K||1234")
 	Do $$$AssertEquals(GeconverteerdeKlant.Naam,"DE NAAM")
 	Do $$$AssertEquals(GeconverteerdeKlant.Toenaam,"Een toenaam die zeker meer dan 50 karakters lang z")
+	Do $$$AssertEquals(GeconverteerdeKlant.Fax,"eenFaxNummer")
 ]]></Implementation>
 </Method>
 
Index: AXBizTalk/Customer.cls.xml
===================================================================
diff -u -r37772 -r37783
--- AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37772)
+++ AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37783)
@@ -23,6 +23,11 @@
 <Parameter name="MAXLEN" value="50"/>
 </Property>
 
+<Property name="Fax">
+<Type>%String</Type>
+<Parameter name="MAXLEN" value="50"/>
+</Property>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>CustomerState</State>
@@ -40,6 +45,9 @@
 <Value name="4">
 <Value>Telefoon</Value>
 </Value>
+<Value name="5">
+<Value>Fax</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml
===================================================================
diff -u -r37782 -r37783
--- AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37782)
+++ AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37783)
@@ -41,6 +41,7 @@
 	} ElseIf $$$HasLength(Partij.GeefTelefoon2()){
 		Set Customer.Telefoon = Partij.GeefTelefoon2()
 	}
+	Set Customer.Fax = Partij.GeefTelefax()
 	
 	
 	Quit Customer