Index: APPS/PM/Maatwerk/MaatwerkModel/impl/KenmerkGroepMaker.cls.xml
===================================================================
diff -u -r31906 -r64110
--- APPS/PM/Maatwerk/MaatwerkModel/impl/KenmerkGroepMaker.cls.xml	(.../KenmerkGroepMaker.cls.xml)	(revision 31906)
+++ APPS/PM/Maatwerk/MaatwerkModel/impl/KenmerkGroepMaker.cls.xml	(.../KenmerkGroepMaker.cls.xml)	(revision 64110)
@@ -77,33 +77,7 @@
 <Implementation><![CDATA[
 	#dim InfoVoorHalffabCreatieList As %ListOfObjects
 	
-	If $$$Not(Rol.SelectieKenmerken.Count() = 0) {
-		Set InfoVoorHalffabCreatieList = ..MaakKenmerkGroepVoorRol(Rol)
-	} Else {
-		Set InfoVoorHalffabCreatieList = ##class(%ListOfObjects).%New()
-		
-		If (Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()) {
-			Write "Selectiekenmerkgroep aanmaken voor ", ..Model.ExterneNaam, " ", Rol.Naam, !
-			
-			#dim SelectieGroep As %String = ..Model.MaatwerkTypeCode _ "_SEL_" _ Rol.Naam
-			#dim SelectieGroepNaam As %String = ..Model.MaatwerkTypeCode _ " selectie " _ Rol.Naam
-			#dim Lijst As APPS.PM.dto.Kenm.KenmerkMetadataList = ##class(APPS.PM.dto.Kenm.KenmerkMetadataList).%New()
-			
-			Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(SelectieGroep)
-
-			#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep(SelectieGroep, SelectieGroepNaam)
-
-			Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
-			
-			#dim VolgNr As %Integer = KenmerkGroep.Kenmerken.Count() + 1
-			#dim Kenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefToegevoegdLiReKenmerk(VolgNr, SelectieGroep)
-
-			Do KenmerkGroep.Kenmerken.Insert(Kenmerk)
-			Do InfoVoorHalffabCreatieList.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.impl.InfoVoorHalffabCreatie).%New(Kenmerk.Naam, "DOM.PM.enu.LiRe", $$$True, $$$True))
-					
-			Do ..BewaarSelectieGroep(Lijst, SelectieGroep)
-		}
-	}
+	Set InfoVoorHalffabCreatieList = ..MaakKenmerkGroepVoorRol(Rol)
 	
 	Do:(GenereerHalffab) ..MaakHalffabKlasseVoorRol(Rol, InfoVoorHalffabCreatieList)
 ]]></Implementation>
@@ -193,46 +167,47 @@
 	
 	Do ##class(Prod.Kenmerk.MetaGroep).%DeleteId(SelectieGroep)
 	
-	#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep(SelectieGroep, SelectieGroepNaam)
-	
-	Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
+	If $$$Not(Rol.BuilderType.%ClassName(1) = "APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderTypeZonderSelectiekenmerk") {
+		#dim KenmerkGroep As APPS.PM.dto.Kenm.KenmerkGroepMetadata = ..GeefKenmerkGroep(SelectieGroep, SelectieGroepNaam)
+		
+		Do Lijst.KenmerkGroepen.Insert(KenmerkGroep)
 
-	// Vaste kenmerken toevoegen
-	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("GeldigVan", ##class(APPS.PM.enu.DataType).Datum(), 1, 0, 1, 15, $$$False, $$$False, $$$True, $$$False))
-	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("GeldigTot", ##class(APPS.PM.enu.DataType).Datum(), 2, 0, 1, 15, $$$False, $$$False, $$$True, $$$False))
-	Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("Klantbeperking", ##class(APPS.PM.enu.DataType).Tekst(), 3, 0, 99, 15, $$$False, $$$False, $$$True, $$$False))
-	
-	If (Rol.BuilderType.%Extends("APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType")) {
-		#dim KenmerkBewerkbaarOp As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk("BewerkbaarOp", ##class(APPS.PM.enu.DataType).Tekst(), 4, 0, 99, 10, $$$False, $$$False, $$$False, $$$True)
+		// Vaste kenmerken toevoegen
+		Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("GeldigVan", ##class(APPS.PM.enu.DataType).Datum(), 1, 0, 1, 15, $$$False, $$$False, $$$True, $$$False))
+		Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("GeldigTot", ##class(APPS.PM.enu.DataType).Datum(), 2, 0, 1, 15, $$$False, $$$False, $$$True, $$$False))
+		Do KenmerkGroep.Kenmerken.Insert(..GeefKenmerk("Klantbeperking", ##class(APPS.PM.enu.DataType).Tekst(), 3, 0, 99, 15, $$$False, $$$False, $$$True, $$$False))
 		
-		Do Resultaat.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.impl.InfoVoorHalffabCreatie).%New(KenmerkBewerkbaarOp.Naam, "%String", 1))
+		If (Rol.BuilderType.%Extends("APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType")) {
+			#dim KenmerkBewerkbaarOp As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefKenmerk("BewerkbaarOp", ##class(APPS.PM.enu.DataType).Tekst(), 4, 0, 99, 10, $$$False, $$$False, $$$False, $$$True)
+			
+			Do Resultaat.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.impl.InfoVoorHalffabCreatie).%New(KenmerkBewerkbaarOp.Naam, "%String", 1))
 
-		#dim Iterator As TECH.Iterator = Rol.BuilderType.GeefBewerkingDimensiesIterator()
+			#dim Iterator As TECH.Iterator = Rol.BuilderType.GeefBewerkingDimensiesIterator()
+			
+			While (Iterator.HasNext()) {
+				Do Iterator.Next()
+				Do KenmerkBewerkbaarOp.Mogelijkheden.Insert(Iterator.Key())
+			}
+			
+			Do KenmerkGroep.Kenmerken.Insert(KenmerkBewerkbaarOp)
+		}
+
+		// Rest van de selectiekenmerken toevoegen
+		Set Visitor = ##class(APPS.PM.Maatwerk.MaatwerkModel.impl.VoegToeAanGroepSelectieKenmerkVisitor).%New(KenmerkGroep, Resultaat)
+		Do Rol.AcceptSelectieKenmerkVisitor(Visitor)
 		
-		While (Iterator.HasNext()) {
-			Do Iterator.Next()
-			Do KenmerkBewerkbaarOp.Mogelijkheden.Insert(Iterator.Key())
+		// Eventueel LiRe toevoegen
+		If (Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()) {
+			#dim VolgNr As %Integer = KenmerkGroep.Kenmerken.Count() + 1
+			#dim LiReKenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefToegevoegdLiReKenmerk(VolgNr, SelectieGroep)
+			
+			Do KenmerkGroep.Kenmerken.Insert(LiReKenmerk)
+			Do Resultaat.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.impl.InfoVoorHalffabCreatie).%New(LiReKenmerk.Naam, "DOM.PM.enu.LiRe", $$$True, $$$True))
 		}
 		
-		Do KenmerkGroep.Kenmerken.Insert(KenmerkBewerkbaarOp)
+		// Bewaren
+		Do ..BewaarSelectieGroep(Lijst, SelectieGroep)
 	}
-
-	// Rest van de selectiekenmerken toevoegen
-	Set Visitor = ##class(APPS.PM.Maatwerk.MaatwerkModel.impl.VoegToeAanGroepSelectieKenmerkVisitor).%New(KenmerkGroep, Resultaat)
-	Do Rol.AcceptSelectieKenmerkVisitor(Visitor)
-	
-	// Eventueel LiRe toevoegen
-	If (Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()) {
-		#dim VolgNr As %Integer = KenmerkGroep.Kenmerken.Count() + 1
-		#dim LiReKenmerk As APPS.PM.dto.Kenm.KenmerkMetadata = ..GeefToegevoegdLiReKenmerk(VolgNr, SelectieGroep)
-		
-		Do KenmerkGroep.Kenmerken.Insert(LiReKenmerk)
-		Do Resultaat.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.impl.InfoVoorHalffabCreatie).%New(LiReKenmerk.Naam, "DOM.PM.enu.LiRe", $$$True, $$$True))
-	}
-	
-	// Bewaren
-	Do ..BewaarSelectieGroep(Lijst, SelectieGroep)
-	
 	Quit Resultaat
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/dto/StandaardBuilderTypeZonderSelectiekenmerk.cls.xml
===================================================================
diff -u
--- APPS/PM/Maatwerk/MaatwerkModel/dto/StandaardBuilderTypeZonderSelectiekenmerk.cls.xml	(revision 0)
+++ APPS/PM/Maatwerk/MaatwerkModel/dto/StandaardBuilderTypeZonderSelectiekenmerk.cls.xml	(revision 64110)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderTypeZonderSelectiekenmerk">
+<Description>
+</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.PM.Maatwerk.MaatwerkModel.dto.BuilderType</Super>
+
+<Method name="Accept">
+<Description>
+</Description>
+<FormalSpec>Visitor:APPS.PM.Maatwerk.MaatwerkModel.BuilderTypeVisitor</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[		Do Visitor.VerwerkStandaardBuildTypeZonderSelectiekenmerk(##this)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/PM/Maatwerk/MaatwerkModel/impl/MaakBuilderVisitor.cls.xml
===================================================================
diff -u -r62419 -r64110
--- APPS/PM/Maatwerk/MaatwerkModel/impl/MaakBuilderVisitor.cls.xml	(.../MaakBuilderVisitor.cls.xml)	(revision 62419)
+++ APPS/PM/Maatwerk/MaatwerkModel/impl/MaakBuilderVisitor.cls.xml	(.../MaakBuilderVisitor.cls.xml)	(revision 64110)
@@ -109,6 +109,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkStandaardBuildTypeZonderSelectiekenmerk">
+<FormalSpec>BuilderType:APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderTypeZonderSelectiekenmerk</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Do ..VerwerkStandaardBuildType(BuilderType)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkStandaardOfBewerktBuildType">
 <Description>
 </Description>