Index: vhDeploy/Maatwerk/LBX/SEL/LBXxLBXxDesignZijkantBuiten.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/LBX/SEL/LBXxLBXxDesignZijkantBuiten.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/LBX/SEL/LBXxLBXxDesignZijkantBuiten.cls.xml	(revision 68447)
@@ -0,0 +1,164 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.LBX.SEL.LBXxLBXxDesignZijkantBuiten">
+<Super>vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId("LBX_SEL_DesignZijkantBuiten")
+	
+	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 = 1
+	Set KenmerkGroep.Code = "LBX_SEL_DesignZijkantBuiten"
+	Set KenmerkGroep.Naam = "LBX selectie designzijkant buitenkant"
+	Set KenmerkGroep.IsAanwezigInViewerEditor = 1
+	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Datum"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.Naam = "GeldigVan"
+	Set Kenmerk.NieuweWaardeToegelaten = 1
+	Set Kenmerk.SuggereerWaarden = 0
+	Set Kenmerk.VeldBreedteInTekens = 15
+	Set Kenmerk.VolgNr = 1
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Datum"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 1
+	Set Kenmerk.Naam = "GeldigTot"
+	Set Kenmerk.NieuweWaardeToegelaten = 1
+	Set Kenmerk.SuggereerWaarden = 0
+	Set Kenmerk.VeldBreedteInTekens = 15
+	Set Kenmerk.VolgNr = 2
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Tekst"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 99
+	Set Kenmerk.Naam = "Klantbeperking"
+	Set Kenmerk.NieuweWaardeToegelaten = 1
+	Set Kenmerk.SuggereerWaarden = 0
+	Set Kenmerk.VeldBreedteInTekens = 15
+	Set Kenmerk.VolgNr = 3
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Getal"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 99
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	Set Kenmerk.Naam = "LadeDiepte"
+	Set Kenmerk.NieuweWaardeToegelaten = 0
+	Set Kenmerk.SuggereerWaarden = 1
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 4
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Tekst"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 99
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	Set Kenmerk.Naam = "LadeKleurBuiten"
+	Set Kenmerk.NieuweWaardeToegelaten = 0
+	Set Kenmerk.SuggereerWaarden = 1
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 5
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Tekst"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 99
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	Set Kenmerk.Naam = "LadeHoogte"
+	Set Kenmerk.NieuweWaardeToegelaten = 0
+	Set Kenmerk.SuggereerWaarden = 1
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 6
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Kenmerk = ##class(APPS.PM.dto.Kenm.KenmerkMetadata).%New()
+	Set Kenmerk.IsReadOnly = 0
+	Set Kenmerk.IsWijzigbaar = 0
+	Set Kenmerk.DataType = "Tekst"
+	Set Kenmerk.Multipliciteit = ##class(APPS.PM.dto.Kenm.Multipliciteit).%New()
+	Set Kenmerk.Multipliciteit.Minimum = 1
+	Set Kenmerk.Multipliciteit.Maximum = 99
+	Do Kenmerk.Mogelijkheden.Insert("Niet geconfigureerd")
+	Set Kenmerk.Naam = "LiRe"
+	Set Kenmerk.NieuweWaardeToegelaten = 0
+	Set Kenmerk.SuggereerWaarden = 1
+	Set Kenmerk.VeldBreedteInTekens = 10
+	Set Kenmerk.VolgNr = 7
+	Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
+	
+	Set Service = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	Do Service.BewaarKenmerkGroepMetadataLijst(Lijst)
+	
+	Do ..RegistreerRepository("LBX_SEL_DesignZijkantBuiten")
+
+	Do ..RegistreerMogelijkeWaardenRepository("LBX_SEL_DesignZijkantBuiten","LadeDiepte","DOM.PM.enu.LBXLadeDiepte")
+	Do ..RegistreerMogelijkeWaardenRepository("LBX_SEL_DesignZijkantBuiten","LadeKleurBuiten","DOM.PM.enu.LBXLadeKleurBuiten")
+	Do ..RegistreerMogelijkeWaardenRepository("LBX_SEL_DesignZijkantBuiten","LadeHoogte","DOM.PM.enu.LBXLadeHoogte")
+	Do ..RegistreerMogelijkeWaardenRepository("LBX_SEL_DesignZijkantBuiten","LiRe","DOM.PM.enu.LiRe")
+]]></Implementation>
+</Method>
+
+<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>
+</Class>
+
+
+</Export>