Index: ECON/PM/Maatwerk/dto/LbxKenmerken/NietMeeleveren.cls.xml =================================================================== diff -u -r40908 -r50686 --- ECON/PM/Maatwerk/dto/LbxKenmerken/NietMeeleveren.cls.xml (.../NietMeeleveren.cls.xml) (revision 40908) +++ ECON/PM/Maatwerk/dto/LbxKenmerken/NietMeeleveren.cls.xml (.../NietMeeleveren.cls.xml) (revision 50686) @@ -51,9 +51,15 @@ - + ECON.Boolean "false" + + + + +ECON.Boolean +"false" @@ -69,10 +75,10 @@ - + ECON.Boolean "false" - + @@ -92,6 +98,8 @@ NietMeeleverenState ^ECON.PM.MaaF884.NietMeeleverenS +listnode + AfdekkapBinnen @@ -117,21 +125,24 @@ Opvullijst -TiponBlumotionSynchronisatieSet +TiponBlumotionSet -TiponBlumotionSynchronisatieAdapter +TiponBlumotionSetEenhedenEnMeenemers -TiponBlumotionSynchronisatieStang +TiponBlumotionSynchronisatieAdapter -TiponSynchronisatieSetEnStang +TiponBlumotionSynchronisatieStang -Zijstabilisering +TiponSynchronisatieSet +Zijstabilisering + + AfdekkapRugWandHouder Index: ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx.cls.xml =================================================================== diff -u -r50590 -r50686 --- ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 50590) +++ ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 50686) @@ -12,7 +12,7 @@ Set LbxKenmerken.AantalDwarsverdelingen = Kenmerken.DwarsverdelingAantal Set LbxKenmerken.HeeftDwarsverdeling = (+Kenmerken.DwarsverdelingAantal > 0) Set LbxKenmerken.Klasse = Kenmerken.Toepassing - Set LbxKenmerken.NietMeeleveren = ..MaakNietMeeleveren(Kenmerken) + Set LbxKenmerken.NietMeeleveren = ..GeefNietMeeleveren(Kenmerken) Set LbxKenmerken.ProductieWijze = ..GeefProductieWijze(Kenmerken) Do ..ConverteerUitsparingData(Kenmerken, LbxKenmerken) @@ -52,7 +52,7 @@ ]]> - + Kenmerken:ECON.PM.Maatwerk.dto.LbxKenmerken 1 APPS.PM.Maatwerk.dto.IngegevenKenmerkenNietMeeleveren @@ -68,10 +68,16 @@ If (Kenmerken.NietMeeleveren.InschuifElementVoor = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.InschuifElementVoor) If (Kenmerken.NietMeeleveren.InschuifElementZijkant = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.InschuifElementZijkant) If (Kenmerken.NietMeeleveren.Opvullijst = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.Opvullijst) - If (Kenmerken.NietMeeleveren.TiponBlumotionSynchronisatieSet = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers) - If (Kenmerken.NietMeeleveren.TiponBlumotionSynchronisatieAdapter = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieAdapter) - If (Kenmerken.NietMeeleveren.TiponBlumotionSynchronisatieStang = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieStang) - If (Kenmerken.NietMeeleveren.TiponSynchronisatieSetEnStang = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponSynchronisatieSet _ ..Enum.NietMeeleveren.TiponSynchronisatieStang) + + If (Kenmerken.NietMeeleveren.TiponBlumotionSet = "true") { + Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers _ ..Enum.NietMeeleveren.TiponBlumotionSynchronisatieAdapter _ ..Enum.NietMeeleveren.TiponBlumotionSynchronisatieStang) + } Else { + If (Kenmerken.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers) + If (Kenmerken.NietMeeleveren.TiponBlumotionSynchronisatieAdapter = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieAdapter) + If (Kenmerken.NietMeeleveren.TiponBlumotionSynchronisatieStang = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieStang) + } + + If (Kenmerken.NietMeeleveren.TiponSynchronisatieSet = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.TiponSynchronisatieSet _ ..Enum.NietMeeleveren.TiponSynchronisatieStang) If (Kenmerken.NietMeeleveren.Zijstabilisering = "true") Do NietMeeleveren.Insert(..Enum.NietMeeleveren.Zijstabilisering) Quit NietMeeleveren Index: ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx.cls.xml =================================================================== diff -u -r50491 -r50686 --- ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx.cls.xml (.../Lbx.cls.xml) (revision 50491) +++ ECONimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarEcon/Lbx.cls.xml (.../Lbx.cls.xml) (revision 50686) @@ -1,24 +1,24 @@ -ECONimpl.PM.Maatwerk.KenmerkenConverter.AppsNaarEcon +ECONimpl.PM.Maatwerk.KenmerkenConverter.AppsNaarEcon,DOM.PM.Maatwerk.LBX.impl.Base -Kenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken +AppsKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken ECON.PM.Maatwerk.dto.LbxKenmerken @@ -51,26 +51,35 @@ ]]> - - + +Kenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 +ECON.PM.Maatwerk.dto.LbxKenmerken.NietMeeleveren Index: vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx/Test.cls.xml =================================================================== diff -u -r50472 -r50686 --- vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 50472) +++ vhUnitTest/ECONimpl/PM/Maatwerk/KenmerkenConverter/EconNaarApps/Lbx/Test.cls.xml (.../Test.cls.xml) (revision 50686) @@ -1,7 +1,7 @@ -vhUnitTest.TestCase +vhUnitTest.DOM.PM.Maatwerk.LBX.Base ECONimpl.PM.Maatwerk.KenmerkenConverter.EconNaarApps.Lbx @@ -57,11 +57,6 @@ ]]> - - - - SoortLade:%String 1 @@ -72,6 +67,43 @@ Do $$$AssertEmptyList(..Differenciator.GetDifferences(GeconverteerdeKenmerken, $ClassMethod("vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken", SoortLade))) ]]> + + + + + + + + + + + +