Default für CSV Export ist nur die Spur der Separatoren.

This commit is contained in:
Michael Stangl
2026-09-28 12:33:43 +02:00
parent 1e6b152d72
commit 3a5e771931
+14 -14
View File
@@ -54,27 +54,27 @@
;; Drei sich gegenseitig ausschliessende Werte (String, ueber CSV_EXPORT_
;; KONFIG/dcl/csv_export_konfig.dcl bedienbar, siehe c:CSV_EXPORT_KONFIG
;; weiter unten):
;; "group_vf_gf" - Default. csv:ketten-verarbeiten fasst Boegen/
;; Streckenelemente/Umlenk-/Motorstation zu je einer
;; Zeile pro Foerdereinheit/Gefaelleeinheit zusammen,
;; die pattern_nested_*-Einzelteil-Zeilen bleiben aus
;; dem Export ausgeschlossen.
;; "separator_track" - Default. Klassisches Verhalten vor beiden
;; Erweiterungen: nur AS/ES/Separator, keine
;; Einzelteile UND keine Foerdereinheit/Gefaelleeinheit-
;; Marker (weder csv:element-proxies-erzeugen noch
;; csv:unitmark-aktualisieren legen dafuer etwas Neues
;; an - siehe csv:export-vorbereiten).
;; "all_elements" - Verhalten wie vor der Gruppierung: jedes Einzelteil
;; (Bogen/Streckenelement/Umlenk-/Motorstation)
;; bekommt seine eigene Export-Zeile
;; (csv:collect-export-blocks laesst die
;; pattern_nested_*-Klauseln durch, csv:unitmark-
;; aktualisieren legt keine neuen Marker an).
;; "separator_track" - Klassisches Verhalten vor beiden Erweiterungen:
;; nur AS/ES/Separator, keine Einzelteile UND keine
;; Foerdereinheit/Gefaelleeinheit-Marker (weder
;; csv:element-proxies-erzeugen noch csv:unitmark-
;; aktualisieren legen dafuer etwas Neues an - siehe
;; csv:export-vorbereiten).
;; "group_vf_gf" - csv:ketten-verarbeiten fasst Boegen/Streckenelemente/
;; Umlenk-/Motorstation zu je einer Zeile pro
;; Foerdereinheit/Gefaelleeinheit zusammen, die
;; pattern_nested_*-Einzelteil-Zeilen bleiben aus dem
;; Export ausgeschlossen.
;; Ein ungueltiger Wert wird von csv:export-modus-setzen ignoriert (Modus
;; bleibt unveraendert) statt die Zeichnung in einen unbekannten Zustand zu
;; versetzen.
(if (not (boundp '*csv-export-modus*)) (setq *csv-export-modus* "group_vf_gf"))
(if (not (boundp '*csv-export-modus*)) (setq *csv-export-modus* "separator_track"))
(defun csv:export-modus () *csv-export-modus*)
(defun csv:export-modus-setzen (modus)
(if (member modus '("all_elements" "group_vf_gf" "separator_track"))
@@ -2708,9 +2708,9 @@
;; auseinanderlaufen kann.
(setq *csv-export-konfig-modi*
(list
(cons "group_vf_gf" "Gruppiert: Foerdereinheit/Gefaelleeinheit (Standard)")
(cons "group_vf_gf" "Gruppiert: Foerdereinheit/Gefaelleeinheit")
(cons "all_elements" "Alle Einzelelemente (Boegen, Strecken, Umlenk-/Motorstation)")
(cons "separator_track" "Nur Separator-Spur (AS/ES/Separator, ohne Streckenelemente)")
(cons "separator_track" "Nur Separator-Spur (AS/ES/Separator, ohne Streckenelemente) (Standard)")
))
(defun csv:export-konfig-init ( / idx eintrag)