Wird in den Anweisungen ASSIGN-INPUT-FILE bzw. ASSIGN-OUTPUT-FILE im Operanden LABEL-EXIT ein Benutzerausgang angegeben, verzweigt PERCON nach dem Lesen bzw. vor dem Schreiben eines Kennsatzes in den angegebenen Benutzermodul.
Register 1 zeigt auf folgende Adressleiste:
A(Parameterbereich) A(FCB) X'80000000'
Der Aufbau des Parameterbereichs ist im Kapitel "Gemeinsamer Parameterbereich der Anschlüsse" beschrieben.
Der Parameterbereich wird mit folgenden Werten versehen:
Kennzeichen des Anschlusses: X'00' |
Zusatzinformation | Bedeutung |
X'00' | Ausgang OPENV für UVL-Kennsätze |
X'04' | Ausgang LABGN für UHL-Kennsätze |
X'08' | Ausgang LABEOV für UTL-Kennsätze bei Bandwechsel |
X'0C' | Ausgang LABEND für UTL-Kennsätze |
X'10' | Ausgang LABERR für fehlerhafte Bandendekennsätze |
X'14' | Ausgang CLOSPOS zur Positionierung des Bandes bei der CLOSE-Bearbeitung |
Beschreibung der einzelnen Ausgänge, siehe Handbuch [11] "DVS Makros", EXLST-Makro.
Bei Nicht-Standard-Kennsätzen liest/schreibt der Benutzer seine Kennsätze mit der Zugriffsmethode BTAM selbst und gibt die Steuerung an PERCON ohne Returncode zurück.
Bei Standard-Kennsätzen zeigt das Register 0 auf den Anfang des Benutzerkennsatzes, der Benutzer prüft/erstellt den Kennsatz selbst und gibt die Steuerung an PERCON mit dem Returncode X’F1’ zurück, wenn die Benutzer-Kennsatzbearbeitung abgeschlossen werden soll, bzw. mit X’F2’, wenn die Kennsatzbearbeitung durch PERCON fortgesetzt werden soll.
Für Dateien mit Standard-Kennsätzen wird zum LABERR-Ausgang verzweigt, wenn während der Bandendebearbeitung ein Fehler aufgetreten ist. Der Fehlercode ist aus dem ID1ECB-Feld des FCB ersichtlich.
Über den Ausgang CLOSPOS kann der Benutzer Positionierungen des Bandes zur Zeit der CLOSE-Bearbeitung vornehmen. Nachdem der Benutzer das Band mit BTAM-Makroaufrufen positioniert hat, gibt er die Steuerung ohne Returncode an PERCON zurück.
(Nähere Beschreibung dieser Ausgänge siehe Handbuch [11] "DVS Makros").
Die Rückkehr zu PERCON ist mit folgenden Returncodes möglich:
Returncode | Bedeutung |
X'00' | Bandwechsel durchführen, als ob die richtigen EOV/EOF-Kennsätze gelesen worden wären. |
X'01' | Prozess mit Fehler beenden. |
X'02' | Dateiendebearbeitung durchführen. |
X'F1' | Benutzerkennsatzbearbeitung beenden. |
X'F2' | Benutzerkennsatzbearbeitung durch PERCON fortsetzen. |