PDA

View Full Version : alle Jobsperren freigeben ohne Job zu beenden



Schnichels
25-04-02, 09:09
Hallo *all,

gibt es eine Möglichkeit in einem laufenden Job alle Sperren auf Objekte freizugeben, so als wäre der Job beendet ?

Unser Problem:
Wir holen Nachts über die AS400 Daten ab. Pro Abruf können aber nur eine bestimmte Anzahl Sätze geholt werden (liegt nicht an uns). Um alle von uns benötigten Daten zu erhalten rufen wir in einem submitteten CL-PGM zweimal hintereinander unser "Abhol-Programm" auf.
Bei zweiten Lauf bekommen wir dann Probleme
mit gelockten Objekten. z.B. bei CLRPFM -"Datei wird benutzt" usw. obwohl es ja der selbe Job ist. Haben schon mit ALCOBJ und DLCOBJ probiert, hat uns aber auch nicht
wirklich weiter geholfen.

Wäre super wenn wir mit einem Befehl alle Sperren auf einmal freigeben könnten.

Weiss jemand Rat ?

Für jede Antwort im Voraus vielen Dank

Jürgen Schnichels

Neelix
25-04-02, 09:42
Das Abholprogramm muss alle benutzten Dateien ordentlich schliessen (manchmal in COBOL schlecht programmiert), dann sollte es auch mit dem DLCOBJ klappen.

Sven Schneider
25-04-02, 11:10
Versuch es mal mit RCLRSC bzw. RCLRSC LVL(*CALLER)

Sven

holli
30-04-02, 13:32
Versuchs doch auch mal mit:
RCLACTGRP *ELIGIBLE

Gruß Holli