Beispiele pastecsv

#cmd_clear
#cmd #pdf_texto c=$SEPLINE(0)   r=80
#cmd #pdf_texto c=$SEPLINE(1)   l=200   r=50
#cmd #pdf_text c=$SEPLINE(2)   l=230   

#pdf_start pal=Y
#pdf_text  c="Tabelle aus der Zwischenablage"   a=c
#pdf_text
#csv_paste er=1
#pdf_stop  fn=$DIR(doc)\test.pdf   o=Y

Dieses Beispiel wandelt eine Tabelle in der Zwischenablage (kopiert aus Excel oder LibreOffice Calc) in ein PDF.

Um das Beispiel in XLIVE ausführen zu können, ist das Kommando, das für jede Zeile der Tabelle ausgeführt wird, also lokales Kommando hier definiert. Damit keine Reste eines vorherigen Kommandos Unsinn machen, wird zunächst mit #cmd_clear das Kommando gelöscht, danach werden die Anweisungen für die Ausgabe von drei Spalten dem Kommando hinzugefügt. Die linken und rechten Ränder sind gegebenenfalls dem Tabelleninhalt anzupassen. Damit der Zeilenumbruch erst nach der letzten Spalte erfolgt, wird für die vorherigen beiden Spalten #pdf_texto statt #pdf_text verwendet. Die Zelleninhalte werden mit $SEPLINE() ausgelesen.

Das Hauptkommando startet mit #pdf_start, hier wird mit pal_Y Querformat eingestellt. Es folgt eine zentrierte Seitenüberschrift, die durch eine Leerzeile vom Rest abgetrennt wird.

Der Inhalt der Zwischenablage wird mit #csv_paste ausgelesen. Für jede Zeile des Inhalts wird das lokale Kommando 1 aufgerufen (das oben definiert wurde).

Mit #pdf_stop wird die Erstellung des PDFs beendet und das Dokument unter dem angegebenen Dateiname gespeichert. Mit $DIR(doc) wird das Dokumentenverzeichnis in den Dateiname eingefügt. Mit o=Y wird das Dokument nach der Erzeugung gleich geöffnet.