Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSynchronisatieStang.cls.xml
===================================================================
diff -u -r32105 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSynchronisatieStang.cls.xml	(.../TiponBlumotionSynchronisatieStang.cls.xml)	(revision 32105)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSynchronisatieStang.cls.xml	(.../TiponBlumotionSynchronisatieStang.cls.xml)	(revision 45856)
@@ -29,7 +29,7 @@
 	#dim BewerkingInfo As APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	
 	Set BewerkingInfo.Aftrek = 267
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rol.cls.xml
===================================================================
diff -u -r32079 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rol.cls.xml	(.../Rol.cls.xml)	(revision 32079)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rol.cls.xml	(.../Rol.cls.xml)	(revision 45856)
@@ -2,33 +2,21 @@
 <Export generator="Cache" version="24">
 <Class name="APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rol">
 <Abstract>1</Abstract>
-<Super>DOM.PM.Maatwerk.TAX.impl.Base</Super>
+<Super>DOM.PM.Maatwerk.TAX.impl.Base,APPS.PM.Maatwerk.MaatwerkModel.Modellen.Rol</Super>
 
-<Property name="TaorboxModel">
-<Type>APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="ItemProcessorType">
 <Type>APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType.AutoComplete</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>TaorboxModel:APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel</FormalSpec>
+<FormalSpec>Model:APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-	Set ..TaorboxModel = TaorboxModel
-	Quit $$$OK
+<Implementation><![CDATA[	Quit ##class(APPS.PM.Maatwerk.MaatwerkModel.Modellen.Rol)##this.%OnNew(Model)
 ]]></Implementation>
 </Method>
-
-<Method name="GeefRol">
-<Abstract>1</Abstract>
-<ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.Rol</ReturnType>
-</Method>
 </Class>
 
 
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugPlaat.cls.xml
===================================================================
diff -u -r33736 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugPlaat.cls.xml	(.../RugPlaat.cls.xml)	(revision 33736)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugPlaat.cls.xml	(.../RugPlaat.cls.xml)	(revision 45856)
@@ -14,10 +14,10 @@
 
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
 	Set Rol.ProductieDocTemplate = "{Rol}, {EXPR:##class(DOM.PM.enu.TAORPlaatAfwerking).LogicalToDisplay(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler).%New().GeefPlaatAfwerking(..LadeKleur))}, {LadeKleur}"	
 	
-	Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Rug())
+	Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Rug())
 	
 	Quit Rol
 ]]></Implementation>
@@ -31,7 +31,7 @@
 	#dim BewerkingInfo As APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	
 	Set BewerkingInfo.Aftrek = Aftrek
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(KenmerkNaam)
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(KenmerkNaam)
 	
 	Quit BewerkingInfo
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Zijstabilisering.cls.xml
===================================================================
diff -u -r31552 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Zijstabilisering.cls.xml	(.../Zijstabilisering.cls.xml)	(revision 31552)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Zijstabilisering.cls.xml	(.../Zijstabilisering.cls.xml)	(revision 45856)
@@ -12,9 +12,9 @@
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	Set Rol.ProductieDocTemplate = "{Rol}, {GlijderType}, {Uittrekbaarheid}"
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
 	Do Rol.Condities.Insert(..GeefZijstabiliseringConditie())
 
 	Quit Rol
@@ -40,7 +40,7 @@
 	#dim BewerkingInfo As APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 
 	Set BewerkingInfo.Aftrek = 315
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	
 	Quit BewerkingInfo
 ]]></Implementation>
@@ -52,7 +52,7 @@
 <Implementation><![CDATA[
 	#dim HeeftZijstabiliseringConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie).%New()
 	
-	Set HeeftZijstabiliseringConditie.BooleanIngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.HeeftZijstabilisering)
+	Set HeeftZijstabiliseringConditie.BooleanIngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.HeeftZijstabilisering)
 	
 	Quit HeeftZijstabiliseringConditie
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/impl/MaatwerkModelBase.cls.xml
===================================================================
diff -u -r30873 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/impl/MaatwerkModelBase.cls.xml	(.../MaatwerkModelBase.cls.xml)	(revision 30873)
+++ APPS/PM/Maatwerk/MaatwerkModel/impl/MaatwerkModelBase.cls.xml	(.../MaatwerkModelBase.cls.xml)	(revision 45856)
@@ -293,7 +293,7 @@
 </Method>
 
 <Method name="VoegToeRol">
-<FormalSpec>Rol:APPS.PM.Maatwerk.MaatwerkModel.Modellen.TaorboxModel.Rol</FormalSpec>
+<FormalSpec>Rol:APPS.PM.Maatwerk.MaatwerkModel.Modellen.Rol</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	If $IsObject(Rol) {
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Tipon.cls.xml
===================================================================
diff -u -r31552 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Tipon.cls.xml	(.../Tipon.cls.xml)	(revision 31552)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Tipon.cls.xml	(.../Tipon.cls.xml)	(revision 45856)
@@ -12,9 +12,9 @@
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()
 	Set Rol.ProductieDocTemplate = "{Rol}, {GlijderType}, {Draagkracht}kg, {Uittrekbaarheid}"
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
 	Do Rol.Condities.Insert(..GeefTiponConditie())
 	
 	Quit Rol
@@ -28,11 +28,11 @@
 	#dim IsGeleiderTechnologieTiponConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	#dim IsTandemGeleiderConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set IsGeleiderTechnologieTiponConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
+	Set IsGeleiderTechnologieTiponConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
 	Set IsGeleiderTechnologieTiponConditie.Operator = "="
 	Set IsGeleiderTechnologieTiponConditie.Waarde = """" _ ..Enum.GeleiderTechnologie.TIPON _ """"
 	
-	Set IsTandemGeleiderConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType)
+	Set IsTandemGeleiderConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType)
 	Set IsTandemGeleiderConditie.Operator = "="
 	Set IsTandemGeleiderConditie.Waarde = """" _ ..Enum.GlijderType.Tandem _ """"
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/AfdekkapBoven.cls.xml
===================================================================
diff -u -r29766 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/AfdekkapBoven.cls.xml	(.../AfdekkapBoven.cls.xml)	(revision 29766)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/AfdekkapBoven.cls.xml	(.../AfdekkapBoven.cls.xml)	(revision 45856)
@@ -11,8 +11,8 @@
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("AfdekkapBovenKleur"))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("VerpakkingType"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("AfdekkapBovenKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("VerpakkingType"))
 	
 	Do Rol.Condities.Insert(..GeefAfdekkapBovenConditie())
 	
@@ -40,7 +40,7 @@
 <Implementation><![CDATA[
 	#Dim VerpakkingTypeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set VerpakkingTypeConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("VerpakkingType")
+	Set VerpakkingTypeConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("VerpakkingType")
 	Set VerpakkingTypeConditie.Operator = "'="
 	Set VerpakkingTypeConditie.Waarde = Waarde
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestiging.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestiging.cls.xml	(.../FrontBevestiging.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestiging.cls.xml	(.../FrontBevestiging.cls.xml)	(revision 45856)
@@ -9,8 +9,8 @@
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("FrontBevestiging", "Frontbevestiging")
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("FrontBevestiging"))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("FrontBevestiging"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukking.cls.xml
===================================================================
diff -u -r33837 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukking.cls.xml	(.../ZijkantBestukking.cls.xml)	(revision 33837)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukking.cls.xml	(.../ZijkantBestukking.cls.xml)	(revision 45856)
@@ -12,7 +12,7 @@
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).MinstensEen()   ; De specifieke HFItemProcessor nog aanduiden, na het genereren van de HFZijkant-builder. 
 	Set Rol.ProductieDocTemplate = "{Rol}, {PPS:TAOR:OnderdeelNaam}{PPS:TAOR:Hoogte:o:, }"
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.RugHoogte))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.RugHoogte))
 	Do Rol.SelectieKenmerken.Insert(..GeefSelectieKenmerkAantalNodig())
 	
 	Quit Rol
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestigingSchroef.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestigingSchroef.cls.xml	(.../FrontBevestigingSchroef.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontBevestigingSchroef.cls.xml	(.../FrontBevestigingSchroef.cls.xml)	(revision 45856)
@@ -10,7 +10,7 @@
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.SpecifiekProductBuilderType).%New(1071984)
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	Do Rol.Condities.Insert(..GeefFrontBevestigingSchroefSchroefConditie())
-	; ?  Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Front())
+	; ?  Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Front())
 	Set Rol.ProductieDocTemplate = "{Rol}"
 	Quit Rol
 ]]></Implementation>
@@ -20,7 +20,7 @@
 <Private>1</Private>
 <ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.RolConditie</ReturnType>
 <Implementation><![CDATA[
-	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..TaorboxModel.GeefBinnenladeConditie()
+	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..Model.GeefBinnenladeConditie()
 	Set BestaatFrontBevestigingConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.RolBestaatConditie).%New("FrontBevestiging")
 	Quit ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.EnConditie).%New(BinnenladeConditie,BestaatFrontBevestigingConditie)
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotion/Base.cls.xml
===================================================================
diff -u -r32099 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotion/Base.cls.xml	(.../Base.cls.xml)	(revision 32099)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotion/Base.cls.xml	(.../Base.cls.xml)	(revision 45856)
@@ -10,7 +10,7 @@
 <Implementation><![CDATA[
 	#dim TiponBlumotionConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set TiponBlumotionConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
+	Set TiponBlumotionConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
 	Set TiponBlumotionConditie.Operator = "="
 	Set TiponBlumotionConditie.Waarde = """" _ ..Enum.GeleiderTechnologie.TIPONBLUMOTION _ """"
 	
@@ -24,7 +24,7 @@
 <Implementation><![CDATA[
 	#dim GlijderTypeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set GlijderTypeConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType)
+	Set GlijderTypeConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType)
 	Set GlijderTypeConditie.Operator = "="
 	Set GlijderTypeConditie.Waarde = """" _ ..Enum.GlijderType.Movento _ """"
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Opvullijst.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Opvullijst.cls.xml	(.../Opvullijst.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Opvullijst.cls.xml	(.../Opvullijst.cls.xml)	(revision 45856)
@@ -10,11 +10,11 @@
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New()
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 0
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("LadeDiepte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("LadeDiepte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("OpvullijstKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("OpvullijstKleur"))
 	Do Rol.Condities.Insert(..GeefOpvullijstConditie())
 
 	Quit Rol
@@ -26,10 +26,10 @@
 <ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.RolConditie</ReturnType>
 <Implementation><![CDATA[
 	Set HeeftOpvullijstLinksConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie).%New()
-	Set HeeftOpvullijstLinksConditie.BooleanIngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("HeeftOpvullijstLinks")
+	Set HeeftOpvullijstLinksConditie.BooleanIngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("HeeftOpvullijstLinks")
 
 	Set HeeftOpvullijstRechtsConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie).%New()
-	Set HeeftOpvullijstRechtsConditie.BooleanIngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("HeeftOpvullijstRechts")
+	Set HeeftOpvullijstRechtsConditie.BooleanIngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("HeeftOpvullijstRechts")
 	
 	Quit ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.OfConditie).%New(HeeftOpvullijstLinksConditie,HeeftOpvullijstRechtsConditie)
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieStang.cls.xml
===================================================================
diff -u -r31552 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieStang.cls.xml	(.../TiponSynchronisatieStang.cls.xml)	(revision 31552)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieStang.cls.xml	(.../TiponSynchronisatieStang.cls.xml)	(revision 45856)
@@ -10,7 +10,7 @@
 	
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New()
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
 	Do Rol.Condities.Insert(..GeefGeleiderTechnologieConditie())
 	Do Rol.Condities.Insert(..GeefInterneBreedteConditie())
 	
@@ -24,7 +24,7 @@
 <Implementation><![CDATA[
 	#dim IsGeleiderTechnologieTiponConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set IsGeleiderTechnologieTiponConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
+	Set IsGeleiderTechnologieTiponConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie)
 	Set IsGeleiderTechnologieTiponConditie.Operator = "="
 	Set IsGeleiderTechnologieTiponConditie.Waarde = """" _ ..Enum.GeleiderTechnologie.TIPON _ """"
 	
@@ -38,7 +38,7 @@
 <Implementation><![CDATA[
 	#dim InterneBreedteConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set InterneBreedteConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set InterneBreedteConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	Set InterneBreedteConditie.Operator = ">="
 	Set InterneBreedteConditie.Waarde = 560
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemPlaat.cls.xml
===================================================================
diff -u -r29838 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemPlaat.cls.xml	(.../BodemPlaat.cls.xml)	(revision 29838)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemPlaat.cls.xml	(.../BodemPlaat.cls.xml)	(revision 45856)
@@ -10,17 +10,17 @@
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New()
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 32
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 20
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("LadeDiepte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("LadeDiepte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Breedte())
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
 	Set Rol.ProductieDocTemplate = "{Rol}, {EXPR:##class(DOM.PM.enu.TAORPlaatAfwerking).LogicalToDisplay(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler).%New().GeefPlaatAfwerking(..LadeKleur))}, {LadeKleur}"	
-	Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Bodem())
+	Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Bodem())
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KantenBand.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KantenBand.cls.xml	(.../KantenBand.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KantenBand.cls.xml	(.../KantenBand.cls.xml)	(revision 45856)
@@ -10,11 +10,11 @@
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New()
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 0
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukkingVooraan.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukkingVooraan.cls.xml	(.../ZijkantBestukkingVooraan.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantBestukkingVooraan.cls.xml	(.../ZijkantBestukkingVooraan.cls.xml)	(revision 45856)
@@ -9,7 +9,7 @@
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("ZijkantBestukkingVooraan", "Zijkantbestukking vooraan")
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).MinstensEen()   ; De specifieke HFItemProcessor nog aanduiden, na het genereren van de HFZijkant-builder. 
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
 	Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("AantalNodig","%Integer",##class(APPS.PM.enu.DataType).Tekst()))
 	Set Rol.ProductieDocTemplate = "{Rol}, {PPS:TAOR:OnderdeelNaam}{PPS:TAOR:Hoogte:o:, }"
 	Quit Rol
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouder.cls.xml
===================================================================
diff -u -r33996 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouder.cls.xml	(.../RugWandHouder.cls.xml)	(revision 33996)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouder.cls.xml	(.../RugWandHouder.cls.xml)	(revision 45856)
@@ -11,7 +11,7 @@
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("RugHoogte"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("RugHoogte"))
 	
 	#dim ConditieV1 As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ..GeefVerpakkingTypeConditie(..Enum.VerpakkingType.V1)
 	#dim ConditieProbox As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ..GeefVerpakkingTypeConditie(..Enum.VerpakkingType.Probox)
@@ -30,7 +30,7 @@
 <Implementation><![CDATA[
 	#dim VerpakkingTypeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set VerpakkingTypeConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.VerpakkingType)
+	Set VerpakkingTypeConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.VerpakkingType)
 	Set VerpakkingTypeConditie.Operator = "="
 	Set VerpakkingTypeConditie.Waarde = $$$TussenQuotes(VerpakkingType)
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieTandwiel.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieTandwiel.cls.xml	(.../TiponSynchronisatieTandwiel.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponSynchronisatieTandwiel.cls.xml	(.../TiponSynchronisatieTandwiel.cls.xml)	(revision 45856)
@@ -9,7 +9,7 @@
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("TiponSynchronisatieTandwiel", "Synchronisatieset TIP-ON")
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("GlijderType"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("GlijderType"))
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Glijder.cls.xml
===================================================================
diff -u -r31526 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Glijder.cls.xml	(.../Glijder.cls.xml)	(revision 31526)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Glijder.cls.xml	(.../Glijder.cls.xml)	(revision 45856)
@@ -12,11 +12,11 @@
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	Set Rol.ProductieDocTemplate = "{Rol}, {GlijderType}, {LadeDiepte}mm, {Draagkracht}kg, {Uittrekbaarheid}"
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeDiepte))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeDiepte))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Uittrekbaarheid))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
 	
 	Quit Rol
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantPlaat.cls.xml
===================================================================
diff -u -r30431 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantPlaat.cls.xml	(.../ZijkantPlaat.cls.xml)	(revision 30431)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/ZijkantPlaat.cls.xml	(.../ZijkantPlaat.cls.xml)	(revision 45856)
@@ -15,7 +15,7 @@
 	set Rol.BuilderType = BuilderType
 	set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	
-	do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeKleur))
+	do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeKleur))
 	
 	set Rol.ProductieDocTemplate = "{Rol}, {EXPR:##class(DOM.PM.enu.TAORPlaatAfwerking).LogicalToDisplay(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler).%New().GeefPlaatAfwerking(..LadeKleur))}, {LadeKleur}"
 	
@@ -31,7 +31,7 @@
 	#dim BewerkingInfo As APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	
 	set BewerkingInfo.Aftrek = Aftrek
-	set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(KenmerkNaam)
+	set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(KenmerkNaam)
 	
 	quit BewerkingInfo
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Koppeling.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Koppeling.cls.xml	(.../Koppeling.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/Koppeling.cls.xml	(.../Koppeling.cls.xml)	(revision 45856)
@@ -10,8 +10,8 @@
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("GlijderType"))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("KoppelingType"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("GlijderType"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("KoppelingType"))
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemOndersteuning.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemOndersteuning.cls.xml	(.../BodemOndersteuning.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/BodemOndersteuning.cls.xml	(.../BodemOndersteuning.cls.xml)	(revision 45856)
@@ -9,7 +9,7 @@
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("BodemOndersteuning", "Bodemondersteuning")
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeDiepte"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeDiepte"))
 	Set Rol.ProductieDocTemplate = "{Rol}, {LadeDiepte}mm"
 	Quit Rol
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouderSchroef.cls.xml
===================================================================
diff -u -r29838 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouderSchroef.cls.xml	(.../RugWandHouderSchroef.cls.xml)	(revision 29838)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/RugWandHouderSchroef.cls.xml	(.../RugWandHouderSchroef.cls.xml)	(revision 45856)
@@ -10,7 +10,7 @@
 	Set Rol.BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.SpecifiekProductBuilderType).%New(681563)
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	Do Rol.Condities.Insert(..GeefRugWandHouderSchroefConditie())
-	Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Rug())
+	Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, ##class(DOM.PM.enu.TAORProductieWijze).Rug())
 	Set Rol.ProductieDocTemplate = "{Rol}"
 	Quit Rol
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/SetRugWandHouders.cls.xml
===================================================================
diff -u -r33993 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/SetRugWandHouders.cls.xml	(.../SetRugWandHouders.cls.xml)	(revision 33993)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/SetRugWandHouders.cls.xml	(.../SetRugWandHouders.cls.xml)	(revision 45856)
@@ -23,7 +23,7 @@
 <Implementation><![CDATA[
 	#dim VerpakkingTypeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set VerpakkingTypeConditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.VerpakkingType)
+	Set VerpakkingTypeConditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.VerpakkingType)
 	Set VerpakkingTypeConditie.Operator = "="
 	Set VerpakkingTypeConditie.Waarde = $$$TussenQuotes(..Enum.VerpakkingType.FlatpackV1)
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingSchroef.cls.xml
===================================================================
diff -u -r32414 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingSchroef.cls.xml	(.../KoppelingSchroef.cls.xml)	(revision 32414)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/KoppelingSchroef.cls.xml	(.../KoppelingSchroef.cls.xml)	(revision 45856)
@@ -30,7 +30,7 @@
 <Implementation><![CDATA[
 	#dim Conditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkWaardeConditie).%New()
 	
-	Set Conditie.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("KoppelingType")
+	Set Conditie.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("KoppelingType")
 	Set Conditie.Operator = "="
 	Set Conditie.Waarde = "##class(DOM.PM.enu.TAORKoppelingType).Schroef()"
 	
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/Rol.cls.xml
===================================================================
diff -u
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/Rol.cls.xml	(revision 0)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/Rol.cls.xml	(revision 45856)
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.PM.Maatwerk.MaatwerkModel.Modellen.Rol">
+<Abstract>1</Abstract>
+<Super>DOM.PM.Maatwerk.Lade.impl.Base</Super>
+
+<Property name="Model">
+<Type>APPS.PM.Maatwerk.MaatwerkModel.impl.MaatwerkModelBase</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Model:APPS.PM.Maatwerk.MaatwerkModel.impl.MaatwerkModelBase</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..Model = Model
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefRol">
+<Abstract>1</Abstract>
+<ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.Rol</ReturnType>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSetEenhedenEnMeenemers.cls.xml
===================================================================
diff -u -r32402 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSetEenhedenEnMeenemers.cls.xml	(.../TiponBlumotionSetEenhedenEnMeenemers.cls.xml)	(revision 32402)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/TiponBlumotionSetEenhedenEnMeenemers.cls.xml	(.../TiponBlumotionSetEenhedenEnMeenemers.cls.xml)	(revision 45856)
@@ -14,9 +14,9 @@
 	
 	Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("InterneBreedteMin", "%Integer", ##class(APPS.PM.enu.DataType).Getal()))
 	Do Rol.SelectieKenmerken.Insert(##class(APPS.PM.Maatwerk.MaatwerkModel.dto.InfoVoorBuilderSelectiekenmerk).%New("InterneBreedteMax", "%Integer", ##class(APPS.PM.enu.DataType).Getal()))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeHoogte))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeDiepte))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeHoogte))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.LadeDiepte))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.Draagkracht))
 	
 	Do Rol.Condities.Insert(..GeefTiponBlumotionConditie())
 	Do Rol.Condities.Insert(..GeefGlijderTypeConditie())
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/DiepteVerstelling.cls.xml
===================================================================
diff -u -r31552 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/DiepteVerstelling.cls.xml	(.../DiepteVerstelling.cls.xml)	(revision 31552)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/DiepteVerstelling.cls.xml	(.../DiepteVerstelling.cls.xml)	(revision 45856)
@@ -12,8 +12,8 @@
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
 	Set Rol.ProductieDocTemplate = "{Rol}, {GlijderType}"
 	
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GlijderType))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.GeleiderTechnologie))
 	Do Rol.Condities.Insert(..GeefDiepteVerstellingConditie())
 
 	Quit Rol
@@ -26,7 +26,7 @@
 <Implementation><![CDATA[
 	#dim HeeftDiepteVerstellingConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie).%New()
 	
-	Set HeeftDiepteVerstellingConditie.BooleanIngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.HeeftDiepteVerstelling)
+	Set HeeftDiepteVerstellingConditie.BooleanIngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam(..Enum.KenmerkNaam.HeeftDiepteVerstelling)
 	
 	Quit HeeftDiepteVerstellingConditie
 ]]></Implementation>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontEindkap.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontEindkap.cls.xml	(.../FrontEindkap.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontEindkap.cls.xml	(.../FrontEindkap.cls.xml)	(revision 45856)
@@ -6,17 +6,17 @@
 <Method name="GeefRol">
 <ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.Rol</ReturnType>
 <Implementation><![CDATA[
-	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..TaorboxModel.GeefBinnenladeConditie()
+	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..Model.GeefBinnenladeConditie()
 
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("FrontEindkap","Front-eindkap")
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.StandaardBuilderType).%New()
 	Set BuilderType.AantalItems = 1
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).LinksRechts()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("FrontEindkapKleur"))
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("FrontEindkapKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeHoogte"))
 	Do Rol.Condities.Insert(BinnenladeConditie)
-	Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, "F")
+	Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, "F")
 	Quit Rol
 ]]></Implementation>
 </Method>
Index: APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontPlaat.cls.xml
===================================================================
diff -u -r29059 -r45856
--- APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontPlaat.cls.xml	(.../FrontPlaat.cls.xml)	(revision 29059)
+++ APPS/PM/Maatwerk/MaatwerkModel/Modellen/TaorboxModel/Rollen/FrontPlaat.cls.xml	(.../FrontPlaat.cls.xml)	(revision 45856)
@@ -6,26 +6,26 @@
 <Method name="GeefRol">
 <ReturnType>APPS.PM.Maatwerk.MaatwerkModel.dto.Rol</ReturnType>
 <Implementation><![CDATA[
-	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..TaorboxModel.GeefBinnenladeConditie()
+	#dim BinnenladeConditie As APPS.PM.Maatwerk.MaatwerkModel.dto.IngegevenKenmerkBooleanConditie = ..Model.GeefBinnenladeConditie()
 
 	Set Rol = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.Rol).%New("FrontPlaat","Frontplaat")
 	Set BuilderType = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerktBuilderType).%New()
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 15
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("InterneBreedte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("InterneBreedte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Lengte())
 
 	Set BewerkingInfo = ##class(APPS.PM.Maatwerk.MaatwerkModel.dto.BewerkingInfo).%New()
 	Set BewerkingInfo.Aftrek = 0
-	Set BewerkingInfo.IngegevenKenmerk = ..TaorboxModel.GeefIngegevenKenmerkViaNaam("LadeHoogte")
+	Set BewerkingInfo.IngegevenKenmerk = ..Model.GeefIngegevenKenmerkViaNaam("LadeHoogte")
 	Do BuilderType.BewerkingDimensies.SetAt(BewerkingInfo, ##class(DOM.PM.enu.BewerkingDimensie).Breedte())
 
 	Set Rol.BuilderType = BuilderType
 	Set Rol.ItemProcessorType = ##class(APPS.PM.Maatwerk.MaatwerkModel.enu.ItemProcessorType).ExactEen()
-	Do Rol.SelectieKenmerken.Insert(..TaorboxModel.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
+	Do Rol.SelectieKenmerken.Insert(..Model.GeefSelectieKenmerkVoorIngegevenKenmerkViaNaam("LadeKleur"))
 	Set Rol.ProductieDocTemplate = "{Rol}, {EXPR:##class(DOM.PM.enu.TAORPlaatAfwerking).LogicalToDisplay(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.PlaatAfwerkingBepaler).%New().GeefPlaatAfwerking(..LadeKleur))}, {LadeKleur}"	
 	Do Rol.Condities.Insert(BinnenladeConditie)
-	Do ..TaorboxModel.ZetSpecialeProductieWijzenOpRol(Rol, "F")
+	Do ..Model.ZetSpecialeProductieWijzenOpRol(Rol, "F")
 	Quit Rol
 ]]></Implementation>
 </Method>