//Scriptfunktion 'MCOPENFRM.PRINTTOPDF'
// Allgemeine Funktionen zum Speichern, Exportieren und Generieren von PDFs aus Formularen.
// Druckt ein Formular als PDF und speichert es im Zielfile
//Parameter:
//-PDF-Zieldatei: Name der Ziel-PDF-Datei
//-Seitenzahlen, durch Komma getrennt: Seitenzahlen
//-Anzahl der Kopien: Kopienzahl
//-Timeout in Sekunden: Die Wartezeit, bis die PDF-Datei generiert wurde.
//Beispiel:
//Ein Beispiel-Skript, das auf dem Desktop das Dokument "Blatt1-1B" zum aktuellen Patienten als PDF ausgibt.
//Dieses Mal werden jedoch nur die Seiten 1 und 2 ausgegeben.
EXISTSPRN=MCOPENFRM.EXISTS_PDF_PRINTER{}
IFBLOCK{EXISTSPRN=True}
STAMP=TIMESTAMP{}
//Standardscripte Ausführen
RES=RUN{{APPPATH}\CONFIG\SCRIPTS\DRVDOKU.MCFSCR,*,*,False}
RES=RUN{{APPPATH}\CONFIG\SCRIPTS\KTLOPS.MCFSCR,*,*,False}
//DRV Blatt 1 öffnen
RES=MCOPENFRM.OPEN{{APPPATH}\Formular\DRV_G0810_Aerztlicher_Entlassungsbericht_2021\Blatt1.apf,DRV-Bericht}
//Variablen, die im Speicher befindlich sind, werden automatisch in Formularfelder eingetragen.
RES=MCOPENFRM.SETVARTOFIELDS{}
//In MCDMS generierte Unterschriften werden anhand der DRVDOKU.MCFSCR erstellt und mit den Unterschriftenfeldern im Formular verbunden.
RES=MCOPENFRM.SETSIGNATURE{{SIGNATURARZT1ID},{SIGNATURARZT2ID},{SIGNATURARZT3ID},{SIGNATURARZT4ID},False,False}
//Formular drucken
RES=MCOPENFRM.PAGENUMBERSTOPRINT{1{$K}2}
RES=MCOPENFRM.PRINTTOPDF{{SYSDIR_DESKTOP}\TEST{STAMP}.PDF,0,1,60}
RES=MCOPENFRM.CLOSE{}
RES=DLGMESSAGE{PDF Datei generiert!}
ELSE
RES=DLGMESSAGE{Kein PDF-Drucker installiert!}
ENDIF
