Index: vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBase.cls.xml
===================================================================
diff -u -r29059 -r68582
--- vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBase.cls.xml	(.../TAORxPPSxBase.cls.xml)	(revision 29059)
+++ vhDeploy/Maatwerk/TAOR/PPS/TAORxPPSxBase.cls.xml	(.../TAORxPPSxBase.cls.xml)	(revision 68582)
@@ -31,6 +31,31 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKenmerkMetadata">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Naam:TECH.String,IsWijzigbaar:%Boolean,DataType:APPS.PM.enu.DataType,MultipliciteitMinimum:%Integer,MultipliciteitMaximum:%Integer,NieuweWaardeToegelaten:%Boolean,VolgNr:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.KenmerkMetadata</ReturnType>
+<Implementation><![CDATA[
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+
+	Set Kenmerk.Naam = Naam
+	Set Kenmerk.IsReadOnly = $$$False
+	Set Kenmerk.IsWijzigbaar = IsWijzigbaar
+	Set Kenmerk.DataType = DataType
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = MultipliciteitMinimum
+	Set Kenmerk.Multipliciteit.Maximum = MultipliciteitMaximum
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	Set Kenmerk.NieuweWaardeToegelaten = NieuweWaardeToegelaten
+	Set Kenmerk.SuggereerWaarden = $$$True
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = VolgNr
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+
 <Method name="GeefKenmerkDikte">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>VolgNr:%Integer</FormalSpec>