diff --git a/Lisp/VarioFoerderer.lsp b/Lisp/VarioFoerderer.lsp
index 8aa38a5..453387e 100644
--- a/Lisp/VarioFoerderer.lsp
+++ b/Lisp/VarioFoerderer.lsp
@@ -1223,17 +1223,7 @@
     (setq result-pfad (getenv "DXFM_RESULTS"))
     (setq result-pfad (strcat (getenv "DXFM_BLOCKS") "../results"))
   )
-  (setq dateiname (strcat result-pfad
-                          "/FOERDERTEST_"
-                          (menucmd "M=$(edtime,$(getvar,date),YYYYMODD-HHmmss)")
-                          ".dxf"))
-  (princ (strcat "\n\n📁 Gespeichert als: " dateiname))
-  (command "_.DXFOUT" dateiname "V" "2018" "16")
-  
-  (princ "\n\n>>> FOERDERTEST abgeschlossen! <<<")
-  (princ)
-
-
+ 
   ;; Dateiname: datum-HHMM.dxf
   (if (getenv "DXFM_RESULTS")
     (setq result-pfad (getenv "DXFM_RESULTS"))