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")