Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/AddressUpsertConverter/Convert/Test.cls.xml
===================================================================
diff -u -r38281 -r38304
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/AddressUpsertConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 38281)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/AddressUpsertConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 38304)
@@ -62,10 +62,10 @@
 
 <Method name="Test: Verzendingwijze met ;&apos;s wijzigen naar -&apos;s">
 <Implementation><![CDATA[
-	Do ..Leveradres.ZetVerzendingWijze("OD;2'OD;5")
+	Do ..Leveradres.ZetVerzendingWijze("OD;2`OD;5")
 	
 	#dim GeconverteerdeLeverAdres As AXBizTalk.Crm.Address.Upsert.Address = ..GeefAddress(..Leveradres.GeefID())
-	Do $$$AssertEquals(GeconverteerdeLeverAdres.Verzendwijze,"OD-2'OD-5")
+	Do $$$AssertEquals(GeconverteerdeLeverAdres.Verzendwijze,"OD(Di),OD(Vr)")
 ]]></Implementation>
 </Method>
 
Index: AXimpl/BizTalkMessage/Converter/AddressUpsertConverter.cls.xml
===================================================================
diff -u -r38281 -r38304
--- AXimpl/BizTalkMessage/Converter/AddressUpsertConverter.cls.xml	(.../AddressUpsertConverter.cls.xml)	(revision 38281)
+++ AXimpl/BizTalkMessage/Converter/AddressUpsertConverter.cls.xml	(.../AddressUpsertConverter.cls.xml)	(revision 38304)
@@ -52,7 +52,7 @@
 		Set ..Address.LandCodeISO3 = Adres.GeefLand().GeefIso3()
 	}
 	Set ..Address.Telefoon = Adres.GeefTelefoon()
-	Set ..Address.Verzendwijze = $$$Replace(Adres.GeefVerzendingWijze(),";","-")
+	Set ..Address.Verzendwijze = $$SHOW^KLVERZW(,,,Adres.GeefVerzendingWijze())
 	Set ..Address.BezoekAdres = $$$False
 	Set ..Address.FacturatieAdres = $$$False
 	Set ..Address.LeveringAdres = $$$False