task EINLESEN is
  entry BESCHL(WERT: out WERT_T);
  entry NEU;
  for NEU use at 8#500#;
end EINLESEN;

task ANZEIGEN is
end ANZEIGEN;