... Du brauchst hier den Job control space pointer, der wohl in einer Systemtabelle (QWCBT_JOB_INDEX) zu finden ist. Dein Beispielprogramm ist hier wohl weniger als die halbe Wahrheit. Ob das ganze Zielführend ist, habe ich so meine Zweifel. Seclevel > 40 geht das wohl ohne Hacks nicht mehr und das komplette Verfahren ist nur schwach dokumentiert, sprich: kann sich mit jedem Release ändern (und ob und wann dann neuere Infos kommen, weiß man nicht (es gab etliche Jahre kein gültiges MI Handbuch). Ach ja - und scharf ist die Information auch nicht (wie auch die call stack Anzeige im Jobmenü).

D*B

D*B