Index: zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml
===================================================================
diff -u -r38581 -r38628
--- zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml (.../HalffabSelector.cls.xml) (revision 38581)
+++ zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml (.../HalffabSelector.cls.xml) (revision 38628)
@@ -444,7 +444,7 @@
Set IK = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set IK.LadeVariant=##class(DOM.PM.enu.LadeVariant).TBXPlus()
Set IK.ZijkantDesign="S"
- Set IK.ZijkantKleur="MG"
+ Set IK.LadeKleur="MG"
Set IK.FrontHouderKleur="MG"
Set IK.RugHouderKleur="MG"
Set IK.Draagkracht=30
Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml
===================================================================
diff -u -r38600 -r38628
--- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38600)
+++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38628)
@@ -55,7 +55,7 @@
Set TBXKenmerken.VoorwandVerhogingKleur = ##class(DOM.PM.enu.TBXVoorwandVerhogingKleur).FloatGezuurd()
Set TBXKenmerken.ZijkantDesign = ##class(DOM.PM.enu.TBXZijkantDesign).F()
Set TBXKenmerken.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).K()
- Set TBXKenmerken.ZijkantKleur = ##class(DOM.PM.enu.TBXLadeKleur).IN()
+ Set TBXKenmerken.LadeKleur = ##class(DOM.PM.enu.TBXLadeKleur).IN()
Set TBXKenmerken.ZijwandHoogte = ##class(DOM.PM.enu.TBXZijwandHoogte).G()
Set TBXKenmerken.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Boxside()
Set TBXKenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Leder()
Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml
===================================================================
diff -u -r38575 -r38628
--- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38575)
+++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38628)
@@ -88,7 +88,7 @@
_ ";" _ TBXKenmerken.VoorwandVerhogingKleur
_ ";" _ TBXKenmerken.ZijkantDesign
_ ";" _ TBXKenmerken.ZijkantHoogte
- _ ";" _ TBXKenmerken.ZijkantKleur
+ _ ";" _ TBXKenmerken.LadeKleur
_ ";" _ TBXKenmerken.ZijwandHoogte
_ ";" _ TBXKenmerken.ZijwandVerhogingType
_ ";" _ TBXKenmerken.ZijwandVerhogingMateriaal
Index: DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml
===================================================================
diff -u -r29059 -r38628
--- DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml (.../HFLadeZijkantv001.cls.xml) (revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml (.../HFLadeZijkantv001.cls.xml) (revision 38628)
@@ -35,7 +35,7 @@
Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantDesign,"ZijkantDesign")
Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
Do SelectieKenmerken.SetAt(IngegevenKenmerken.Draagkracht,"Draagkracht")
- Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantKleur,"ZijkantKleur")
+ Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeKleur,"ZijkantKleur")
Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantHoogte,"ZijkantHoogte")
Do SelectieKenmerken.SetAt(IngegevenKenmerken.Uittrekbaarheid,"Uittrekbaarheid")
Index: vhTestFiles/UnitTests/APPS.PM.Maatwerk.impl.Beperking.KlasseCacher.GeefTeBeperkenIKProperties/TestTBX/Test/TBXKenmerken.txt
===================================================================
diff -u -r38611 -r38628
--- vhTestFiles/UnitTests/APPS.PM.Maatwerk.impl.Beperking.KlasseCacher.GeefTeBeperkenIKProperties/TestTBX/Test/TBXKenmerken.txt (.../TBXKenmerken.txt) (revision 38611)
+++ vhTestFiles/UnitTests/APPS.PM.Maatwerk.impl.Beperking.KlasseCacher.GeefTeBeperkenIKProperties/TestTBX/Test/TBXKenmerken.txt (.../TBXKenmerken.txt) (revision 38628)
@@ -7,6 +7,7 @@
HeeftOpvullijstRechts : %Library.Boolean
HeeftZijstabilisering : %Library.Boolean
IsBinnenlade : %Library.Boolean
+LadeKleur : DOM.PM.enu.TBXLadeKleur
LadeVariant : DOM.PM.enu.LadeVariant
RugHoogte : DOM.PM.enu.TBXRugHoogte
RugwandMateriaal : DOM.PM.enu.TBXRugwandMateriaal
@@ -23,7 +24,6 @@
VoorwandVerhogingType : DOM.PM.enu.TBXVoorwandVerhogingType
ZijkantDesign : DOM.PM.enu.TBXZijkantDesign
ZijkantHoogte : DOM.PM.enu.TBXZijkantHoogte
-ZijkantKleur : DOM.PM.enu.TBXLadeKleur
ZijwandHoogte : DOM.PM.enu.TBXZijwandHoogte
ZijwandVerhogingKleur : DOM.PM.enu.TBXZijwandVerhogingKleur
ZijwandVerhogingMateriaal : DOM.PM.enu.TBXZijwandVerhogingMateriaal
Index: APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml
===================================================================
diff -u -r38600 -r38628
--- APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38600)
+++ APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38628)
@@ -132,9 +132,9 @@
Do ..Controleer(TBXKenmerken.ZijkantHoogte,Product.GeefZijkantHoogte(),"ZijkantHoogte", ErrorLijst)
Do ..IsValid(TBXKenmerken.ZijkantHoogte,"DOM.PM.enu.TBXZijkantHoogte", ErrorLijst)
- Set TBXKenmerken.ZijkantKleur = Product.GeefZijkantKleur()
- Do ..Controleer(TBXKenmerken.ZijkantKleur,Product.GeefZijkantKleur(),"ZijkantKleur", ErrorLijst)
- Do ..IsValid(TBXKenmerken.ZijkantKleur,"DOM.PM.enu.TBXLadeKleur", ErrorLijst)
+ Set TBXKenmerken.LadeKleur = Product.GeefZijkantKleur()
+ Do ..Controleer(TBXKenmerken.LadeKleur,Product.GeefZijkantKleur(),"ZijkantKleur", ErrorLijst)
+ Do ..IsValid(TBXKenmerken.LadeKleur,"DOM.PM.enu.TBXLadeKleur", ErrorLijst)
Set TBXKenmerken.ZijwandHoogte = Product.GeefZijwandHoogte()
Do ..Controleer(TBXKenmerken.ZijwandHoogte,Product.GeefZijwandHoogte(),"ZijwandHoogte", ErrorLijst)
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml
===================================================================
diff -u -r30379 -r38628
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml (.../HFLadeZijkantv001.cls.xml) (revision 30379)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml (.../HFLadeZijkantv001.cls.xml) (revision 38628)
@@ -11,7 +11,7 @@
Set IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set IngegevenKenmerken.LadeVariant = ##class(DOM.PM.enu.LadeVariant).TBXPlus()
Set IngegevenKenmerken.ZijkantDesign = "S"
- Set IngegevenKenmerken.ZijkantKleur = "MG"
+ Set IngegevenKenmerken.LadeKleur = "MG"
Set IngegevenKenmerken.Draagkracht = 30
Set IngegevenKenmerken.LadeDiepte = 500
Set IngegevenKenmerken.Uittrekbaarheid = "V"
@@ -36,7 +36,7 @@
Set IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).%New()
Set IngegevenKenmerken.LadeVariant = ##class(DOM.PM.enu.LadeVariant).TBXPlus()
Set IngegevenKenmerken.ZijkantDesign = "S"
- Set IngegevenKenmerken.ZijkantKleur = "MG"
+ Set IngegevenKenmerken.LadeKleur = "MG"
Set IngegevenKenmerken.Draagkracht = 30
Set IngegevenKenmerken.LadeDiepte = 450
Set IngegevenKenmerken.Uittrekbaarheid = "V"
Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml
===================================================================
diff -u -r38579 -r38628
--- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38579)
+++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38628)
@@ -119,6 +119,7 @@
Set ..IngegevenKenmerken.ZijwandVerhogingMateriaal = TBXKenmerken.ZijwandVerhogingMateriaal
Set ..IngegevenKenmerken.ZijwandVerhogingKleur = TBXKenmerken.ZijwandVerhogingKleur
Set ..IngegevenKenmerken.ZijwandVerhogingAantal = TBXKenmerken.ZijwandVerhogingAantal
+ Set ..IngegevenKenmerken.LadeKleur = TBXKenmerken.ZijkantKleur
// TODO naam-mismatch
Set ..IngegevenKenmerken.TipOn = TBXKenmerken.HeeftTipon
Index: DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml
===================================================================
diff -u -r38600 -r38628
--- DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38600)
+++ DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38628)
@@ -183,7 +183,7 @@
DOM.PM.enu.TBXZijkantHoogte
-
+
DOM.PM.enu.TBXLadeKleur
@@ -279,7 +279,7 @@
LadeKleur:%String
ZijkantHoogte
-ZijkantKleur
+LadeKleur
ZijwandHoogte
Index: vhUnitTest/DOM/PM/Maatwerk/HF/CreateDataTBX.cls.xml
===================================================================
diff -u -r38581 -r38628
--- vhUnitTest/DOM/PM/Maatwerk/HF/CreateDataTBX.cls.xml (.../CreateDataTBX.cls.xml) (revision 38581)
+++ vhUnitTest/DOM/PM/Maatwerk/HF/CreateDataTBX.cls.xml (.../CreateDataTBX.cls.xml) (revision 38628)
@@ -35,7 +35,7 @@
Set TBX.ZijkantDesign="S"
;Set TBX.DesignCode="S"
;Set TBX.LadeDesign="GS"
- Set TBX.ZijkantKleur="MG" ; LadeKleur = Kleur zijwand + ...
+ Set TBX.LadeKleur="MG" ; LadeKleur = Kleur zijwand + ...
Set TBX.FrontHouderKleur="MG"
Set TBX.RugHouderKleur="MG"
Set TBX.Draagkracht=30
@@ -77,7 +77,7 @@
Set TBX.ZijkantDesign="A"
;Set TBX.DesignCode="I"
;Set TBX.LadeDesign="WI"
- Set TBX.ZijkantKleur="SW" ; LadeKleur = Kleur zijwand + ...
+ Set TBX.LadeKleur="SW" ; LadeKleur = Kleur zijwand + ...
Set TBX.FrontHouderKleur="SW"
Set TBX.RugHouderKleur="SW"
Set TBX.Draagkracht=30
@@ -139,7 +139,7 @@
Set TBX.ZijkantDesign="A"
;Set TBX.DesignCode="A"
;Set TBX.LadeDesign="WA"
- Set TBX.ZijkantKleur="SW" ; LadeKleur = Kleur zijwand + ...
+ Set TBX.LadeKleur="SW" ; LadeKleur = Kleur zijwand + ...
Set TBX.FrontHouderKleur="SW"
Set TBX.RugHouderKleur="SW"
Set TBX.RelingKleur="SW"
Index: APPS/EC/Winkelkar/impl/ProductKleurBepaler.cls.xml
===================================================================
diff -u -r29059 -r38628
--- APPS/EC/Winkelkar/impl/ProductKleurBepaler.cls.xml (.../ProductKleurBepaler.cls.xml) (revision 29059)
+++ APPS/EC/Winkelkar/impl/ProductKleurBepaler.cls.xml (.../ProductKleurBepaler.cls.xml) (revision 38628)
@@ -52,7 +52,7 @@
/*
Method VerwerkTBXKenmerken(TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken)
{
- Set ..ProductKleur=TBXKenmerken.ZijkantKleur
+ Set ..ProductKleur=TBXKenmerken.LadeKleur
}
*/
]]>