Index: vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml =================================================================== diff -u -r73274 -r74115 --- vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml (.../Test.cls.xml) (revision 73274) +++ vhUnitTest/AXimpl/AxToAdminUtils/Test.cls.xml (.../Test.cls.xml) (revision 74115) @@ -140,6 +140,13 @@ ]]> + + + + %String -,AFH ,AFC ,DI1 ,DI2 ,DI3 ,OD ,OD1 ,OD2 ,OD3 ,OD4 ,OD5 , EX ,POB ,PON ,TPO ,TPC ,TNC ,DiHF ,DiOpo ,BS +,AFH ,AFC ,DI1 ,DI2 ,DI3 ,OD ,OD1 ,OD2 ,OD3 ,OD4 ,OD5 , EX ,POB ,PON ,TPO ,TPC ,TNC ,DiHF ,DiOpo ,BS, Opo -,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 +,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,OPODe @@ -161,6 +161,13 @@ + + +1 +expression + + Index: AXimpl/AxToAdminUtils.cls.xml =================================================================== diff -u -r73278 -r74115 --- AXimpl/AxToAdminUtils.cls.xml (.../AxToAdminUtils.cls.xml) (revision 73278) +++ AXimpl/AxToAdminUtils.cls.xml (.../AxToAdminUtils.cls.xml) (revision 74115) @@ -244,7 +244,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()),##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).BlumPolen()))) { + 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()), ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).OPODe()))) { Quit ##class(TECH.StringUtils).Trim(##class(DOM.VKP.enu.VerzendWijze).Distributeur1()) } For {