Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r66978 -r67137
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 66978)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 67137)
@@ -237,6 +237,9 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	Set VerzendWijze=""
+	If DlvMode = ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Häfele()) {
+		Quit ##class(DOM.VKP.enu.VerzendWijze).Distributeur1()
+	}
 	For {
 		Set VerzendWijze=$O(^RES("KLANT","PI","VERZENDWAX","D",VerzendWijze))
 		Quit:(VerzendWijze="")