Index: ECONimpl/PM/Maatwerk/AppsConverter/AppsNaarEcon/Lbx.cls.xml =================================================================== diff -u -r41390 -r41430 --- ECONimpl/PM/Maatwerk/AppsConverter/AppsNaarEcon/Lbx.cls.xml (.../Lbx.cls.xml) (revision 41390) +++ ECONimpl/PM/Maatwerk/AppsConverter/AppsNaarEcon/Lbx.cls.xml (.../Lbx.cls.xml) (revision 41430) @@ -16,6 +16,7 @@ Do ..ConverteerNietMeeleveren(Kenmerken, .LbxKenmerken) Do ..ConverteerUitsparingData(Kenmerken, .LbxKenmerken) Do ..ConverteerMat(Kenmerken, .LbxKenmerken) + Do ..ConverteerProductieWijze(Kenmerken, .LbxKenmerken) Quit LbxKenmerken ]]> @@ -33,7 +34,7 @@ #dim Property As %String = "" For { set Property = $order(Properties(Property)) quit:Property="" - continue:(##class(TECH.StringUtils).Contains(Property,"UitsparingData","Familie","AantalDwarsverdelingen","VersieNr","Klasse","ExplicietGekozenKenmerken","GekoppeldeIngegevenKenmerken")) + continue:(##class(TECH.StringUtils).Contains(Property,"UitsparingData","Familie","AantalDwarsverdelingen","VersieNr","Klasse","ExplicietGekozenKenmerken","GekoppeldeIngegevenKenmerken","ProductieWijze")) continue:(##class(TECH.StringUtils).StartsWith(Property,"Mat","Niet")) if $listget(Properties(Property),1)="%Library.Boolean" { @@ -73,6 +74,20 @@ ]]> + + +1 + + + 1 Index: vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml =================================================================== diff -u -r41367 -r41430 --- vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 41367) +++ vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 41430) @@ -35,7 +35,7 @@ Set LBXKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Zijdewit() Set LBXKenmerken.NietIngegeven = ##class(%ListOfDataTypes).%New() Set LBXKenmerken.OpvullijstKleur = "" - Set LBXKenmerken.ProductieWijze = "" + Set LBXKenmerken.ProductieWijze = ##class(DOM.PM.enu.LBXProductieWijze).Volledig() Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).M() Set LBXKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout() Set LBXKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1() Index: ECON/PM/Maatwerk/enu/ProductieWijze/Verwerker.cls.xml =================================================================== diff -u --- ECON/PM/Maatwerk/enu/ProductieWijze/Verwerker.cls.xml (revision 0) +++ ECON/PM/Maatwerk/enu/ProductieWijze/Verwerker.cls.xml (revision 41430) @@ -0,0 +1,104 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration +1 +1 + + +1 +ProductieWijze:ECON.PM.Maatwerk.enu.ProductieWijze + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + +1 +1 + + + + + + Index: ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml =================================================================== diff -u -r41393 -r41430 --- ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 41393) +++ ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 41430) @@ -15,6 +15,7 @@ Do ..ConverteerNietMeeleveren(Kenmerken, .LbxKenmerken) Do ..ConverteerUitsparingData(Kenmerken, .LbxKenmerken) Do ..ConverteerMat(Kenmerken, .LbxKenmerken) + Do ..ConverteerProductieWijze(Kenmerken, .LbxKenmerken) Quit LbxKenmerken ]]> @@ -72,6 +73,20 @@ ]]> + + +1 + + + 1 Index: vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml =================================================================== diff -u -r41390 -r41430 --- vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 41390) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 41430) @@ -28,6 +28,7 @@ Set LbxKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Zijdewit() Set LbxKenmerken.Omschrijving = "" Set LbxKenmerken.OpvullijstKleur = "" + Set LbxKenmerken.ProductieWijze = ##class(ECON.PM.Maatwerk.enu.ProductieWijze).Volledig() Set LbxKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).M() Set LbxKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout() Set LbxKenmerken.Toepassing = ##class(DOM.PM.enu.LBXKlasse).Lade()