Index: APPS/Halux/PPS/Activiteit/impl/LBX/LBXStalenRuggen.cls.xml =================================================================== diff -u -r72875 -r72889 --- APPS/Halux/PPS/Activiteit/impl/LBX/LBXStalenRuggen.cls.xml (.../LBXStalenRuggen.cls.xml) (revision 72875) +++ APPS/Halux/PPS/Activiteit/impl/LBX/LBXStalenRuggen.cls.xml (.../LBXStalenRuggen.cls.xml) (revision 72889) @@ -59,7 +59,7 @@ If (OmleidingNaarEncowayBepaler.IsMaatwerkCalculatieInEncoway(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr())) { #dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab.Encoway = RugItem.GeefHalffab() - Set Kleur = Halffab.PpsKenmerken.GetAt("Kleur") + Set Kleur = Halffab.RugHoogte Set Hoogte = Halffab.PpsKenmerken.GetAt("Hoogte") Set UitvoeringInfo.Breedte = Halffab.PpsKenmerken.GetAt("Lengte") } Else { Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/ProductieVoorbereidingZaag/Utils/TestGeefRugWandHouderInfo.cls.xml =================================================================== diff -u -r72882 -r72889 --- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/ProductieVoorbereidingZaag/Utils/TestGeefRugWandHouderInfo.cls.xml (.../TestGeefRugWandHouderInfo.cls.xml) (revision 72882) +++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/LBX/ProductieVoorbereidingZaag/Utils/TestGeefRugWandHouderInfo.cls.xml (.../TestGeefRugWandHouderInfo.cls.xml) (revision 72889) @@ -53,7 +53,7 @@ #dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefLBXKenmerken(##class(DOM.PM.enu.LBXRugWandMateriaal).Staal()) - Do $$$AssertEquals(..Utils.GeefRugWandHouderInfo(LBXKenmerken),"RWH: -- -- --") + Do $$$AssertEquals(..Utils.GeefRugWandHouderInfo(LBXKenmerken, ..GeefRugwandHouder()), "RWH: -- -- --") ]]> Index: DOM/PM/Maatwerk/Calc/HF/Halffab/Encoway.cls.xml =================================================================== diff -u -r72875 -r72889 --- DOM/PM/Maatwerk/Calc/HF/Halffab/Encoway.cls.xml (.../Encoway.cls.xml) (revision 72875) +++ DOM/PM/Maatwerk/Calc/HF/Halffab/Encoway.cls.xml (.../Encoway.cls.xml) (revision 72889) @@ -22,6 +22,10 @@ array + +%String + + %String @@ -34,7 +38,6 @@ %Library.CacheStorage EncowayDefaultData -listnode "Encoway" LadeDiepte @@ -51,6 +54,9 @@ VoorwandType + +RugHoogte + PpsKenmerken Index: APPS/Halux/PPS/Activiteit/impl/LBX/VoorbereidingZaag.cls.xml =================================================================== diff -u -r72875 -r72889 --- APPS/Halux/PPS/Activiteit/impl/LBX/VoorbereidingZaag.cls.xml (.../VoorbereidingZaag.cls.xml) (revision 72875) +++ APPS/Halux/PPS/Activiteit/impl/LBX/VoorbereidingZaag.cls.xml (.../VoorbereidingZaag.cls.xml) (revision 72889) @@ -122,7 +122,7 @@ If (OmleidingNaarEncowayBepaler.IsMaatwerkCalculatieInEncoway(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr())) { #dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab.Encoway = RugItem.GeefHalffab() Set RugKleur = Halffab.PpsKenmerken.GetAt("Kleur") - Set RugHoogte = Halffab.PpsKenmerken.GetAt("Hoogte") + Set RugHoogte = Halffab.RugHoogte } Else { Set RugKleur = $LG(##class(Prod.Kenmerk.DataDefinitie).Get("LBX_PPS_Rug", RugProductID, "Kleur")) Set RugHoogte = $LG(##class(Prod.Kenmerk.DataDefinitie).Get("LBX_PPS_Rug", RugProductID, "Hoogte")) Index: APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml =================================================================== diff -u -r72875 -r72889 --- APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml (.../HalffabItemsBoom.cls.xml) (revision 72875) +++ APPS/PM/Maatwerk/impl/VhConfig/Converter/HalffabItemsBoom.cls.xml (.../HalffabItemsBoom.cls.xml) (revision 72889) @@ -216,6 +216,7 @@ Set Halffab.LadeDiepte = Halffabrikaat.Kenmerken.GetAt("LadeDiepte") Set Halffab.LadeHoogte = Halffabrikaat.Kenmerken.GetAt("LadeHoogte") Set Halffab.LadeKleur = Halffabrikaat.Kenmerken.GetAt("LadeKleur") + Set Halffab.RugHoogte = Halffabrikaat.Kenmerken.GetAt("RugHoogte") Set Halffab.RugWandMateriaal = Halffabrikaat.Kenmerken.GetAt("RugwandMateriaal") Set Halffab.VoorwandType = Halffabrikaat.Kenmerken.GetAt("VoorwandType")