Index: vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml
===================================================================
diff -u -r68066 -r71022
--- vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 68066)
+++ vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 71022)
@@ -121,6 +121,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Omzetten speciale Häfele Zwitserland verzendwijze naar DI1">
+<Implementation><![CDATA[
+	Set Utils = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Utils.ConvertVerzendingWijze("DiHFCH"),##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1()))
+]]></Implementation>
+</Method>
+
 <Method name="Test: Omzetten speciale OPO verzendwijze naar DI1">
 <Implementation><![CDATA[
 	Set Utils = ##class(AXimpl.AxToAdminUtils).%New()