Index: AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml
===================================================================
diff -u -r37783 -r37787
--- AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37783)
+++ AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37787)
@@ -42,8 +42,8 @@
 		Set Customer.Telefoon = Partij.GeefTelefoon2()
 	}
 	Set Customer.Fax = Partij.GeefTelefax()
+	Set Customer.VerkortNummer = Partij.GeefVerkortNummer()
 	
-	
 	Quit Customer
 ]]></Implementation>
 </Method>
Index: vhTest/Mock/DOM/PARTIJ/Partij.cls.xml
===================================================================
diff -u -r34213 -r37787
--- vhTest/Mock/DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 34213)
+++ vhTest/Mock/DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 37787)
@@ -159,6 +159,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVerkortNummer">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVerkortNummer")
+]]></Implementation>
+</Method>
+
 <Method name="GeefWebstek">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefWebstek")
Index: DOM/PARTIJ/impl/DataM/DataMKlant.cls.xml
===================================================================
diff -u -r37515 -r37787
--- DOM/PARTIJ/impl/DataM/DataMKlant.cls.xml	(.../DataMKlant.cls.xml)	(revision 37515)
+++ DOM/PARTIJ/impl/DataM/DataMKlant.cls.xml	(.../DataMKlant.cls.xml)	(revision 37787)
@@ -424,6 +424,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVerkortNummer">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..AlleenLezenNode2.GeefPiece(1)
+]]></Implementation>
+</Method>
+
 <Method name="GeefGsm">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..AlleenLezenNode2.GeefPiece(20)
Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r37783 -r37787
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37783)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37787)
@@ -46,13 +46,15 @@
 	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)	
 	
 	Do ..Partij.IndienMethodCall("GeefTelefax").DanReturn("eenFaxNummer")
+	Do ..Partij.IndienMethodCall("GeefVerkortNummer").DanReturn("7001")
 	
 	#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")
+	Do $$$AssertEquals(GeconverteerdeKlant.VerkortNummer,"7001")
 ]]></Implementation>
 </Method>
 
Index: AXBizTalk/Customer.cls.xml
===================================================================
diff -u -r37783 -r37787
--- AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37783)
+++ AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37787)
@@ -28,6 +28,11 @@
 <Parameter name="MAXLEN" value="50"/>
 </Property>
 
+<Property name="VerkortNummer">
+<Type>%String</Type>
+<Parameter name="MAXLEN" value="50"/>
+</Property>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>CustomerState</State>
@@ -48,6 +53,12 @@
 <Value name="5">
 <Value>Fax</Value>
 </Value>
+<Value name="6">
+<Value>VerkortNummer</Value>
+</Value>
+<Value name="7">
+<Value>Email</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: vhTest/Utils/DOM/PARTIJ/Partij.cls.xml
===================================================================
diff -u -r35580 -r37787
--- vhTest/Utils/DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 35580)
+++ vhTest/Utils/DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 37787)
@@ -25,6 +25,7 @@
 	do Partij.IndienMethodCall("GeefGsm").DanReturn("")
 	do Partij.IndienMethodCall("GeefEmail").DanReturn("")
 	do Partij.IndienMethodCall("GeefWebstek").DanReturn("")
+	do Partij.IndienMethodCall("GeefVerkortNummer").DanReturn("")
 	
 	quit Partij
 ]]></Implementation>
Index: DOM/PARTIJ/Partij.cls.xml
===================================================================
diff -u -r34213 -r37787
--- DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 34213)
+++ DOM/PARTIJ/Partij.cls.xml	(.../Partij.cls.xml)	(revision 37787)
@@ -155,6 +155,11 @@
 <ReturnType>%String</ReturnType>
 </Method>
 
+<Method name="GeefVerkortNummer">
+<Abstract>1</Abstract>
+<ReturnType>%String</ReturnType>
+</Method>
+
 <Method name="GeefWebstek">
 <Abstract>1</Abstract>
 <ReturnType>%String</ReturnType>