View Categories

MCOPENFRM.SETVARTOFIELDS

//Scriptfunktion 'MCOPENFRM.SETVARTOFIELDS'
// Allgemeine Funktionen zum Speichern, Exportieren und Generieren von PDFs aus Formularen.
// Setzt alle im Speicher befindlichen Variablen in das mit OPEN geöffnete Formular ein.


//Beispiel:
//BeispielScript das auf dem Desktop zum aktuellen Patienten das Blatt1-1B als PDF ausgibt

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.PRINTTOPDF{{SYSDIR_DESKTOP}\TEST{STAMP}.PDF,0,1,60}
	RES=MCOPENFRM.CLOSE{}
ELSE
	RES=DLGMESSAGE{Kein PDF-Drucker installiert!}
ENDIF