Index: DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml
===================================================================
diff -u -r38566 -r38570
--- DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38566)
+++ DOM/PM/Maatwerk/Calc/Common/IKCanonischeWaardeGenerator.cls.xml (.../IKCanonischeWaardeGenerator.cls.xml) (revision 38570)
@@ -62,7 +62,7 @@
_ ";" _ TBXKenmerken.FrontOndersteuningAantal
_ ";" _ TBXKenmerken.FrontOndersteuningType
_ ";" _ TBXKenmerken.HangmapBoringAantal
- _ ";" _ TBXKenmerken.Klasse
+ _ ";" _ TBXKenmerken.Toepassing
_ ";" _ TBXKenmerken.HeeftOpvullijstLinks
_ ";" _ TBXKenmerken.HeeftOpvullijstRechts
_ ";" _ TBXKenmerken.PlaatMateriaal
Index: DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml
===================================================================
diff -u -r38568 -r38570
--- DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38568)
+++ DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml (.../TBXKenmerken.cls.xml) (revision 38570)
@@ -72,7 +72,7 @@
%Boolean
-
+
DOM.PM.enu.TBXToepassing
@@ -342,23 +342,23 @@
@@ -759,6 +759,9 @@
TussenrugMateriaal
+
+Toepassing
+
Index: DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSpoelbakEvaluator.cls.xml
===================================================================
diff -u -r38568 -r38570
--- DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSpoelbakEvaluator.cls.xml (.../BevatSpoelbakEvaluator.cls.xml) (revision 38568)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSpoelbakEvaluator.cls.xml (.../BevatSpoelbakEvaluator.cls.xml) (revision 38570)
@@ -9,7 +9,7 @@
HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
%Boolean
-
Index: DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSifonladeHelper.cls.xml
===================================================================
diff -u -r38568 -r38570
--- DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSifonladeHelper.cls.xml (.../IngegevenKenmerkenSifonladeHelper.cls.xml) (revision 38568)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSifonladeHelper.cls.xml (.../IngegevenKenmerkenSifonladeHelper.cls.xml) (revision 38570)
@@ -29,7 +29,7 @@
TBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken
-
Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml
===================================================================
diff -u -r38566 -r38570
--- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38566)
+++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 38570)
@@ -91,7 +91,7 @@
Set ..IngegevenKenmerken.HeeftOpvullijstLinks = TBXKenmerken.HeeftOpvullijstLinks
Set ..IngegevenKenmerken.HeeftOpvullijstRechts = TBXKenmerken.HeeftOpvullijstRechts
Set ..IngegevenKenmerken.HeeftZijstabilisering = TBXKenmerken.HeeftZijstabilisering
- Set ..IngegevenKenmerken.Klasse = TBXKenmerken.Klasse
+ Set ..IngegevenKenmerken.Toepassing = TBXKenmerken.Klasse
Set ..IngegevenKenmerken.PlaatMateriaal = TBXKenmerken.PlaatMateriaal
Set ..IngegevenKenmerken.RugKleur = TBXKenmerken.RugKleur
Set ..IngegevenKenmerken.RugHouderKleur = TBXKenmerken.RugHouderKleur
Index: APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml
===================================================================
diff -u -r38568 -r38570
--- APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38568)
+++ APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml (.../KenmerkConvertor.cls.xml) (revision 38570)
@@ -69,11 +69,11 @@
Set TBXKenmerken.HeeftOpvullijstLinks = Product.BevatOpvullijstLinks()
If (TBXKenmerken.HeeftOpvullijstLinks = "") { Do ErrorLijst.Insert("HeeftOpvullijstLinks niet ingevuld") }
- Set Klasse = ##class(DOM.PM.enu.TBXToepassing).Lade()
- If (Product.IsSpoelbakLade()) { Set Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak() }
- If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRondeUitsparing()) { Set Klasse = ##class(DOM.PM.enu.TBXToepassing).Sifon() }
- If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRechteUitsparing()) { Set Klasse = ##class(DOM.PM.enu.TBXToepassing).SifonTypeBlum() } ; To be done (added by WimV on 11/08/2011)
- Set TBXKenmerken.Klasse = Klasse
+ #dim Toepassing As DOM.PM.enu.TBXToepassing = ##class(DOM.PM.enu.TBXToepassing).Lade()
+ If (Product.IsSpoelbakLade()) { Set Toepassing = ##class(DOM.PM.enu.TBXToepassing).Spoelbak() }
+ If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRondeUitsparing()) { Set Toepassing = ##class(DOM.PM.enu.TBXToepassing).Sifon() }
+ If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRechteUitsparing()) { Set Toepassing = ##class(DOM.PM.enu.TBXToepassing).SifonTypeBlum() } ; To be done (added by WimV on 11/08/2011)
+ Set TBXKenmerken.Toepassing = Toepassing
Set TBXKenmerken.HeeftOpvullijstRechts = Product.BevatOpvullijstRechts()
If (TBXKenmerken.HeeftOpvullijstRechts = "") { Do ErrorLijst.Insert("OpvulLijstRechts niet ingevuld") }
Index: DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSpoelbakHelper.cls.xml
===================================================================
diff -u -r38568 -r38570
--- DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSpoelbakHelper.cls.xml (.../IngegevenKenmerkenSpoelbakHelper.cls.xml) (revision 38568)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenSpoelbakHelper.cls.xml (.../IngegevenKenmerkenSpoelbakHelper.cls.xml) (revision 38570)
@@ -26,7 +26,7 @@
TBXKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken
-
Index: DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSifonEvaluator.cls.xml
===================================================================
diff -u -r38568 -r38570
--- DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSifonEvaluator.cls.xml (.../BevatSifonEvaluator.cls.xml) (revision 38568)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TBX/BevatSifonEvaluator.cls.xml (.../BevatSifonEvaluator.cls.xml) (revision 38570)
@@ -9,7 +9,7 @@
HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken
%Boolean
-
Index: vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml
===================================================================
diff -u -r38568 -r38570
--- vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38568)
+++ vhUnitTest/DOM/PM/impl/IKCanonischeWaarde/TestTBXKenmerken.cls.xml (.../TestTBXKenmerken.cls.xml) (revision 38570)
@@ -29,7 +29,7 @@
Set TBXKenmerken.FrontOndersteuningAantal = 1
Set TBXKenmerken.FrontOndersteuningType = ##class(DOM.PM.enu.TBXFrontOndersteuningType).FrontSteun()
Set TBXKenmerken.HangmapBoringAantal = 0
- Set TBXKenmerken.Klasse = ##class(DOM.PM.enu.TBXToepassing).Spoelbak()
+ Set TBXKenmerken.Toepassing = ##class(DOM.PM.enu.TBXToepassing).Spoelbak()
Set TBXKenmerken.HeeftOpvullijstLinks = 1
Set TBXKenmerken.HeeftOpvullijstRechts = 0
Set TBXKenmerken.PlaatMateriaal = "HS"