Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml =================================================================== diff -u -r74382 -r74450 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74382) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml (.../ProductOptiesGenerator.cls.xml) (revision 74450) @@ -18,6 +18,11 @@ 1 + +DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI +1 + + vhLib.Logger 1 @@ -51,6 +56,7 @@ Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New("CalculatedProduct")) Set ..HoutCertificaatService = $$$Inject(HoutCertificaatService, ##class(DOM.PM.HoutCertificaatService).%New()) Set ..VHossService = ##class(APPS.Halux.common.impl.VHossService).%New() + Set ..IngegevenKenmerkenTypeAPI = ##class(DOM.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI).%New() Quit $$$OK ]]> @@ -247,20 +253,21 @@ } } - If (IsMerivobox) { - If (IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Dubbel()) { - Set MatWithCutOutInFrontQ1 = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) - Set MatWithCutOutM1 = MatUitsparingSnijPositieBepaler.GeefMatMiddenM1(IngegevenKenmerken) - Set MatWithCutOutM2 = MatUitsparingSnijPositieBepaler.GeefMatMiddenM2(IngegevenKenmerken) - Set MatWithCutOutInFrontQ2 = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) + If (..IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) || ..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken)) { + If (IsMerivobox) { + If (IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Dubbel()) { + Set MatWithCutOutInFrontQ1 = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) + Set MatWithCutOutM1 = MatUitsparingSnijPositieBepaler.GeefMatMiddenM1(IngegevenKenmerken) + Set MatWithCutOutM2 = MatUitsparingSnijPositieBepaler.GeefMatMiddenM2(IngegevenKenmerken) + Set MatWithCutOutInFrontQ2 = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) + } + } Else { + Set MatWithCutOutInFrontQ = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) } - } Else { - Set MatWithCutOutInFrontQ = MatUitsparingSnijPositieBepaler.GeefMatVooraanQ1(IngegevenKenmerken) + + Set MatWithCutOutLeftX = MatUitsparingSnijPositieBepaler.GeefMatLinksX(IngegevenKenmerken) + Set MatWithCutOutRightY = MatUitsparingSnijPositieBepaler.GeefMatRechtsY(IngegevenKenmerken) } - - Set MatWithCutOutLeftX = MatUitsparingSnijPositieBepaler.GeefMatLinksX(IngegevenKenmerken) - Set MatWithCutOutRightY = MatUitsparingSnijPositieBepaler.GeefMatRechtsY(IngegevenKenmerken) - } If $$$Not(MatOriginalDepth = 0) { Do Opties.Insert(..GeefOptieVoorLade(..PrependNul(UitvoeringInfo.SequentieNummerLade), "-" _ "MatOriginalDepth", MatOriginalDepth)) }