Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml =================================================================== diff -u -r74611 -r74874 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74611) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74874) @@ -85,7 +85,7 @@ } } - Set RolNaam = ..GeefStandaardOfBewerkteRolnaam(RolNaam, HalffabItem) + Set RolNaam = ..GeefStandaardOfBewerkteRolnaam(RolNaam, HalffabItem, IngegevenKenmerken) #dim LowerCaseRol = ##class(TECH.StringUtils).ToLower(RolNaam) @@ -129,7 +129,7 @@ -RolNaam:%String,HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem +RolNaam:%String,HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = 2)) { - If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { + If (HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) + && (((IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).Merivobox()) && $$$Not(HalffabItem.AfmetingTeBekomen = 1042)) + || ((IngegevenKenmerken.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure()) && $$$Not(HalffabItem.AfmetingTeBekomen = 1043)))) { Set RolNaam = "FrontPanel.Processed" } Else { Set RolNaam = "FrontPanel.Standard" } } - If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TBXRol).Frontplaat()) && (HuidigeMesFase >= 2)) { - If HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) { - Set RolNaam = "FrontPanel.Processed" - } Else { - Set RolNaam = "FrontPanel.Standard" + If (IngegevenKenmerken.%Extends("DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken")) { + If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.TBXRol).Frontplaat()) && (HuidigeMesFase >= 2)) { + If (HalffabItem.%Extends(##class(DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem).%ClassName(1)) + && (((IngegevenKenmerken.LegacyKenmerken.ItemDC = "A") && $$$Not(HalffabItem.AfmetingTeBekomen = 1036)) + || ($$$Not(IngegevenKenmerken.LegacyKenmerken.ItemDC = "A") && $$$Not(HalffabItem.AfmetingTeBekomen = 1081)))) { //tbx 1036 bruto of 1081 bij (MA, F, S) + Set RolNaam = "FrontPanel.Processed" + } Else { + Set RolNaam = "FrontPanel.Standard" + } } }