//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