Hallo Dieter,

ich kenne folgende Möglichkeit über die Programminformationsdatenstruktur

* --------------------------------------------------------------
* Programminformationsdatenstruktur
* --------------------------------------------------------------
D psds SDS
D excp_data 91 170

C ky_sfl001pf CHAIN(E) sfl001pf

* Fehler beim CHAIN
C IF %ERROR = *ON
* Auf Satzsperre abfragen
C IF %STATUS = 01218
* Das Feld <> hat folgenden Inhalt:
* Satz 11 wird von Job 764835/TSCHABO/QPADEV002F benutzt.
C ENDIF

Vielleich hift dass ja weiter.

Gruß
Tschabo