Index: DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml
===================================================================
diff -u -r2069 -r2072
--- DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml	(.../HFLadeZijkantv001.cls.xml)	(revision 2069)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFLadeZijkantv001.cls.xml	(.../HFLadeZijkantv001.cls.xml)	(revision 2072)
@@ -33,20 +33,14 @@
 <Implementation><![CDATA[
 	Set SelectieKenmerken = ##class(%ArrayOfDataTypes).%New()
 	// SelectieKenmerken invullen
-	Do:(IngegevenKenmerken.LadeVariant '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.LadeVariant,"LadeVariant")
-	Do:(IngegevenKenmerken.ZijkantDesign '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantDesign,"ZijkantDesign")
-	Do:(IngegevenKenmerken.LadeDiepte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
-	Do:(IngegevenKenmerken.Draagkracht '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.Draagkracht,"Draagkracht")
-	Do:(IngegevenKenmerken.ZijkantKleur '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantKleur,"ZijkantKleur")
-	Do:(IngegevenKenmerken.ZijkantHoogte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantHoogte,"ZijkantHoogte")
-	Do:(IngegevenKenmerken.Uittrekbaarheid '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.Uittrekbaarheid,"Uittrekbaarheid")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeVariant,"LadeVariant")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantDesign,"ZijkantDesign")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.Draagkracht,"Draagkracht")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantKleur,"ZijkantKleur")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijkantHoogte,"ZijkantHoogte")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.Uittrekbaarheid,"Uittrekbaarheid")
 	
-	Set it = ##class(TECH.ListIterator).%New(SelectieKenmerken)
-	while (it.HasNext()) {
-		Set Value = it.Next()
-		d WLIP^vhDBG(204, it.Key() _ " - " _ Value)
-	}
-
 	; '@`$LB($LB("BasisType","LA"),$LB("tB","1"),$LB("Design",Self.Val("DC")),$LB("LadeDiepte",Self.Val("LD")),$LB("Kleur",Self.Val("KL")),$LB("GlijderType",Self.Val("GT")),$LB("ZijwandHoogte",Self.Val("ZW")) 
 	;       ,$LB("$COMB$","($CASE({Verpakking},""E"":1,""I"":10,:20)+$CASE({LiRe},""LI"":0,:1))"))
 	Quit SelectieKenmerken
Index: DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugHouderv001.cls.xml
===================================================================
diff -u -r2069 -r2072
--- DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugHouderv001.cls.xml	(.../HFRugHouderv001.cls.xml)	(revision 2069)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugHouderv001.cls.xml	(.../HFRugHouderv001.cls.xml)	(revision 2072)
@@ -32,9 +32,9 @@
 <ReturnType>%ArrayOfDataTypes</ReturnType>
 <Implementation><![CDATA[
 	Set SelectieKenmerken = ##class(%ArrayOfDataTypes).%New()
-	Do:(IngegevenKenmerken.RugHouderKleur '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.RugHouderKleur,"RughouderKleur")
-	Do:(IngegevenKenmerken.ZijwandHoogte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.ZijwandHoogte,"ZijwandHoogte")
-	Do:(IngegevenKenmerken.RugHoogte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.RugHoogte,"RugHoogte")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.RugHouderKleur,"RughouderKleur")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.ZijwandHoogte,"ZijwandHoogte")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.RugHoogte,"RugHoogte")
 	
 	; '@`$LB($LB("BasisType","RUGH"),$LB("tB","1"),$LB("Kleur",Self.Val("KR")),$LB("RugHoogte",Self.Val("RH") _ $S($L(Self.Val("RSTL")):"-"_Self.Val("RSTL"),1:"")  ) 
 	;       ,$LB("$COMB$","($CASE({Verpakking},""E"":1,""I"":10,:20)+$CASE({LiRe},""LI"":0,:1))"))
Index: DOM/PM/Maatwerk/Calc/HF/HalffabSelectorResultSet.cls.xml
===================================================================
diff -u -r2020 -r2072
--- DOM/PM/Maatwerk/Calc/HF/HalffabSelectorResultSet.cls.xml	(.../HalffabSelectorResultSet.cls.xml)	(revision 2020)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabSelectorResultSet.cls.xml	(.../HalffabSelectorResultSet.cls.xml)	(revision 2072)
@@ -36,7 +36,8 @@
 	For { 
 		Set SelectValue=SelectieKenmerken.GetNext(.ProptName)
 		Quit:(ProptName="")
-		
+		// Selectiekenmerken met lege waarden niet in de query opnemen
+		Continue:(SelectValue = "")
 		Set SQLWhereClause=SQLWhereClause_" AND ("_ProptName_" = ?)"
 		Set lbSQLParams=lbSQLParams_$LB(SelectValue)		
 	}
Index: DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFBodemv001.cls.xml
===================================================================
diff -u -r2069 -r2072
--- DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFBodemv001.cls.xml	(.../HFBodemv001.cls.xml)	(revision 2069)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFBodemv001.cls.xml	(.../HFBodemv001.cls.xml)	(revision 2072)
@@ -109,15 +109,15 @@
 		
 		// HalffabList via SQL met SelectieKenmerken 
 		Do SelectieKenmerken.SetAt("BODEM","MateriaalType")
-		Do:(IngegevenKenmerken.LadeDiepte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
-		Do:(IngegevenKenmerken.BodemKleur '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.BodemKleur,"BodemKleur")
-		Do:(IngegevenKenmerken.CorpusBinnenbreedte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.CorpusBinnenbreedte,"LadeBreedte")
+		Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
+		Do SelectieKenmerken.SetAt(IngegevenKenmerken.BodemKleur,"BodemKleur")
+		Do SelectieKenmerken.SetAt(IngegevenKenmerken.CorpusBinnenbreedte,"LadeBreedte")
 	}
 	Else
 	{
 		Do SelectieKenmerken.SetAt("BODEMSTRK","MateriaalType")
-		Do:(IngegevenKenmerken.LadeDiepte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
-		Do:(IngegevenKenmerken.BodemKleur '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.BodemKleur,"BodemKleur")
+		Do SelectieKenmerken.SetAt(IngegevenKenmerken.LadeDiepte,"LadeDiepte")
+		Do SelectieKenmerken.SetAt(IngegevenKenmerken.BodemKleur,"BodemKleur")
 	}
 	Quit SelectieKenmerken
 ]]></Implementation>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugv001.cls.xml
===================================================================
diff -u -r2069 -r2072
--- DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugv001.cls.xml	(.../HFRugv001.cls.xml)	(revision 2069)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TBX/HFRugv001.cls.xml	(.../HFRugv001.cls.xml)	(revision 2072)
@@ -130,8 +130,8 @@
 	// Bij het bepalen van de mogelijke kenmerken negeren we de rugbreedte vermits die afhankelijk is
 	// van een ladezijkant en er kunnen meerdere ladezijkanten nog in de running zijn.
 	Set SelectieKenmerken=##class(%ArrayOfDataTypes).%New()
-	Do:(IngegevenKenmerken.RugKleur '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.RugKleur,"RugKleur")
-	Do:(IngegevenKenmerken.RugHoogte '= -9999) SelectieKenmerken.SetAt(IngegevenKenmerken.RugHoogte,"RugHoogte")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.RugKleur,"RugKleur")
+	Do SelectieKenmerken.SetAt(IngegevenKenmerken.RugHoogte,"RugHoogte")
 
 	Set IsStalenRug=(IngegevenKenmerken.RugMateriaal=##class(DOM.PM.enu.TBXRugMateriaal).Staal())
 	If (IsStalenRug)