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)))
]]>
+
+
+
+
+
+
+
+
+
+
+
+