Index: zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml
===================================================================
diff -u -r2298 -r2366
--- zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml	(.../HalffabSelector.cls.xml)	(revision 2298)
+++ zTryout/FM/DOM/PM/Maatwerk/HalffabSelector.cls.xml	(.../HalffabSelector.cls.xml)	(revision 2366)
@@ -60,13 +60,6 @@
 <Implementation><![CDATA[
 	Set IK = ..MaakDefaultKenmerken()
 	// Bepaalde zaken open laten
-	Do IK.NietIngegeven.Insert("Draagkracht")
-	Do IK.NietIngegeven.Insert("LadeDiepte")
-	Do IK.NietIngegeven.Insert("Uittrekbaarheid")
-	Do IK.NietIngegeven.Insert("BodemKleur")
-	Do IK.NietIngegeven.Insert("RugHoogte")
-	Do IK.NietIngegeven.Insert("RugKleur")
-	Do IK.NietIngegeven.Insert("ZijwandHoogte")
 	//Set ..IK.PlaatMateriaal = "H"	// Zo vermijd je dat ie uit strook wil nemen
 	Set IK.ZijkantDesign = "F"
 	Set TestProg = ..%New(IK)
@@ -80,13 +73,6 @@
 <Implementation><![CDATA[
 	Set $ZT = "Error"
 	
-	// Niet ingegeven kenmerken op leeg zetten
-	Set NietIngegevenIterator = ##class(TECH.ListIterator).%New(..IK.NietIngegeven)
-	while (NietIngegevenIterator.HasNext()) {
-		Set Kenmerk = NietIngegevenIterator.Next()
-		Set $zobjproperty(..IK, Kenmerk) = ""
-	}
-	
 	Do ..Logger.Info("Bereken IN", ..DumpIK())
 	
  	Set ..PowerUserMode = 0
@@ -194,7 +180,6 @@
 		Continue:(Property.Private)
 		Set PropertyNaam = Property.Name
 		Set PropertyWaarde = $zobjproperty(..IK, PropertyNaam)
-		Continue:(PropertyNaam = "NietIngegeven")
 		Continue:(PropertyNaam = "NietMeeleveren")
 		Continue:(PropertyNaam = "Onderdelen")
 		If (PropertyWaarde = "") {