Hallo

In einem CL-Programm soll ich eine Datei von einer Echtbibliothek in eine Testbibliothek kopiern. Funktioniert mit CPYF und *Replace. Wenn ich das Interaktiv mache, prüfe ich vorher mit WRKOBJLCK nach , ob eine Sperre auf der Datei ist. Wie mache ich so was in einem CL-Programm

Danke

Unter dem Stichwort WRKOBJLCK habe ich nichts gefunden