In ILE RPG geht das zum Beispiel so.