Index: AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml
===================================================================
diff -u -r42236 -r42265
--- AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml	(.../AankoopOrderRegelDixfConverter.cls.xml)	(revision 42236)
+++ AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml	(.../AankoopOrderRegelDixfConverter.cls.xml)	(revision 42265)
@@ -104,15 +104,21 @@
 <FormalSpec>ToeleveringLijn:TECH.RegisteredObject,Leverancier:DOM.AKP.impl.DataM.DataMLeverancier</FormalSpec>
 <Private>1</Private>
 <ReturnType>AXdixf.AankoopOrderRegel.AankoopOrderRegel</ReturnType>
-<Implementation><![CDATA[	Set ..AxRegel.VendAccount = ..BepaalVendAccountVanHoecke(Leverancier)
+<Implementation><![CDATA[
+	Set ..AxRegel.InventLocationId = "MAG1"
+	Set ..AxRegel.InventSiteId = "VHEPN1"
+	Set ..AxRegel.VendAccount = ..BepaalVendAccountVanHoecke(Leverancier)
 ]]></Implementation>
 </Method>
 
 <Method name="ConvertHalux">
 <FormalSpec>ToeleveringLijn:TECH.RegisteredObject,Leverancier:DOM.AKP.impl.DataM.DataMLeverancier</FormalSpec>
 <Private>1</Private>
 <ReturnType>AXdixf.AankoopOrderRegel.AankoopOrderRegel</ReturnType>
-<Implementation><![CDATA[	Set ..AxRegel.VendAccount = ..BepaalVendAccountHalux(Leverancier)
+<Implementation><![CDATA[
+	Set ..AxRegel.InventLocationId = "MAG2"
+	Set ..AxRegel.InventSiteId = "HLXEPN1"
+	Set ..AxRegel.VendAccount = ..BepaalVendAccountHalux(Leverancier)
 ]]></Implementation>
 </Method>
 
Index: AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfGenerator.cls.xml
===================================================================
diff -u -r42197 -r42265
--- AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfGenerator.cls.xml	(.../AankoopOrderRegelDixfGenerator.cls.xml)	(revision 42197)
+++ AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfGenerator.cls.xml	(.../AankoopOrderRegelDixfGenerator.cls.xml)	(revision 42265)
@@ -21,7 +21,7 @@
 	Try {
 		#dim HoofdingIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.AankoopOrderRegel.impl.AankoopOrderRegelIterator).%New(Vestiging)
 		do ..Generate(HoofdingIterator)
-		Write !,"Klaar. Aantal minuten: " 
+		Write !,"Csv voor migratie 1402 AankoopOrderRegel voor "_Vestiging_" is klaar. Aantal minuten: " 
 		write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
@@ -38,6 +38,8 @@
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "CurrencyCode")
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "DeliveryDate")
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "ExternalItemId")
+	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "InventLocationId")
+	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "InventSiteId")
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "ItemId")
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "LineAmount")
 	Do AXRegelData.VoegToeVeld("AXdixf.AankoopOrderRegel.AankoopOrderRegel", "LineNumber")
@@ -56,7 +58,7 @@
 	
 	Set AXRegelData.ScheidingsTeken = ";"	
 	Set AXRegelData.Iterator = HoofdingIterator
-	Set AXRegelData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"1401AankoopOrderRegel"_..Vestiging_".csv")
+	Set AXRegelData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"1402AankoopOrderRegel"_..Vestiging_".csv")
 	
 	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
 	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
Index: AXdixf/AankoopOrderRegel/AankoopOrderRegel.cls.xml
===================================================================
diff -u -r42188 -r42265
--- AXdixf/AankoopOrderRegel/AankoopOrderRegel.cls.xml	(.../AankoopOrderRegel.cls.xml)	(revision 42188)
+++ AXdixf/AankoopOrderRegel/AankoopOrderRegel.cls.xml	(.../AankoopOrderRegel.cls.xml)	(revision 42265)
@@ -23,6 +23,14 @@
 <Type>%String</Type>
 </Property>
 
+<Property name="InventLocationId">
+<Type>%String</Type>
+</Property>
+
+<Property name="InventSiteId">
+<Type>%String</Type>
+</Property>
+
 <Property name="ItemId">
 <Type>%String</Type>
 </Property>
Index: vhUnitTest/AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter/Test.cls.xml
===================================================================
diff -u -r42236 -r42265
--- vhUnitTest/AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 42236)
+++ vhUnitTest/AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 42265)
@@ -110,6 +110,40 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Zijn alle defaults voor Van Hoecke goed">
+<Implementation><![CDATA[
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierTaxGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierVendGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	Do ..LevNrConverterStub.IndienMethodCall("ConvertorLeveranciersnummerVanHoeckeNaarHalux",$$$ElkeWaarde).DanReturn("5000")
+	
+	#dim Converter As AX.Uitgaand.PM.AankoopOrderRegel.impl.AankoopOrderRegelDixfConverter = ..GeefConverter()
+	
+	#dim Vestiging As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv()
+	
+	#dim AankoopOrderRegel As AXdixf.AankoopOrderRegel.AankoopOrderRegel = Converter.Convert(..ProductToeleveringLijnStub,Vestiging)
+	
+	Do $$$AssertEquals(AankoopOrderRegel.InventLocationId,"MAG1")
+	Do $$$AssertEquals(AankoopOrderRegel.InventSiteId,"VHEPN1")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Zijn alle defaults voor Halux goed">
+<Implementation><![CDATA[
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierTaxGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierVendGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")
+	Do ..LevNrConverterStub.IndienMethodCall("ConvertorLeveranciersnummerVanHoeckeNaarHalux",$$$ElkeWaarde).DanReturn("5000")
+	
+	#dim Converter As AX.Uitgaand.PM.AankoopOrderRegel.impl.AankoopOrderRegelDixfConverter = ..GeefConverter()
+	
+	#dim Vestiging As AXimpl.InterneFirmaInitialen = ##class(AXimpl.InterneFirmaInitialen).HaluxNv()
+	
+	#dim AankoopOrderRegel As AXdixf.AankoopOrderRegel.AankoopOrderRegel = Converter.Convert(..ProductToeleveringLijnStub,Vestiging)
+	
+	Do $$$AssertEquals(AankoopOrderRegel.InventLocationId,"MAG2")
+	Do $$$AssertEquals(AankoopOrderRegel.InventSiteId,"HLXEPN1")
+]]></Implementation>
+</Method>
+
 <Method name="Test: Als de ToeleveringLijn uit KTO komt moet ConfirmedDlv de leverdag zijn in formaat ddmmyyyy met tussenslashes">
 <Implementation><![CDATA[
 	Do ..UtilsStub.IndienMethodCall("ConvertLeverancierTaxGroup",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn("BX")