Index: AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfGenerator.cls.xml
===================================================================
diff -u -r42197 -r42264
--- AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfGenerator.cls.xml	(.../AankoopOrderHoofdingDixfGenerator.cls.xml)	(revision 42197)
+++ AX/Uitgaand/PM/AankoopOrderHoofding/impl/AankoopOrderHoofdingDixfGenerator.cls.xml	(.../AankoopOrderHoofdingDixfGenerator.cls.xml)	(revision 42264)
@@ -21,8 +21,8 @@
 	Try {
 		#dim HoofdingIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.AankoopOrderHoofding.impl.AankoopOrderHoofdingIterator).%New(,Vestiging)
 		do ..Generate(HoofdingIterator)
-		Write !,"Klaar. Aantal minuten voor ca. 1.800 Hoofdingen: " 
-		write $$TimeFromStart^vhLib()/60 // /25*1800 // Indien filter opstaat van 25 Hoofdingen, aanpassen
+		Write !,"Csv voor migratie 1401 AankoopOrderHoofding voor "_Vestiging_" is klaar. Aantal minuten: " 
+		write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
 	}
@@ -38,6 +38,7 @@
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "CashDisc")
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "CashDiscPercent")
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "ChangeRequestRequired")
+	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "DefaultDimension")
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "DeliveryCity")
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "DeliveryStreet")
 	Do AXHoofdingData.VoegToeVeld("AXdixf.AankoopOrderHoofding.AankoopOrderHoofding", "DeliveryZipCode")