Index: vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml =================================================================== diff -u -r40365 -r40374 --- vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 40365) +++ vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 40374) @@ -105,6 +105,31 @@ ]]> + +1 +APPS.PM.Maatwerk.dto.LBXKenmerken + + + 1 APPS.PM.Maatwerk.dto.LBXKenmerken Index: vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml =================================================================== diff -u -r40365 -r40374 --- vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 40365) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 40374) @@ -10,11 +10,11 @@ #dim LbxKenmerken As ECON.PM.Maatwerk.dto.LbxKenmerken = ##class(ECON.PM.Maatwerk.dto.LbxKenmerken).%New() Set LbxKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() - Set LbxKenmerken.AantalDwarsverdelingen = 0 Set LbxKenmerken.BodemKleur = ##class(DOM.PM.enu.LBXBodemKleur).Wit() Set LbxKenmerken.CorpusBreedte = 600 Set LbxKenmerken.CorpusWandDikte = 0 Set LbxKenmerken.Draagkracht = ##class(DOM.PM.enu.LBXDraagkracht).Draagkracht40() + Set LbxKenmerken.DwarsverdelingAantal = 0 Set LbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.LBXFrontBevestiging).EXPANDO() Set LbxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).BLUMOTION() Set LbxKenmerken.HeeftOpvullijstLinks = $$$False @@ -122,6 +122,32 @@ ]]> + +1 +ECON.PM.Maatwerk.dto.LbxKenmerken + + + 1 ECON.PM.Maatwerk.dto.LbxKenmerken Index: vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml =================================================================== diff -u -r40365 -r40374 --- vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml (.../Test.cls.xml) (revision 40365) +++ vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml (.../Test.cls.xml) (revision 40374) @@ -42,6 +42,11 @@ ]]> + + + + Index: ECONimpl/PM/Maatwerk/Converter.cls.xml =================================================================== diff -u -r40365 -r40374 --- ECONimpl/PM/Maatwerk/Converter.cls.xml (.../Converter.cls.xml) (revision 40365) +++ ECONimpl/PM/Maatwerk/Converter.cls.xml (.../Converter.cls.xml) (revision 40374) @@ -51,6 +51,7 @@ Set LbxKenmerken = ##class(APPS.PM.Maatwerk.dto.LBXKenmerken).%New() Set LbxKenmerken = ..ConverteerGegenereerdeProperties(Kenmerken) + Set LbxKenmerken.AantalDwarsverdelingen = Kenmerken.DwarsverdelingAantal Do ..ConverteerLbxNietMeeleveren(Kenmerken, .LbxKenmerken) Do ..ConverteerUitsparingData(Kenmerken, .LbxKenmerken) @@ -70,7 +71,7 @@ #dim Property As %String = "" For { set Property = $order(Properties(Property)) quit:Property="" - If '(Property["UitsparingData.")&&'(Property="Familie")&&'(Property="Variant")&&'(Property["NietMeeleveren."){ + If '(Property["UitsparingData.")&&'(Property="Familie")&&'(Property="Variant")&&'(Property["NietMeeleveren.")&&'(Property["DwarsverdelingAantal")&&'(##class(TECH.StringUtils).StartsWith(Property,"Mat")){ Do %code.WriteLine($$$TAB_"Set LbxKenmerken."_Property_" = Kenmerken."_Property) } } Index: ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml =================================================================== diff -u -r39988 -r40374 --- ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 39988) +++ ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 40374) @@ -4,9 +4,9 @@ ECON.PM.Maatwerk.dto.EconConfiguratieKenmerken ECONimpl.PM.Maatwerk.EconConfiguratieKeysBuilder - + TECH.String - + @@ -159,6 +159,26 @@ + +%String + + + + +%String + + + + +%String + + + + +%String + + + objectgenerator KenmerkenArray:%ArrayOfDataTypes @@ -305,6 +325,21 @@ UitsparingData + +MatAntislipFiberKleur + + +MatAntislipKleur + + +MatVinylFiberglassKleur + + +MatWolviltKleur + + +DwarsverdelingAantal +