Index: APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/WolvitMattenUitfaseerder.cls.xml
===================================================================
diff -u
--- APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/WolvitMattenUitfaseerder.cls.xml	(revision 0)
+++ APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/WolvitMattenUitfaseerder.cls.xml	(revision 57731)
@@ -0,0 +1,173 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.WolvitMattenUitfaseerder">
+<Abstract>1</Abstract>
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="MatEnum">
+<Type>DOM.PM.Maatwerk.MAT.impl.BaseEnums</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="LBXEnum">
+<Type>DOM.PM.Maatwerk.LBX.impl.BaseEnums</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TAOREnum">
+<Type>DOM.PM.Maatwerk.TAX.impl.BaseEnums</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="KenmerkMogelijkheden">
+<Type>APPS.PM.Maatwerk.dto.KenmerkMogelijkheden</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="IngegevenKenmerkenTypeAPI">
+<Type>APPS.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	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
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkMATKenmerkenVoorWolvilt">
+<FormalSpec>MATKenmerken:APPS.PM.Maatwerk.dto.MATKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden</FormalSpec>
+<Implementation><![CDATA[
+	#define WolvitNettoDiepte400   388
+	#define WolvitNettoDiepte500   488
+	
+	Set ..KenmerkMogelijkheden = KenmerkMogelijkheden
+	
+	If (MATKenmerken.Diepte > $$$WolvitNettoDiepte500) {
+		;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Wolvilt)
+		// De kleuren expliciet uitschakelen is optioneel, maar maakt het wel duidelijker in de UI.
+		;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Zwart)
+		Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+		Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ParelGrijs)
+		Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Oranje)
+	}
+	If (MATKenmerken.Diepte > $$$WolvitNettoDiepte400) {
+		If (MATKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt) {
+			;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Zwart)
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+		}
+	}
+	// En Wolvilt ROOD is reeds volledig uitgeschakeld in de SelectieKenmerken, dus hoeft hier niet meer behandeld te worden.
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkTAORKenmerkenVoorWolvilt">
+<FormalSpec>TAORKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KenmerkMogelijkheden = KenmerkMogelijkheden
+	
+	#dim GekoppeldIKTypeMat As DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat()
+	#dim GekoppeldeMatKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(TAORKenmerken, GekoppeldIKTypeMat)
+	#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = ..KenmerkMogelijkheden.GeefGekoppeldeKenmerkMogelijkheden(GekoppeldIKTypeMat)
+	
+	// Ongeldige MatMaterialen verwijderen bij LadeDiepte > ... 
+	If ($IsObject(GekoppeldKenmerkMogelijkheden)) {
+
+		If (TAORKenmerken.LadeDiepte > 500) {
+			;Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Wolvilt)
+			If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt)) {
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ParelGrijs)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Oranje)
+			}
+		}
+		If (TAORKenmerken.LadeDiepte > 400) {
+			If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt)) {
+				;Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Zwart)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+			}
+		}
+	}
+	
+	// ... en omgekeerd (LadeDiepte > ... verwijderen bij ongeldige MatMaterialen) 
+	
+	If ($IsObject(GekoppeldeMatKenmerken)) {
+		If (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt) {
+		// 	If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw, ..MatEnum.Kleur.Oranje, ..MatEnum.Kleur.ParelGrijs, ..MatEnum.Kleur.Rood, ..MatEnum.Kleur.Zwart)) {
+			If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw, ..MatEnum.Kleur.Oranje, ..MatEnum.Kleur.ParelGrijs, ..MatEnum.Kleur.Rood)) {
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte520)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte550)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte580)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte600)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte650)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750)
+			}
+		//	If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Zwart, ..MatEnum.Kleur.Blauw)) {
+			If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw)) {
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte420)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte450)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte480)
+				Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte500)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkLBXKenmerkenVoorWolvilt">
+<FormalSpec>LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden</FormalSpec>
+<Implementation><![CDATA[
+	Set ..KenmerkMogelijkheden = KenmerkMogelijkheden
+	
+	#dim GekoppeldIKTypeMat As DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat()
+	#dim GekoppeldeMatKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(LBXKenmerken, GekoppeldIKTypeMat)
+	#dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = ..KenmerkMogelijkheden.GeefGekoppeldeKenmerkMogelijkheden(GekoppeldIKTypeMat)
+	
+	// Ongeldige MatMaterialen verwijderen bij LadeDiepte > ... 
+	If ($IsObject(GekoppeldKenmerkMogelijkheden)) {
+		If (LBXKenmerken.LadeDiepte > 500) {
+			;Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Wolvilt)
+			If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt)) {
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ParelGrijs)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Oranje)
+			}
+		}
+		If (LBXKenmerken.LadeDiepte > 400) {
+			If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt)) {
+				;Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Zwart)
+				Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Blauw)
+			}
+		}
+	}
+	
+	// ... en omgekeerd (LadeDiepte > ... verwijderen bij ongeldige MatMaterialen) 
+	If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Wolvilt)) {
+	//	If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw, ..MatEnum.Kleur.Oranje, ..MatEnum.Kleur.ParelGrijs, ..MatEnum.Kleur.Rood, ..MatEnum.Kleur.Zwart)) {
+		If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw, ..MatEnum.Kleur.Oranje, ..MatEnum.Kleur.ParelGrijs, ..MatEnum.Kleur.Rood)) {
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte550)
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte600)
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte650)
+		}
+	//	If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Zwart, ..MatEnum.Kleur.Blauw)) {
+		If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Blauw)) {
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte450)
+			Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte500)
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>