Index: vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxBase.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxBase.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxBase.cls.xml	(revision 74631)
@@ -0,0 +1,61 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxBase">
+<Abstract>1</Abstract>
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="RegistreerRepository">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>KenmerkGroepCode:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set RepositoryManager = ##class(APPS.PM.Kenmerk.RepositoryManager).%New()
+	If (RepositoryManager.HeeftRepository(KenmerkGroepCode))
+	{
+		Do RepositoryManager.VerwijderRepository(KenmerkGroepCode)
+	}
+	Do RepositoryManager.RegistreerRepository(##class(APPS.PM.Kenmerk.impl.DataDefinitieRepository).%New(KenmerkGroepCode))
+]]></Implementation>
+</Method>
+
+<Method name="RegistreerMogelijkeWaardenRepository">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>KenmerkGroepCode:%String,KenmerkNaam:%String,EnumeratieKlasseNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set MogelijkeWaardenManager = ##class(APPS.PM.Kenmerk.MogelijkeWaardenManager).%New()
+	If (MogelijkeWaardenManager.HeeftMogelijkeWaardenRepository(KenmerkGroepCode,KenmerkNaam))
+	{
+		Do MogelijkeWaardenManager.VerwijderMogelijkeWaardenRepository(MogelijkeWaardenManager.GeefMogelijkeWaardenRepository(KenmerkGroepCode,KenmerkNaam))
+	}
+	Do MogelijkeWaardenManager.RegistreerMogelijkeWaardenRepository(##class(APPS.PM.Kenmerk.impl.EnumWaardenRepository).%New(KenmerkGroepCode,KenmerkNaam,EnumeratieKlasseNaam))
+]]></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 = 16
+	Set Kenmerk.VolgNr = VolgNr
+	
+	Quit Kenmerk
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxPlaatmateriaal.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxPlaatmateriaal.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxPlaatmateriaal.cls.xml	(revision 74631)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxPlaatmateriaal">
+<Super>vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxBase,vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim KenmerkGroepCode As TECH.String = "RVG_PPS_Plaatmateriaal"
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata
+	#dim VolgNr As %Integer = 0
+	
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(KenmerkGroepCode)
+	
+	Set Lijst = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	
+	Set KenmerkGroep = ##class(APPS.PM.dto.Kenm.KenmerkGroepMetadata).%New()
+	Set KenmerkGroep.GeneratieTypeIsRelevant = 0
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = 0
+	Set KenmerkGroep.Code = KenmerkGroepCode
+	Set KenmerkGroep.Naam = "RVG eigenschappen plaatmateriaal"
+	Set KenmerkGroep.IsAanwezigInViewerEditor = 1
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("ImosProductId", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 99, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("Plaatdikte", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 99, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)		
+	
+	Set Service = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..RegistreerRepository(KenmerkGroepCode)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxKantenband.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxKantenband.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxKantenband.cls.xml	(revision 74631)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxKantenband">
+<Super>vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxBase,vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim KenmerkGroepCode As TECH.String = "RVG_PPS_Kantenband"
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata
+	#dim VolgNr As %Integer = 0
+	
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(KenmerkGroepCode)
+	
+	Set Lijst = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	
+	Set KenmerkGroep = ##class(APPS.PM.dto.Kenm.KenmerkGroepMetadata).%New()
+	Set KenmerkGroep.GeneratieTypeIsRelevant = 0
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = 0
+	Set KenmerkGroep.Code = KenmerkGroepCode
+	Set KenmerkGroep.Naam = "RVG eigenschappen kantenband"
+	Set KenmerkGroep.IsAanwezigInViewerEditor = 1
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("ImosProductId", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 99, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("Plaatdikte", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 99, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)		
+	
+	Set Service = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..RegistreerRepository(KenmerkGroepCode)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxRollen.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxRollen.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/RVG/PPS/RVGxPPSxRollen.cls.xml	(revision 74631)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxRollen">
+<Super>vhDeploy.Maatwerk.RVG.PPS.RVGxPPSxBase,vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim KenmerkGroepCode As TECH.String = "RVG_PPS_Rollen"
+	#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata
+	#dim VolgNr As %Integer = 0
+	
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(KenmerkGroepCode)
+	
+	Set Lijst = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
+	
+	Set KenmerkGroep = ##class(APPS.PM.dto.Kenm.KenmerkGroepMetadata).%New()
+	Set KenmerkGroep.GeneratieTypeIsRelevant = 0
+	Set KenmerkGroep.MultipleKenmerkenSetsToegelaten = 0
+	Set KenmerkGroep.Code = KenmerkGroepCode
+	Set KenmerkGroep.Naam = "RVG rollen"
+	Set KenmerkGroep.IsAanwezigInViewerEditor = 1
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("Rolnaam", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 1, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ..GeefKenmerkMetadata("Links/Rechts", $$$True, ##class(APPS.PM.enu.DataType).Tekst(), 1, 1, $$$True, $Increment(VolgNr))
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)		
+	
+	Set Service = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..RegistreerRepository(KenmerkGroepCode)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>