Index: vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxZijkantPlaatx20160914.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxZijkantPlaatx20160914.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxZijkantPlaatx20160914.cls.xml	(revision 36679)
@@ -0,0 +1,107 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxZijkantPlaatx20160914">
+<Super>vhDeploy.Maatwerk.SelectieKenmerk.Base</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update TAOR_PPS_ZijkantPlaat met massadichtheid</Default>
+</Parameter>
+
+<Parameter name="SelectieKenmerk">
+<Type>%String</Type>
+<Default>TAOR_PPS_ZijkantPlaat</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(..#SelectieKenmerk)
+		
+	#dim Service As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#dim MogelijkeWaardenManager As APPS.PM.Kenmerk.MogelijkeWaardenManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
+	#dim Lijst As APPS.PM.dto.Kenm.KenmerkMetadataList = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep("TAOR eigenschappen ZijkantPlaat")
+	
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = $$$False
+	
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkKleur())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkDikte())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkMassaDichtheid())
+	
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..MaakRepository()
+	
+	Do ..RegistreerMogelijkeWaardenRepository(MogelijkeWaardenManager, "Kleur", "DOM.PM.enu.TAORLadeKleur")
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkKleur">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Kleur"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Tekst()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.NieuweWaardeToegelaten = $$$False
+	Set Kenmerk.SuggereerWaarden = $$$True
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 1
+	
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkDikte">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Dikte"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 2
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkMassaDichtheid">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Massadichtheid"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 3
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxFrontPlaatx20160914.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxFrontPlaatx20160914.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxFrontPlaatx20160914.cls.xml	(revision 36679)
@@ -0,0 +1,85 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxFrontPlaatx20160914">
+<Super>vhDeploy.Maatwerk.SelectieKenmerk.Base</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update TAOR_PPS_FrontPlaat met massadichtheid</Default>
+</Parameter>
+
+<Parameter name="SelectieKenmerk">
+<Type>%String</Type>
+<Default>TAOR_PPS_FrontPlaat</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(..#SelectieKenmerk)
+		
+	#dim Service As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#dim MogelijkeWaardenManager As APPS.PM.Kenmerk.MogelijkeWaardenManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
+	#dim Lijst As APPS.PM.dto.Kenm.KenmerkMetadataList = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep("TAOR eigenschappen FrontPlaat")
+	
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = $$$False
+	
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkKleur())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkMassaDichtheid())
+	
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..MaakRepository()
+	
+	Do ..RegistreerMogelijkeWaardenRepository(MogelijkeWaardenManager, "Kleur", "DOM.PM.enu.TAORLadeKleur")
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkKleur">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Kleur"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Tekst()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.NieuweWaardeToegelaten = $$$False
+	Set Kenmerk.SuggereerWaarden = $$$True
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 1
+	
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkMassaDichtheid">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Massadichtheid"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 2
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Deploy20160914xTAORxPPSxLadeOnderdeelPlaatxMassaDichtheid.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20160914xTAORxPPSxLadeOnderdeelPlaatxMassaDichtheid.cls.xml	(revision 0)
+++ vhDeploy/Deploy20160914xTAORxPPSxLadeOnderdeelPlaatxMassaDichtheid.cls.xml	(revision 36679)
@@ -0,0 +1,177 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20160914xTAORxPPSxLadeOnderdeelPlaatxMassaDichtheid">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Invullen massadichtheid voor TAOR_PPS_'LadeOnderdeel'-Plaat</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxBodemPlaatx20160914).ExecCode()
+	Do ##class(vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxFrontPlaatx20160914).ExecCode()
+	Do ##class(vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxRugPlaatx20160914).ExecCode()
+	Do ##class(vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxZijkantPlaatx20160914).ExecCode()
+	
+	#dim DeployMassaDichtheid As vhDeploy.Deploy20160914xTAORxPPSxLadeOnderdeelPlaatxMassaDichtheid = ..%New()
+	
+	Do DeployMassaDichtheid.UpdateProductKenmerk("TAOR_PPS_BodemPlaat", "Massadichtheid", DeployMassaDichtheid.GeefProductIdsMetMassaDichtheidVoorBodemPlaat())
+	Do DeployMassaDichtheid.UpdateProductKenmerk("TAOR_PPS_ZijkantPlaat", "Massadichtheid", DeployMassaDichtheid.GeefProductIdsMetMassaDichtheidVoorZijkantPlaat())
+	Do DeployMassaDichtheid.UpdateProductKenmerk("TAOR_PPS_RugPlaat", "Massadichtheid", DeployMassaDichtheid.GeefProductIdsMetMassaDichtheidVoorRugPlaat())
+	Do DeployMassaDichtheid.UpdateProductKenmerk("TAOR_PPS_FrontPlaat", "Massadichtheid", DeployMassaDichtheid.GeefProductIdsMetMassaDichtheidVoorFrontPlaat())
+]]></Implementation>
+</Method>
+
+<Method name="UpdateProductKenmerk">
+<FormalSpec>KenmerkGroepNaam:TECH.String,KenmerkNaam:TECH.String,ProductIds:%ArrayOfDataTypes</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim KenmerkenService As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#dim ProductIdIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(ProductIds)
+	
+	While (ProductIdIterator.HasNext()) {
+		#dim MassaDichtheid As TECH.String = ProductIdIterator.Next()
+		#dim ProductId As TECH.String = ProductIdIterator.Key()
+		#dim ProductNummers As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(ProductId)
+		#dim ProductenKenmerken As APPS.PM.dto.Kenm.ProductenKenmerken = KenmerkenService.GeefProductKenmerken(ProductNummers)
+		#dim KenmerkenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(ProductenKenmerken.Kenmerken)
+		
+		While (KenmerkenIterator.HasNext()) {
+			#dim ProductKenmerken As APPS.PM.dto.Kenm.ProductKenmerken = KenmerkenIterator.Next()
+			#dim KenmerkenGroepIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(ProductKenmerken.KenmerkenGroepen)
+		
+			While (KenmerkenGroepIterator.HasNext()) {
+				#dim KenmerkenGroep As APPS.PM.dto.Kenm.ProductKenmerkenGroep = KenmerkenGroepIterator.Next()
+
+				If (KenmerkenGroep.Naam = KenmerkGroepNaam) {
+					#dim SetIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(KenmerkenGroep.Sets)
+					
+					While (SetIterator.HasNext()) {
+						#dim Set As APPS.PM.dto.Kenm.ProductKenmerkenSet = SetIterator.Next()
+
+						If (Set.ProductID = ProductId) {
+							Do ..VerwijderBestaandKenmerk(Set.Kenmerken, KenmerkNaam)
+							Do ..VoegToeKenmerk(Set.Kenmerken, KenmerkNaam, ##class(TECH.ListUtils).CreateListOfDataTypes(MassaDichtheid))
+						}
+					}
+				}
+			}
+		}
+		
+		Do KenmerkenService.BewaarProductenKenmerken(ProductenKenmerken)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderBestaandKenmerk">
+<FormalSpec><![CDATA[&Kenmerken:%ListOfObjects,KenmerkNaam:TECH.String]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim KenmerkIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Kenmerken)
+
+	While (KenmerkIterator.HasNext()) {
+		#dim Kenmerk As APPS.PM.dto.Kenm.ProductKenmerk = KenmerkIterator.Next()
+
+		If (Kenmerk.Naam = KenmerkNaam) {
+			Do Kenmerken.RemoveAt(Kenmerk)
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeKenmerk">
+<FormalSpec><![CDATA[&Kenmerken:%ListOfObjects,KenmerkNaam:TECH.String,KenmerkWaarden:%ListOfDataTypes]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.ProductKenmerk = ##class(APPS.PM.dto.Kenm.ProductKenmerk).%New()
+
+	Set Kenmerk.Naam = KenmerkNaam
+	Set Kenmerk.Waarden = KenmerkWaarden
+
+	Do Kenmerken.Insert(Kenmerk)
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductIdsMetMassaDichtheidVoorBodemPlaat">
+<Private>1</Private>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim ProductIds As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+	
+	Do ProductIds.SetAt(0.00093, "1028117") //NE
+	Do ProductIds.SetAt(0.00090, "1038761") //NN
+	Do ProductIds.SetAt(0.00098, "1038806") //ZY
+	Do ProductIds.SetAt(0.00096, "1234553") //E1
+	Do ProductIds.SetAt(0.00096, "1234572") //E2
+	Do ProductIds.SetAt(0.00096, "1234595") //N1
+	Do ProductIds.SetAt(0.00096, "1234608") //S
+	Do ProductIds.SetAt(0.00096, "1234609") //W
+	Do ProductIds.SetAt(0.00096, "1234664") //XG
+	Do ProductIds.SetAt(0.00096, "1468753") //DA
+	
+	Do ProductIds.SetAt(0.00096, "1044136") //W
+	Do ProductIds.SetAt(0.00096, "1045547") //S
+	Do ProductIds.SetAt(0.00096, "1045666") //E1
+	Do ProductIds.SetAt(0.00096, "1045682") //E2
+	Do ProductIds.SetAt(0.00096, "1045695") //N1	
+	
+	Quit ProductIds
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductIdsMetMassaDichtheidVoorZijkantPlaat">
+<Private>1</Private>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	//--> zelfde producten als bodem
+	Quit ..GeefProductIdsMetMassaDichtheidVoorBodemPlaat()
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductIdsMetMassaDichtheidVoorRugPlaat">
+<Private>1</Private>
+<ReturnType>%ArrayOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim ProductIds As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+	
+	Do ProductIds.SetAt(0.00095, "1028759") //NE
+	Do ProductIds.SetAt(0.00090, "1039169") //NN
+	Do ProductIds.SetAt(0.00097, "1039173") //ZY
+	Do ProductIds.SetAt(0.00082, "1045739") //W
+	Do ProductIds.SetAt(0.00082, "1045765") //S
+	Do ProductIds.SetAt(0.00082, "1045767") //XG
+	Do ProductIds.SetAt(0.00082, "1045768") //E1
+	Do ProductIds.SetAt(0.00082, "1045776") //E2
+	Do ProductIds.SetAt(0.00082, "1045779") //N1
+	Do ProductIds.SetAt(0.00082, "1468813") //DA
+	
+	Quit ProductIds
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductIdsMetMassaDichtheidVoorFrontPlaat">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProductIds As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
+	
+	Do ProductIds.SetAt(0.0001, "1028807") //NE !!!!!!!!!! aan te passen
+	Do ProductIds.SetAt(0.0001, "1039207") //NN !!!!!!!!!! aan te passen
+	Do ProductIds.SetAt(0.0001, "1039208") //ZY !!!!!!!!!! aan te passen
+	Do ProductIds.SetAt(0.00082, "1045782") //W
+	Do ProductIds.SetAt(0.00082, "1045795") //S
+	Do ProductIds.SetAt(0.00082, "1045803") //XG
+	Do ProductIds.SetAt(0.00082, "1045807") //E1
+	Do ProductIds.SetAt(0.00082, "1045832") //E2
+	Do ProductIds.SetAt(0.00082, "1045833") //N1
+	Do ProductIds.SetAt(0.00082, "1468765") //DA	
+	
+	Quit ProductIds
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxRugPlaatx20160914.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxRugPlaatx20160914.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxRugPlaatx20160914.cls.xml	(revision 36679)
@@ -0,0 +1,107 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxRugPlaatx20160914">
+<Super>vhDeploy.Maatwerk.SelectieKenmerk.Base</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update TAOR_PPS_RugPlaat met massadichtheid</Default>
+</Parameter>
+
+<Parameter name="SelectieKenmerk">
+<Type>%String</Type>
+<Default>TAOR_PPS_RugPlaat</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(..#SelectieKenmerk)
+		
+	#dim Service As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#dim MogelijkeWaardenManager As APPS.PM.Kenmerk.MogelijkeWaardenManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
+	#dim Lijst As APPS.PM.dto.Kenm.KenmerkMetadataList = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep("TAOR eigenschappen RugPlaat")
+	
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = $$$False
+	
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkKleur())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkDikte())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkMassaDichtheid())
+	
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..MaakRepository()
+	
+	Do ..RegistreerMogelijkeWaardenRepository(MogelijkeWaardenManager, "Kleur", "DOM.PM.enu.TAORLadeKleur")
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkKleur">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Kleur"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Tekst()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.NieuweWaardeToegelaten = $$$False
+	Set Kenmerk.SuggereerWaarden = $$$True
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 1
+	
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkDikte">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Dikte"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 2
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkMassaDichtheid">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Massadichtheid"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 3
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBodemPlaatx20160914.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBodemPlaatx20160914.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBodemPlaatx20160914.cls.xml	(revision 36679)
@@ -0,0 +1,107 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.PPS.TAORxPPSxBodemPlaatx20160914">
+<Super>vhDeploy.Maatwerk.SelectieKenmerk.Base</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update TAOR_PPS_BodemPlaat met massadichtheid</Default>
+</Parameter>
+
+<Parameter name="SelectieKenmerk">
+<Type>%String</Type>
+<Default>TAOR_PPS_BodemPlaat</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(..#SelectieKenmerk)
+		
+	#dim Service As APPS.PM.Kenmerk.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#dim MogelijkeWaardenManager As APPS.PM.Kenmerk.MogelijkeWaardenManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
+	#dim Lijst As APPS.PM.dto.Kenm.KenmerkMetadataList = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep("TAOR eigenschappen BodemPlaat")
+	
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = $$$False
+	
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkKleur())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkDikte())
+	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerkMassaDichtheid())
+	
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..MaakRepository()
+	
+	Do ..RegistreerMogelijkeWaardenRepository(MogelijkeWaardenManager, "Kleur", "DOM.PM.enu.TAORLadeKleur")
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkKleur">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Kleur"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Tekst()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.NieuweWaardeToegelaten = $$$False
+	Set Kenmerk.SuggereerWaarden = $$$True
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 1
+	
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkDikte">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Dikte"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 2
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkMassaDichtheid">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk()
+	
+	Set Kenmerk.Naam = "Massadichtheid"
+	Set Kenmerk.DataType = ##class(APPS.PM.enu.DataType).Getal()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.IsWijzigbaar = $$$True
+	Set Kenmerk.NieuweWaardeToegelaten = $$$True
+	Set Kenmerk.SuggereerWaarden = $$$False
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 3
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>