//Scriptfunktion 'MCGDT.OPENGDT'
// GDT-FUNKTIONEN
// Öffnet eine GDT-Datei und lädt die Inhalte nach in das Variablenfeld aus der Datei (Filename).
// Dies ermöglicht das Auslesen von Daten aus GDT-Dateien für die Weiterverarbeitung in MCDMS.
//Beispiel:
GDTDAT=REPLACE{{GEBDATUM},.,}
IFBLOCK{GESCHLECHT=M}
GDTGESCHLECHT="1"
ELSE
GDTGESCHLECHT="0"
ENDIF
RES=MCGDT.ADDGDTFIELDS{8000=6302;8100=[GDT_RECORD_LEN];9218=01.00;3000={PATIENTFALLNR};3101={NAME};3102={VORNAME};3103={GDTDAT};3106={PLZ} {ORT};3107={STRASSE};3110={GDTGESCHLECHT}}
//GDT Daten speichern und wieder auslesen
IFBLOCK{GDTFIELDS_GDTDATA!}
RES=SAVEFILE{{SYSDIR_DESKTOP}\GDTDATA.GDT,{GDTFIELDS_GDTDATA},False,False}
RES=DLGMESSAGE{GDT-Datei erzeugt!}
RESULT=MCGDT.OPENGDT{READGDTDATA,{SYSDIR_DESKTOP}\GDTDATA.GDT}
//Alle GDT-Daten werden im Variablenbereich {READGDTDATA_GDTFELDNUMMER} gespeichert.
RESULT=DLGMESSAGE{Dieser Name kommt jetzt aus der ausgelesenen GDT-Datei.: {READGDTDATA_3101}}
ENDIF
