vf-next-number ueberspringt bestehende Block-Definitionen (verhindert sporadischen VF-Bau-Fehlschlag)

Parallel-VF selbstkorrigierend auf GF-AS-KS_EIN ausrichten + vf-next-number gegen Namenskollision haertenm, Debug-Ausgaben entfernt.

Lisp/vf_standard.lsp

@@ -947,7 +947,7 @@
                                                  winkel-prefill /
                                                  ergebnis ergebnis-liste gueltige-winkel horizontal-info
                                                  winkelwahl best-winkel L_GF L_VF L_GF1 L_GF2 verteilung-modus
-                                                 n-scanner hoehe-von hoehe-bis lastEnt vf-insert staustrecke-basis)
+                                                 n-scanner hoehe-von hoehe-bis lastEnt vf-insert vf-endpunkt staustrecke-basis)
   (setq ergebnis          (berechne-standard deltaL deltaH richtung seite))
   (setq ergebnis-liste    (cadddr ergebnis))
   (setq staustrecke-basis (ssg-cfg-or "vario" "staustrecke_basis" 1000))
@@ -995,7 +995,10 @@
                   (t hoehe-von)))
           (setq lastEnt (vf-lastent-ohne-attribute))
 
-          (variofoerderer-einfuegen deltaL deltaH richtung best-winkel L_GF1 L_GF2 L_VF startpunkt seite hz)
+          ;; endpunkt = tatsaechliches ES-KS_AUS (Weltpunkt) - wird fuer die
+          ;; Ausrichtung des Parallel-VF (gf-baue-parallel-vf) zurueckgegeben.
+          (setq vf-endpunkt
+            (variofoerderer-einfuegen deltaL deltaH richtung best-winkel L_GF1 L_GF2 L_VF startpunkt seite hz))
 
           (setq vf-insert
             (vf-block-erstellen "standard" seite vf-nummer n-scanner
@@ -1007,6 +1010,9 @@
       )
     )
   )
+  ;; Rueckgabe: (vf-insert vf-endpunkt) fuer aufrufende Ausrichtungslogik;
+  ;; bei Abbruch/Fehler (nil nil). Menue-Aufrufer ignorieren die Rueckgabe.
+  (list vf-insert vf-endpunkt)
 )
 
 ;; Neuanlage (Menue/Konsole -> Dialog): Startpunkt (X/Y) picken, Basis-Dialog,