View Categories

DLGDIALOG

//Scriptfunktion 'DLGDIALOG'
//Veraltete Funktion zum Öffnen von APF Formularen als Dialog Funktion

// Wenn kein Patient ausgewählt ist, wird das Script verlassen
DUMMYVAR=IFNOVAREXIT{PATIENTID}

// Beispieltext für die Dialoganzeige festlegen
DD2_ANG="Tochter"
DD2_NOTE={DERDIEPATIENT} {PATIENTPATIENTIN} hat die Diagnose: {DIAGNOSE1}. Wie der Name der Angehörigen?
DLGCOLOR="0"

START:
// Dialogfenster öffnen mit einer Konfiguration aus einer APF-Datei

CHECK=DLGDIALOG{DD2,{APPPATH}\CONFIG\Scripts\TEST_DIALGO.APF,Beispiel Dialog,Speichern,{DLGCOLOR}}

IFBLOCK{DD2_ANGNAME=}
	RES=DLGMESSAGE{Bitte geben Sie einen Namen ein!}
	GO{START}
ENDIF

// Wenn der Dialog bestätigt wurde, wird die Nachricht angezeigt
IFBLOCK{CHECK=1}
	RES=DLGMESSAGE{{DD2_ANG}:{DD2_ANGNAME}}
ENDIF