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()
Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r70531 -r71022
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 70531)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 71022)
@@ -239,8 +239,10 @@
 <FormalSpec>DlvMode:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
+	
 	Set VerzendWijze=""
-	If (DlvMode = ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Häfele())) || (DlvMode = ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).OPO())) {
+	//If (DlvMode = ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Häfele())) || (DlvMode = ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).OPO())) {
+	If (##class(TECH.StringUtils).Equals(DlvMode, ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Häfele()), ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).HäfeleCH()), ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).OPO()))) {
 		Quit ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1())
 	}
 	For {