Diagnosen-Abfrage: Prüft, ob beim aktuellen Patienten Diagnosen existieren, und beendet das Script mit Hinweis, falls keine vorhanden sind. Liest anschließend alle Entlassdiagnosen und zugehörigen ICD-Codes aus der Datei MEDDOK{PATIENTID} aus und demonstriert drei Varianten, um Diagnosenwerte dynamisch per GETVAR auszulesen.