Index: TECH/Algo/SQL/SelectBuilder/SelectBuilder.cls.xml
===================================================================
diff -u -r950 -r951
--- TECH/Algo/SQL/SelectBuilder/SelectBuilder.cls.xml	(.../SelectBuilder.cls.xml)	(revision 950)
+++ TECH/Algo/SQL/SelectBuilder/SelectBuilder.cls.xml	(.../SelectBuilder.cls.xml)	(revision 951)
@@ -82,26 +82,28 @@
 	set PropertyIterator = ##class(TECH.ListIterator).%New(Properties)
 	while PropertyIterator.HasNext() {
 		#dim PropertyNaam As %String = PropertyIterator.Next()
-		#dim Waarden As %ListOfDataTypes = $property(Parameters,PropertyNaam)
-		if Waarden.Count() > 0 {
+		#dim InputParameters As TECH.Algo.SQL.SelectBuilder.Criteria = $property(Parameters,PropertyNaam)
+		if InputParameters.Count() > 0 {
 			do:'..SelecteerEnkelID ..QueryBuilder.SelecteerVeldVanTabel(PropertyNaam,..Tabel)		
-			do ..VerwerkPropertyWaarden(PropertyNaam,Waarden)
-					
+			do ..VerwerkPropertyWaarden(PropertyNaam,InputParameters)
 		}
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkPropertyWaarden">
-<FormalSpec>PropertyNaam:%String,Waarden:%ListOfDataTypes</FormalSpec>
+<FormalSpec>PropertyNaam:%String,Criteria:TECH.Algo.SQL.SelectBuilder.Criteria</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set CombinatieConditie = ##class(TECH.Algo.SQL.QueryEngine.CombinatieConditie).%New(##class(TECH.Algo.SQL.QueryEngine.enu.CombinatieConditieOperator).Of())
 	
-	set WaardenIterator = ##class(TECH.ListIterator).%New(Waarden)
+	#dim WaardenIterator As TECH.Iterator = Criteria.GeefIterator()
 	while WaardenIterator.HasNext() {
-		set ..QueryParameters = ..QueryParameters _ $listbuild(WaardenIterator.Next())
-		do CombinatieConditie.VoegToeSubconditie(##class(TECH.Algo.SQL.QueryEngine.EnkelvoudigeConditie).%New(PropertyNaam_" = ?"))
+		#dim InputParameter As TECH.Algo.SQL.SelectBuilder.InputParameter = WaardenIterator.Next()
+		set:InputParameter.Waarde'="NULL" ..QueryParameters = ..QueryParameters _ $listbuild(InputParameter.Waarde)
+		#dim ConditieString As %String = PropertyNaam_" "_InputParameter.ComparatorType_$select(InputParameter.Waarde="NULL":" NULL",1:" ?")
+		Set EnkelvoudigeConditie = ##class(TECH.Algo.SQL.QueryEngine.EnkelvoudigeConditie).%New(ConditieString)
+		do CombinatieConditie.VoegToeSubconditie(EnkelvoudigeConditie)
 	}
 	do ..WhereConditie.VoegToeSubconditie(CombinatieConditie)
 ]]></Implementation>