Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml =================================================================== diff -u -r74783 -r74912 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74783) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74912) @@ -435,6 +435,8 @@ #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom() #dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem #dim IsMerivobox As %Boolean = (..ProductTypeAPI.IsMerivoboxProduct(Product.GeefID())) + #dim IsLegrabox As %Boolean = (..ProductTypeAPI.IsLegraboxProduct(Product.GeefID())) + #dim IsTandembox As %Boolean = (..ProductTypeAPI.IsTandemboxProduct(Product.GeefID())) If (HalffabItemsBoom.BevatRol(Rol)) { Set HalffabItem = HalffabItemsBoom.GeefHalffabItem(Rol) @@ -447,10 +449,19 @@ Set LengteInfo = 0 } - If ((Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Dwarsverdeling()) && (LengteInfo >= 1059) && (IsMerivobox)) { + If ((Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Dwarsverdeling()) && + (((LengteInfo >= 1059) && (IsMerivobox)) + || ((LengteInfo >= 1080) && (IsLegrabox)) + || ((LengteInfo >= 1077) && (IsTandembox)))) { Set LengteInfo = 0 } + If ((Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Zijstabilisering()) && + (((LengteInfo >= 1137) && (IsMerivobox)) + || ((LengteInfo >= 1348) && (IsLegrabox)))) { + Set LengteInfo = 0 + } + Quit LengteInfo ]]>