Index: vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml =================================================================== diff -u -r39795 -r39800 --- vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 39795) +++ vhTest/Utils/ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 39800) @@ -10,26 +10,27 @@ #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.BodemKleur = ##class(DOM.PM.enu.LBXBodemKleur).Donkergrijs() + Set LbxKenmerken.AantalDwarsverdelingen = 0 + Set LbxKenmerken.BodemKleur = ##class(DOM.PM.enu.LBXBodemKleur).Wit() Set LbxKenmerken.CorpusBreedte = 600 - Set LbxKenmerken.CorpusWandDikte = 18 + Set LbxKenmerken.CorpusWandDikte = 0 Set LbxKenmerken.Draagkracht = ##class(DOM.PM.enu.LBXDraagkracht).Draagkracht40() Set LbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.LBXFrontBevestiging).EXPANDO() Set LbxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.LBXGeleiderTechnologie).BLUMOTION() Set LbxKenmerken.HeeftOpvullijstLinks = $$$False Set LbxKenmerken.HeeftOpvullijstRechts = $$$False Set LbxKenmerken.HeeftZijstabilisering = $$$False - Set LbxKenmerken.IsBinnenbreedte = $$$False + Set LbxKenmerken.IsBinnenbreedte = $$$True Set LbxKenmerken.IsBinnenlade = $$$False - Set LbxKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte300() - Set LbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).C() - Set LbxKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Oriongrijs() + Set LbxKenmerken.LadeDiepte = ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte500() + Set LbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).M() + Set LbxKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Zijdewit() Set LbxKenmerken.NietIngegeven = ##class(%ListOfDataTypes).%New() Set LbxKenmerken.NietMeeleveren = ##class(%ListOfDataTypes).%New() Set LbxKenmerken.Omschrijving = "" Set LbxKenmerken.OpvullijstKleur = "" - Set LbxKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).C() - Set LbxKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal() + Set LbxKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).M() + Set LbxKenmerken.RugWandMateriaal = ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout() Set LbxKenmerken.Variant = ##class(DOM.PM.enu.Variant).LegraboxPure() Set LbxKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1() Set LbxKenmerken.VoorWandTypeVanCBinnenlade = ##class(DOM.PM.enu.LBXVoorWandTypeVanCBinnenlade).Reling() Index: vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml =================================================================== diff -u -r39795 -r39800 --- vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml (.../Test.cls.xml) (revision 39795) +++ vhUnitTest/ECONimpl/PM/Maatwerk/Converter/ConverteerEconNaarApps/Test.cls.xml (.../Test.cls.xml) (revision 39800) @@ -30,7 +30,7 @@ #dim GeconverteerdeKenmerken As APPS.PM.Maatwerk.dto.LBXKenmerken = Converter.ConverteerEconNaarApps(LbxKenmerken) - do $$$AssertObject(GeconverteerdeKenmerken,##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).CLade()) + do $$$AssertObject(GeconverteerdeKenmerken,##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLade()) ]]>