Index: APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml
===================================================================
diff -u -r34197 -r38559
--- APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml	(.../KenmerkConvertor.cls.xml)	(revision 34197)
+++ APPS/PM/Maatwerk/TBX/Conversie/KenmerkConvertor.cls.xml	(.../KenmerkConvertor.cls.xml)	(revision 38559)
@@ -66,15 +66,15 @@
 	Set TBXKenmerken.HangmapBoringen = Product.GeefAantalHangmappen()
 	Do ..Controleer(TBXKenmerken.HangmapBoringen,Product.GeefAantalHangmappen(),"HangmapBoringen", ErrorLijst)
 	
+	Set TBXKenmerken.HeeftOpvullijstLinks = Product.BevatOpvullijstLinks()
+	If (TBXKenmerken.HeeftOpvullijstLinks = "") { Do ErrorLijst.Insert("HeeftOpvullijstLinks niet ingevuld") }
+	
 	Set Klasse = ##class(DOM.PM.enu.TBXKlas).Lade()
 	If (Product.IsSpoelbakLade()) { Set Klasse = ##class(DOM.PM.enu.TBXKlas).Spoelbak() }
 	If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRondeUitsparing()) { Set Klasse = ##class(DOM.PM.enu.TBXKlas).Sifon() }
   	If (Product.IsSifonLade() && Product.GeefUitsparingen().GetAt(1).IsRechteUitsparing()) { Set Klasse = ##class(DOM.PM.enu.TBXKlas).SifonTypeBlum() }   ; To be done  (added by WimV on 11/08/2011)
 	Set TBXKenmerken.Klasse = Klasse
 	
-	Set TBXKenmerken.OpvullijstLinks = Product.BevatOpvullijstLinks()
-	If (TBXKenmerken.OpvullijstLinks = "") { Do ErrorLijst.Insert("OpvulLijstLinks niet ingevuld") }
-	
 	Set TBXKenmerken.OpvullijstRechts = Product.BevatOpvullijstRechts()
 	If (TBXKenmerken.OpvullijstRechts = "") { Do ErrorLijst.Insert("OpvulLijstRechts niet ingevuld") }