... kommt drauf an, wofür Du das brauchst.
- Nur nachprüfen geht mit List Object Locks (QWCLOBJL) API, ohne einen lock zu setzen hat das allerdings keinerlei Nutzen, bei einer nachfolgenden Aktion kann ja bereits wieder ein anderer schneller gewesen sein.
- mit Sperre setzen geht das einfach mit CL Command ALCOBJ, bei dem man Sperrlevel und Wartezeit setzen kann.

Die auch genannte UDTF ist pure Spielerei, zu langsam und geht ohne PTFs sowieso meistens nicht.

D*B