Index: APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/AntislipMattenUitfaseren.cls.xml =================================================================== diff -u --- APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/AntislipMattenUitfaseren.cls.xml (revision 0) +++ APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor/AntislipMattenUitfaseren.cls.xml (revision 60990) @@ -0,0 +1,219 @@ + + + +TECH.RegisteredObject + + +DOM.PM.Maatwerk.MAT.impl.BaseEnums +1 + + + +DOM.PM.Maatwerk.LBX.impl.BaseEnums +1 + + + +DOM.PM.Maatwerk.TAX.impl.BaseEnums +1 + + + +APPS.PM.Maatwerk.dto.KenmerkMogelijkheden +1 + + + +APPS.PM.Maatwerk.impl.IngegevenKenmerkenTypeAPI +1 + + + +1 +1 +%Status +1 + + + + +MATKenmerken:APPS.PM.Maatwerk.dto.MATKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden + $$$ZwartAntislipDiepte520) { //Kleur ZwartAntislip verbergen + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + } + + If (MATKenmerken.Diepte > $$$AntracietAntislipDiepte400) { //Kleur Antraciet verbergen + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + } + + If (MATKenmerken.Diepte > $$$AntislipDiepte600) { //Materiaal Antislip volledig verbergen + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + } + //Er kan niet omgekeerd gewerkt worden waarij dus de Dieptes zouden worden uitgeschakeld +]]> + + + +TAORKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden + ... + If ($IsObject(GekoppeldKenmerkMogelijkheden)) { + + If (TAORKenmerken.LadeDiepte > 500) { //Materiaal Antislip volledig verbergen + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip) + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + + } + If (TAORKenmerken.LadeDiepte > 300) { //Kleur ZwartAntislip verbergen + If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip)) { + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + } + } + If (TAORKenmerken.LadeDiepte > 400) { //Kleur Antraciet verbergen + If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip)) { + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + } + } + } + + // ... en omgekeerd (LadeDiepte > ... verwijderen bij ongeldige MatMaterialen) + + If ($IsObject(GekoppeldeMatKenmerken)) { + If (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip) { + If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Antraciet)) { + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte250) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte270) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte300) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte320) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte350) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte380) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte400) + ;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) + ;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) + + //Waren al verwijderd + 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.ZwartAntislip)) { + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte250) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte270) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte300) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte320) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte350) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte380) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte400) + ;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) + ;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) + + //Waren al verwijderd + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750) + } + } + } +]]> + + + +LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden + ... + If ($IsObject(GekoppeldKenmerkMogelijkheden)) { + + If (LBXKenmerken.LadeDiepte > 500) { //Materiaal Antislip volledig verbergen + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip) + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + + } + If (LBXKenmerken.LadeDiepte > 300) { //Kleur ZwartAntislip verbergen + If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip)) { + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.ZwartAntislip) + } + } + If (LBXKenmerken.LadeDiepte > 400) { //Kleur Antraciet verbergen + If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip)) { + Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.Antraciet) + } + } + } + + // ... en omgekeerd (LadeDiepte > ... verwijderen bij ongeldige MatMaterialen) + + If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip)) { + If (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Antislip) { + If (##class(TECH.StringUtils).Equals(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.Antraciet)) { + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte270) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte300) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte350) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte400) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte450) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte500) + ;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.ZwartAntislip)) { + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte270) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte300) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte350) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte400) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte450) + ;Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..LBXEnum.KenmerkNaam.LadeDiepte, ..LBXEnum.LadeDiepte.LadeDiepte500) + ;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) + } + } + } +]]> + + + + + Index: APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml =================================================================== diff -u -r58098 -r60990 --- APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 58098) +++ APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 60990) @@ -28,6 +28,9 @@ Set WolviltUitfaseerder = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.WolvitMattenUitfaseerder).%New() Do WolviltUitfaseerder.VerwerkMATKenmerkenVoorWolvilt(MATKenmerken, ..KenmerkMogelijkheden) + + //Set AntislipBeperkingen = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.AntislipMattenUitfaseren).%New() + //Do AntislipBeperkingen.VerwerkMATKenmerkenVoorAntislip(MATKenmerken, ..KenmerkMogelijkheden) ]]> @@ -43,6 +46,9 @@ Set WolviltUitfaseerder = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.WolvitMattenUitfaseerder).%New() Do WolviltUitfaseerder.VerwerkTAORKenmerkenVoorWolvilt(TAORKenmerken, ..KenmerkMogelijkheden) + //Set AntislipBeperkingen = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.AntislipMattenUitfaseren).%New() + //Do AntislipBeperkingen.VerwerkTAORKenmerkenVoorAntislip(TAORKenmerken, ..KenmerkMogelijkheden) + // Ongeldige MatMaterialen verwijderen bij LadeDiepte > ... If ($IsObject(GekoppeldKenmerkMogelijkheden)) { If (TAORKenmerken.LadeDiepte > 650) { @@ -108,6 +114,9 @@ Set WolviltUitfaseerder = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.WolvitMattenUitfaseerder).%New() Do WolviltUitfaseerder.VerwerkLBXKenmerkenVoorWolvilt(LBXKenmerken, ..KenmerkMogelijkheden) + //Set AntislipBeperkingen = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenPostProcessor.AntislipMattenUitfaseren).%New() + //Do AntislipBeperkingen.VerwerkLBXKenmerkenVoorAntislip(LBXKenmerken, ..KenmerkMogelijkheden) + Do ..ProcessSpoelbakVoorLBX(LBXKenmerken) Do ..ProcessSifonladeVoorLBX(LBXKenmerken)