Marenex5 - Exit Beim Lesen Eines Katalogeintrags - Fujitsu BS2000 Handbuch

9.5 MARENEX5 - Exit beim Lesen eines Katalogeintrags

Der Read-Exit wird nach dem Lesen eines Katalogeintrags aufgerufen. Er kann z.B. folgende Aktionen vornehmen:
Die Übergabe des Katalogeintrags an den Aufrufer ablehnen.
In dem an den Aufrufer zu übergebenden Katalogeintrag einzelne Informationen löschen oder ersetzen. Diese
Änderungen betreffen jedoch nur die Übergabe. Es werden keine Änderungen am Katalogeintrag vorgenommen.
Bei Restart kann das Dateifreigabedatum herabgesetzt werden.
Der Read-Exit wird vom Programm MARENCP und, falls Direktzugriff auf den MARENCAT möglich ist, von den
Programmen MARENADM und MARENUCP verwendet.
Eine Liste der beim Aufruf des Read-Exits möglichen Funktionsnamen befindet sich im
in MAREN" .
Im Aufruferbereich sind folgende Katalogeintragsfelder besetzt:
LATSN TSN der aufrufenden Task
LAUSERID Benutzerkennung der aufrufenden Task
LAACC Abrechnungsnummer der aufrufenden Task
LAJOB Jobname der aufrufenden Task
LACPU Name des Systems, an dem der Aufruf erfolgt (HOSTNAME aus der MARENCP-
Startprozedur)
LAFUNKFL C'09'
LAFUNKNM Name der aufrufenden Routine
NUMMANFV Archivnummer
NUMMANFF Dateifolgenummer
Falls LAFUNKNM=MOUNT (MAREN-Anweisung MOUNT-VOLUME), dann außerdem:
OPENTYP C'IN' (ACCESS-READ) oder C'OU' (ACCESS-WRITE)
Falls LAFUNKNM=MARENO01 (DVS-Aufruf OPEN REQUEST), dann außerdem:
OPENTYP Modus der Dateieröffnung
FILENM41 Dateiname
CRCATID Katalogkennung der Datei (nur falls system-spezifischer MAREN-Parameter CID-UID
gesetzt)
CRUSERID Benutzerkennung der Datei (nur falls system-spezifischer MAREN-Parameter CID-UID
gesetzt)
Parameterübergabe
Folgende Informationen werden an den Read-Exit übergeben:
Register 1
Abschnitt „Funktionsnamen
200