Index: vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml
===================================================================
diff -u -r41858 -r41860
--- vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41858)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 41860)
@@ -383,6 +383,29 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Voor Halux is OrderAccount het cijfer in het LeverancierId na het dubbel pipeteken omgezet volgens LevNrConverter met voorloopnul indien kleiner dan 10000">
+<Implementation><![CDATA[
+	#dim AankoopApiStub As vhTest.Mock.DOM.AKP.AankoopAPI = ##class(vhTest.Mock.DOM.AKP.AankoopAPI).MockInstance()
+	Do AankoopApiStub.IndienMethodCall("GeefLeverancier","L||5000").DanReturn(..LeverancierStub)
+	Set ..AankoopApi = AankoopApiStub
+	
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierTaxGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierVendGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	
+	Do ..LevNrConverterStub.VerwachtMethodCall("ConvertorLeveranciersnummerVanHoeckeNaarHalux",$$$ElkeWaarde).DanReturn("5000")
+
+	#dim Vestiging As AX.common.enu.InterneFirmaInitialen = ##class(AX.common.enu.InterneFirmaInitialen).HaluxNv()
+	
+	#dim Converter As AX.Uitgaand.PM.AankoopOrderHoofding.impl.AankoopOrderHoofdingDixfConverter = ..GeefConverter()
+	
+	#dim Hoofding As AXdixf.AankoopOrderHoofding.AankoopOrderHoofding = Converter.Convert(..ToeleveringStub,Vestiging)
+	
+	Do $$$AssertEquals(Hoofding.OrderAccount,"05000")
+	
+	Do ..LevNrConverterStub.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="GeefConverter">
 <Private>1</Private>
 <ReturnType>AX.Uitgaand.PM.AankoopOrderHoofding.impl.AankoopOrderHoofdingDixfConverter</ReturnType>