fix for changing

Lisp/vf_core.lsp

@@ -1196,7 +1196,7 @@
                             best-winkel L_GF L_GF1 L_GF2 L_VF
                             idx eintrag wahl antwort verteilung-modus
                             n-scanner vf-nummer hoehe-von hoehe-bis lastEnt
-                            staustrecke-basis)
+                            staustrecke-basis vf-insert)
 
   (princ "\n=========================================")
   (princ (ssg-text "vfc-banner-titel"))
@@ -1440,9 +1440,17 @@
         (list deltaL deltaH richtung best-winkel L_GF1 L_GF2 L_VF startpunkt seite hz))
 
       ;; Gemeinsame VF_*-Block-Erstellung
-      (vf-block-erstellen anlage-typ seite vf-nummer n-scanner
-                          hoehe-von hoehe-bis deltaH deltaL L_VF L_GF1 L_GF2
-                          richtung best-winkel startpunkt lastEnt hz)
+      (setq vf-insert
+        (vf-block-erstellen anlage-typ seite vf-nummer n-scanner
+                            hoehe-von hoehe-bis deltaH deltaL L_VF L_GF1 L_GF2
+                            richtung best-winkel startpunkt lastEnt hz))
+
+      ;; Standard-Bloecke aus dem interaktiven Konsolen-Ablauf ebenfalls mit der
+      ;; SSG_VF_EDIT-XDATA markieren - sie sind (wie die Dialog-Variante) aus
+      ;; Attributen + hz verlustfrei rekonstruierbar, also per Doppelklick
+      ;; (c:VARIOFOERDERER_EDIT) editierbar. Etage/Linienzug bleiben unmarkiert.
+      (if (and vf-insert (= anlage-typ "standard"))
+        (vfs-xdata-schreiben vf-insert hz))
 
       (princ "\n=========================================")
     )