Index: APPS/Halux/PPS/TBXZaag/impl/PlaatmateriaalHelperVoorMVX.cls.xml =================================================================== diff -u -r63182 -r63217 --- APPS/Halux/PPS/TBXZaag/impl/PlaatmateriaalHelperVoorMVX.cls.xml (.../PlaatmateriaalHelperVoorMVX.cls.xml) (revision 63182) +++ APPS/Halux/PPS/TBXZaag/impl/PlaatmateriaalHelperVoorMVX.cls.xml (.../PlaatmateriaalHelperVoorMVX.cls.xml) (revision 63217) @@ -3,10 +3,6 @@ %RegisteredObject - -DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder - - DOM.PM.Maatwerk.Calc.HF.HalffabContext @@ -17,9 +13,9 @@ %Status 1 @@ -100,25 +96,29 @@ %ListOfObjects ELEMENTTYPE="DOM.PM.Maatwerk.Calc.HF.Halffab" + + + +Rol:DOM.PM.Maatwerk.Calc.HF.enu.MVXRol +1 +DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder + @@ -129,7 +129,7 @@ Set HalffabIterator = ##class(TECH.ListIterator).%New(HalffabLijst) While (HalffabIterator.HasNext()) { #dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = HalffabIterator.Next() - // TODOPA codeduplicatie tov APPS.Halux.PPS.Activiteit.impl.LBX.LBXLadePersen + // TODOPA codeduplicatie tov APPS.Halux.PPS.Activiteit.impl.LBX.LBXLadePersen => MVX? #dim AftrekDiepte = $S(Halffab.RugWandMateriaal = ##class(DOM.PM.enu.MVXRugWandMateriaal).Staal(): 21, 1: 26) #dim PlaatKleuren As %List = ##class(Prod.Kenmerk.DataDefinitie).Get("MVX_PPS_"_Rol, Halffab.GeefProductID(), "Kleur") // TODOPA FSC claim ophalen @@ -143,7 +143,7 @@ Set PlaatMateriaal.Kleuren = ..VertaalKleuren(PlaatKleuren) Set PlaatMateriaal.KortTekst = Korttekst // TODOPA niet alle kleurcombinaties hebben al een thumbnail (maar niet zeker of ze gebruikt worden op de zaag) - // TODOPA indien gebruikt moeten we mogelijk nieuwe thumbnails maken voor LBX. + // TODOPA indien gebruikt moeten we mogelijk nieuwe thumbnails maken voor MVX. Set PlaatMateriaal.ImageURL =..GeefBiKleurenImageURL(PlaatKleuren) // TODOPA ruggen hebben nog geen PPS-kenmerk "Kleur" If (Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Bodem()) { Index: APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFBodemv001.cls.xml =================================================================== diff -u --- APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFBodemv001.cls.xml (revision 0) +++ APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFBodemv001.cls.xml (revision 63217) @@ -0,0 +1,38 @@ + + + +TECH.RegisteredObject + + +%String +1 + + + +initvalue:%CacheString +1 +1 +%Status +1 + + + + +%String + + + + +%String + + + + + + Index: APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFRugv001.cls.xml =================================================================== diff -u --- APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFRugv001.cls.xml (revision 0) +++ APPS/Halux/PPS/TBXZaag/impl/MvxBuilder/HFRugv001.cls.xml (revision 63217) @@ -0,0 +1,38 @@ + + + +TECH.RegisteredObject + + +%String +1 + + + +initvalue:%CacheString +1 +1 +%Status +1 + + + + +%String + + + + +%String + + + + + +