Index: vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml
===================================================================
diff -u -r71022 -r71211
--- vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 71022)
+++ vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 71211)
@@ -134,6 +134,13 @@
 	Do $$$AssertEquals(Utils.ConvertVerzendingWijze("DiOpo"),##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1()))
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Omzetten speciale BlumPolen verzendwijze naar DI1">
+<Implementation><![CDATA[
+	Set Utils = ##class(AXimpl.AxToAdminUtils).%New()
+	Do $$$AssertEquals(Utils.ConvertVerzendingWijze("BS"),##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1()))
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r71022 -r71211
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 71022)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 71211)
@@ -242,7 +242,7 @@
 	
 	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 (##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()))) {
+	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()),##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).BlumPolen()))) {
 		Quit ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1())
 	}
 	For {
Index: DOM/VKP/enu/VerzendWijze.cls.xml
===================================================================
diff -u -r71023 -r71211
--- DOM/VKP/enu/VerzendWijze.cls.xml	(.../VerzendWijze.cls.xml)	(revision 71023)
+++ DOM/VKP/enu/VerzendWijze.cls.xml	(.../VerzendWijze.cls.xml)	(revision 71211)
@@ -8,11 +8,11 @@
 <Super>%String</Super>
 
 <Parameter name="VALUELIST">
-<Default>,AFH ,AFC ,DI1 ,DI2 ,DI3 ,OD ,OD1 ,OD2 ,OD3 ,OD4 ,OD5 , EX ,POB ,PON ,TPO ,TPC ,TNC ,DiHF ,DiOpo </Default>
+<Default>,AFH ,AFC ,DI1 ,DI2 ,DI3 ,OD ,OD1 ,OD2 ,OD3 ,OD4 ,OD5 , EX ,POB ,PON ,TPO ,TPC ,TNC ,DiHF ,DiOpo ,BS</Default>
 </Parameter>
 
 <Parameter name="DISPLAYLIST">
-<Default>,Afhaling,Afhaling Consument,Distributeur1,Distributeur2,Distributeur3,OnzeDiensten,OnzeDiensten1,OnzeDiensten2,OnzeDiensten3,OnzeDiensten4,OnzeDiensten5,Expediteur,Post België,Post Nederland,Taxipost onze kost, Taxipost Consument,Taxipost via Nederland,Häfele,OPO</Default>
+<Default>,Afhaling,Afhaling Consument,Distributeur1,Distributeur2,Distributeur3,OnzeDiensten,OnzeDiensten1,OnzeDiensten2,OnzeDiensten3,OnzeDiensten4,OnzeDiensten5,Expediteur,Post België,Post Nederland,Taxipost onze kost, Taxipost Consument,Taxipost via Nederland,Häfele,OPO,BlumPolen</Default>
 </Parameter>
 
 <Method name="Afhaling">
@@ -154,6 +154,13 @@
 <Implementation><![CDATA["DiOpo "
 ]]></Implementation>
 </Method>
+
+<Method name="BlumPolen">
+<ClassMethod>1</ClassMethod>
+<CodeMode>expression</CodeMode>
+<Implementation><![CDATA["BS"
+]]></Implementation>
+</Method>
 </Class>