Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r38241 -r38280
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 38241)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 38280)
@@ -361,6 +361,26 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: in sommige velden moeten de ;&apos;s vervangen worden door -&apos;s (punt voor website)">
+<Implementation><![CDATA[
+	Do ..Klant.IndienMethodCall("GeefFacturatieFrequentie").DanReturn("M1;16")
+	Do ..Klant.IndienMethodCall("GeefOpmerking6").DanReturn("een opmerking met ;")
+	Do ..Klant.IndienMethodCall("GeefOpmerking7").DanReturn("een opmerking met ;")
+	Do ..Klant.IndienMethodCall("GeefOpmerking8").DanReturn("een opmerking met ;")
+	Do ..Klant.IndienMethodCall("GeefOpmerking9").DanReturn("een opmerking met ;")
+	Do ..Partij.IndienMethodCall("GeefWebstek").DanReturn("www;example.com")
+	
+	#dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+	
+	Do $$$AssertEquals(GeconverteerdeKlant.FacturatieFrequentie,"M1-16")
+	Do $$$AssertEquals(GeconverteerdeKlant.Opmerking6,"een opmerking met -")
+	Do $$$AssertEquals(GeconverteerdeKlant.Opmerking7,"een opmerking met -")
+	Do $$$AssertEquals(GeconverteerdeKlant.Opmerking8,"een opmerking met -")
+	Do $$$AssertEquals(GeconverteerdeKlant.Opmerking9,"een opmerking met -")
+	Do $$$AssertEquals(GeconverteerdeKlant.Website,"www.example.com")
+]]></Implementation>
+</Method>
+
 <Method name="GeefCustomer">
 <FormalSpec>KlantId:%String</FormalSpec>
 <ReturnType>AXBizTalk.Crm.Customer.Customer</ReturnType>