Index: APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml
===================================================================
diff -u -r44742 -r47364
--- APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 44742)
+++ APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 47364)
@@ -217,9 +217,9 @@
MATKenmerken:APPS.PM.Maatwerk.dto.MATKenmerken
Index: APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml
===================================================================
diff -u -r40573 -r47364
--- APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 40573)
+++ APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 47364)
@@ -23,7 +23,7 @@
Do ##super(MATKenmerken)
If (MATKenmerken.Materiaal = "") {
- Do ..KenmerkMogelijkheden.MogelijkeWaarden.SetAt("", ..MATKenmerkNaam.Kleur)
+ Do ..KenmerkMogelijkheden.MogelijkeWaarden.SetAt("", ..MatEnum.KenmerkNaam.Kleur)
}
]]>
@@ -34,17 +34,19 @@
#dim GekoppeldIKTypeMat As DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat()
#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = ..KenmerkMogelijkheden.GeefGekoppeldeKenmerkMogelijkheden(GekoppeldIKTypeMat)
- // Geen Antislip(-Fiber) bij Diepte > 650 ...
+ // Ongeldige MatMaterialen verwijderen bij LadeDiepte > 650 ...
If ($IsObject(GekoppeldKenmerkMogelijkheden)) {
If (TAORKenmerken.LadeDiepte > 650) {
- Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MATKenmerkNaam.Materiaal, ##class(DOM.PM.enu.MATMateriaal).Antislip())
- Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MATKenmerkNaam.Materiaal, ##class(DOM.PM.enu.MATMateriaal).AntislipFiber())
+ Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip)
+ Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.AntislipFiber)
+ Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.VinylFiberglass)
}
}
- // ... en omgekeerd (geen LadeDiepte > 650 bij Antislip(-Fiber))
+ // ... en omgekeerd (LadeDiepte > 650 verwijderen bij ongeldige MatMaterialen)
#dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(TAORKenmerken, GekoppeldIKTypeMat)
- If ($IsObject(MATKenmerken)) && (MATKenmerken.Materiaal = ##class(DOM.PM.enu.MATMateriaal).Antislip() || (MATKenmerken.Materiaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber())) {
+
+ If ($IsObject(MATKenmerken)) && ((MATKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip) || (MATKenmerken.Materiaal = ..MatEnum.Materiaal.AntislipFiber) || (MATKenmerken.Materiaal = ..MatEnum.Materiaal.VinylFiberglass)) {
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700)
Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750)
}
Index: APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml
===================================================================
diff -u -r32424 -r47364
--- APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml (.../KenmerkPostProcessor.cls.xml) (revision 32424)
+++ APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml (.../KenmerkPostProcessor.cls.xml) (revision 47364)
@@ -4,8 +4,8 @@
1
APPS.PM.Maatwerk.dto.IngegevenKenmerkenVisitor
-
-DOM.PM.enu.MATKenmerkNaam.AutoComplete
+
+DOM.PM.Maatwerk.MAT.impl.BaseEnums
1
@@ -53,6 +53,7 @@
Set ..IngegevenKenmerkenTypeAPI = ##class(APPS.ApplicatieContext).Instance().GeefIngegevenKenmerkenTypeAPI()
Set ..TAOREnum = ##class(DOM.PM.Maatwerk.TAX.impl.BaseEnums).%New()
Set ..LBXEnum = ##class(DOM.PM.Maatwerk.LBX.impl.BaseEnums).%New()
+ Set ..MatEnum = ##class(DOM.PM.Maatwerk.MAT.impl.BaseEnums).%New()
Quit $$$OK
]]>
@@ -70,7 +71,7 @@
#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = GekoppeldeKenmerkMogelijkhedenIterator.Next()
Set GekoppeldeKenmerkMogelijkheden = GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden
- #dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..GeefGekoppeldeIngegevenKenmerken(GekoppeldKenmerkMogelijkheden, Kenmerken)
+ #dim GekoppeldeIngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..GeefGekoppeldeIngegevenKenmerken(GekoppeldKenmerkMogelijkheden, Kenmerken)
Do ..VerwerkKenmerkMogelijkheden(GekoppeldeIngegevenKenmerken, GekoppeldeKenmerkMogelijkheden, Klant, Personality)
}
} Else {
Index: APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml
===================================================================
diff -u -r45023 -r47364
--- APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml (.../InterneKenmerkDomeinPostProcessor.cls.xml) (revision 45023)
+++ APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml (.../InterneKenmerkDomeinPostProcessor.cls.xml) (revision 47364)
@@ -89,9 +89,9 @@
MATKenmerken:APPS.PM.Maatwerk.dto.MATKenmerken