Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml =================================================================== diff -u -r74257 -r74349 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74257) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator.cls.xml (.../OptieGenerator.cls.xml) (revision 74349) @@ -114,17 +114,7 @@ %DataType = 2) { - If (PropertyNaam = "MatKleur") { - Set GeconverteerdeWaarde = ##class(DOM.PM.enu.MATKleur).LogicalToDisplay(Waarde) - } - If (PropertyNaam = "MatMateriaal") { - Set GeconverteerdeWaarde = ##class(DOM.PM.enu.MATMateriaal).LogicalToDisplay(Waarde) - } - } - If (Type = "%Library.Boolean") { Set:(Waarde = 0) GeconverteerdeWaarde = "false" Set:(Waarde = 1) GeconverteerdeWaarde = "true" @@ -166,7 +156,7 @@ } If (##class(TECH.StringUtils).Equals(RolNaam, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Opvullijst()) && (HuidigeMesFase >= 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)) && $$$Not(HalffabItem.AfmetingTeBekomen = 486)) { //Workaround om in .NET geen wijziging te moeten doen voor opvullijsten Set RolNaam = "DistanceTrim.Processed" } Else { Set RolNaam = "DistanceTrim.Standard" Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml =================================================================== diff -u -r74257 -r74349 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml (.../IngegevenKenmerkenOptiesGenerator.cls.xml) (revision 74257) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/IngegevenKenmerkenOptiesGenerator.cls.xml (.../IngegevenKenmerkenOptiesGenerator.cls.xml) (revision 74349) @@ -132,6 +132,9 @@ If (GekoppeldIK.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep()) { Do ##class(TECH.ListUtils).AppendList(LijstOpties, ..GeefOptiesSpaceStepKenmerken(GekoppeldIK.IngegevenKenmerken, SequentieNummerLade, GekoppeldIK.Key _ ".")) } + If (GekoppeldIK.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat()) { + Do ##class(TECH.ListUtils).AppendList(LijstOpties, ..GeefOptiesMatKenmerken(GekoppeldIK.IngegevenKenmerken, SequentieNummerLade, "")) + } } Quit LijstOpties @@ -154,6 +157,23 @@ Quit LijstOpties ]]> + + +KenmerkenObjt:APPS.PM.Maatwerk.dto.MATKenmerken,SequentieNummerLade:%String,VoorvoegselNaam:%String="" +1 +%ListOfObjects += 2) { + Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "matkleur"), ##class(DOM.PM.enu.MATKleur).LogicalToDisplay(KenmerkenObjt.Kleur))) + Do LijstOpties.Insert(..GeefOptieVoorLade(SequentieNummerLade, "-" _ ##class(TECH.StringUtils).ToFirstCase(VoorvoegselNaam _ "matmateriaal"), ##class(DOM.PM.enu.MATMateriaal).LogicalToDisplay(KenmerkenObjt.Materiaal))) + } + + Quit LijstOpties +]]> +