Index: APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml
===================================================================
diff -u -r60737 -r60838
--- APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 60737)
+++ APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 60838)
@@ -66,15 +66,19 @@
 	#dim Breedte As %Integer = KaderdeurObject.Breedte
 	#dim Hoogte As %Integer = KaderdeurObject.Hoogte
 	Set ..SvgBox  = ..BasisElementFactory.MaakSvgBox(0,0,Hoogte,Breedte)
+   ;kader v/d kaderdeur
 	Do ..MaakKader(KaderdeurObject)
+	;Verbinders
 	If (KaderdeurObject.Toepassing.ItemID ="GL") { 	
   	} Else {
 	  	Do ..MaakVerbinders(KaderdeurObject)
 	}
+	;Beslag 
 	Do ..MaakBeslag(KaderdeurObject)
+	;Boringen
   	Do ..MaakBoringen(KaderdeurObject)
+  	;Schuine hoeken
   	Do ..MaakSchuineHoeken(KaderdeurObject)
-  	
   	Do ..WriteFile(..SvgBox)
 	Quit
 ]]></Implementation>