Index: AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml
===================================================================
diff -u -r42348 -r42350
--- AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml	(.../VrijgegProductDixfConverter.cls.xml)	(revision 42348)
+++ AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml	(.../VrijgegProductDixfConverter.cls.xml)	(revision 42350)
@@ -48,6 +48,10 @@
 <Type>%String</Type>
 </Property>
 
+<Property name="InventItemPurchSetupLeadTimeHLX">
+<Type>%String</Type>
+</Property>
+
 <Property name="InventItemPurchSetupLowestQtyVH">
 <Type>%String</Type>
 </Property>
@@ -217,7 +221,7 @@
 	Set AxProduct.InventItemInventSetupCalendarDays = "1"
 	Set AxProduct.InventItemSalesDeliveryDateControlType = ..BepaalInventItemSalesDeliveryDateControlTypeVH(Product)
 	Set ..InventItemSalesDeliveryDateControlType = AxProduct.InventItemSalesDeliveryDateControlType
-	Set AxProduct.InventItemSalesSetupATPTimeFence = ..BepaalInventItemSalesSetupATPTimeFence(Product)
+	Set AxProduct.InventItemSalesSetupATPTimeFence = ..BepaalInventItemSalesSetupATPTimeFenceVH(Product)
 	Set AxProduct.InventItemSalesSetupOverride = ..BepaalInventItemSalesSetupOverride(Product)
 	Set AxProduct.ADUProductMainGroupId = ..BepaalADUProductMainGroupId(Product)
 	Set AxProduct.ADUProductGroupId = ..BepaalADUProductGroupId(Product)
@@ -342,7 +346,7 @@
 	Set AxProduct.InventItemInventSetupCalendarDays = "1"
 	Set AxProduct.InventItemSalesDeliveryDateControlType = ..BepaalInventItemSalesDeliveryDateControlTypeHLX(Product)
 	Set ..InventItemSalesDeliveryDateControlType = AxProduct.InventItemSalesDeliveryDateControlType
-	Set AxProduct.InventItemSalesSetupATPTimeFence = ..BepaalInventItemSalesSetupATPTimeFence(Product)
+	Set AxProduct.InventItemSalesSetupATPTimeFence = ..BepaalInventItemSalesSetupATPTimeFenceHLX(Product)
 	Set AxProduct.InventItemSalesSetupOverride = ..BepaalInventItemSalesSetupOverride(Product)
 	Set AxProduct.ADUProductMainGroupId = ..BepaalADUProductMainGroupId(Product)
 	Set AxProduct.ADUProductGroupId = ..BepaalADUProductGroupId(Product)
@@ -556,6 +560,9 @@
 	Else {
 		Set BepaalInventItemPurchSetupLeadTimeHLX = ""
 	}
+	
+	Set ..InventItemPurchSetupLeadTimeHLX = BepaalInventItemPurchSetupLeadTimeHLX
+	
 	Quit BepaalInventItemPurchSetupLeadTimeHLX
 ]]></Implementation>
 </Method>
@@ -906,22 +913,40 @@
 ]]></Implementation>
 </Method>
 
-<Method name="BepaalInventItemSalesSetupATPTimeFence">
+<Method name="BepaalInventItemSalesSetupATPTimeFenceVH">
+<Description>
+//</Description>
 <FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim InventItemSalesSetupATPTimeFence As %String
+	#dim InventItemSalesSetupATPTimeFenceVH As %String
 	
 	If (..InventItemSalesDeliveryDateControlType = "ATP + uitgiftemarge"){
-		Set InventItemSalesSetupATPTimeFence = "2"
+		Set InventItemSalesSetupATPTimeFenceVH = ..InventItemPurchSetupLeadTimeVH + 2
 	}
 	Else {
-		Set InventItemSalesSetupATPTimeFence = ""
+		Set InventItemSalesSetupATPTimeFenceVH = ""
 	}
-	Quit InventItemSalesSetupATPTimeFence
+	Quit InventItemSalesSetupATPTimeFenceVH
 ]]></Implementation>
 </Method>
 
+<Method name="BepaalInventItemSalesSetupATPTimeFenceHLX">
+<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim InventItemSalesSetupATPTimeFenceHLX As %String
+	
+	If (..InventItemSalesDeliveryDateControlType = "ATP + uitgiftemarge"){
+		Set InventItemSalesSetupATPTimeFenceHLX = ..InventItemPurchSetupLeadTimeHLX + 2
+	}
+	Else {
+		Set InventItemSalesSetupATPTimeFenceHLX = ""
+	}
+	Quit InventItemSalesSetupATPTimeFenceHLX
+]]></Implementation>
+</Method>
+
 <Method name="BepaalInventItemSalesSetupOverride">
 <FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
 <ReturnType>%String</ReturnType>