Index: TECH/BackgroundProcess/impl/DataBuilder.cls.xml
===================================================================
diff -u -r1198 -r2940
--- TECH/BackgroundProcess/impl/DataBuilder.cls.xml	(.../DataBuilder.cls.xml)	(revision 1198)
+++ TECH/BackgroundProcess/impl/DataBuilder.cls.xml	(.../DataBuilder.cls.xml)	(revision 2940)
@@ -3,6 +3,11 @@
 <Class name="TECH.BackgroundProcess.impl.DataBuilder">
 <Super>TECH.RegisteredObject,TECH.BackgroundProcess.DataBuilder</Super>
 
+<Parameter name="MaximumAllowedParameters">
+<Type>%Integer</Type>
+<Default>5</Default>
+</Parameter>
+
 <Property name="Data">
 <Type>TECH.BackgroundProcess.impl.Data</Type>
 </Property>
@@ -112,8 +117,13 @@
 
 <Method name="InsertParameter">
 <FormalSpec>Parameter:TECH.BackgroundProcess.impl.Parameter</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
+	if ..Data.Parameters.Count() = ..#MaximumAllowedParameters {
+		do ##class(TECH.Exceptions.IllegalUsageException).Throw("Meer dan "_..#MaximumAllowedParameters_" parameters zijn spijtig genoeg niet toegelaten. Indien gewenst "_##class(TECH.BackgroundProcess.Uitvoerder).%ClassName(1)_" uitbreiden.")
+	}
 	do ..Data.Parameters.Insert(Parameter)
+	
 	do ..Data.Save()
 ]]></Implementation>
 </Method>