Erzeugen Von Druckdateien - Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch

Dateiverarbeitung

9.2.6 Erzeugen von Druckdateien

COBOL-Sprachmittel für Druckdateien
Die Erstellung von Dateien, die auf einem Drucker ausgegeben werden sollen, wird von
COBOL2000 durch folgende Sprachmittel unterstützt:
– die Angabe von symbolischen Gerätenamen in der ASSIGN-Klausel
– die LINAGE-Klausel in der Dateierklärung
– Die ADVANCING- und die END-OF-PAGE-Angabe in der WRITE-Anweisung
Der Einsatz dieser Sprachmittel ist im Handbuch „COBOL2000-Sprachbeschreibung" [1]
detailliert beschrieben. Die folgende Tabelle zeigt die Verwendung der symbolischen Gerä-
tenamen in Verbindung mit der WRITE-Anweisung und die Generierung der entsprechen-
den Vorschubsteuerzeichen:
symboli-
scher Gerä-
tename
PRINTER
literal
PRINTER
PRINTER01 -
PRINTER99
literal
Tabelle 20: Verwendung symbolischer Gerätenamen in Verbindung mit der WRITE-Anweisung
U41113-J-Z125-6
WRITE-Anweisung
ohne ADVANCING-
Angabe
Standardvorschub bei
fehlender ADVANCING-
Angabe entspricht der
Angabe AFTER 1LINE;
das erste Zeichen des
Datensatzes steht für
Benutzerdaten zur Ver-
fügung.
wie oben
Der Vorschub wird durch
das erste Zeichen in
jedem logischen Daten-
satz kontrolliert; der
Benutzer muss daher
vor der Ausführung
jeder solchen WRITE-
Anweisung das geeig-
nete Steuerzeichen dort
zur Verfügung stellen.
WRITE-Anweisung
mit ADVANCING-An-
gabe
Das erste Zeichen des
Datensatzes steht für
Benutzerdaten zur Verfü-
gung.
wie oben
Der Benutzer muss das
erste Zeichen eines logi-
schen Datensatzes reser-
vieren; an diese Stelle
wird vom Laufzeitsystem
zum Programmablauf
das Vorschubzeichen
eingetragen. Eventuell
enthaltene Benutzerda-
ten werden überschrie-
ben.
Sequenzielle Dateien
Kommentar
Der Platz für das Vorschubzeichen wird
vom Compiler reserviert und ist dem Be-
nutzer nicht zugänglich. Für diesen
Druckertyp ist die Angabe der LINAGE-
Klausel in der Dateierklärung möglich. Es
sind sowohl WRITE-Anweisungen mit als
auch ohne ADVANCING-Angabe für eine
Datei zulässig.
Der Platz für das Vorschubzeichen wird
vom Compiler reserviert und ist dem
Benutzer nicht zugänglich. Die LINAGE-
Klausel ist für diese Datei nicht erlaubt.
Die Verwendung einer WRITE-Anwei-
sung mit und ohne ADVANCING-Angabe
für ein und dieselbe Datei ist nicht zuläs-
sig. Sollte dennoch dieser Fall eintreten,
wird für Sätze ohne ADVANCING-
Angabe ein WRITE AFTER ADVANCING
1 LINE implizit durchgeführt.
Es dürfen WRITE-Anweisungen mit und
ohne ADVANCING-Angabe gemischt
verwendet werden. In beiden Fällen
beginnt jedoch die Benutzerinformation
des Druckersatzes erst ab dem zweiten
Zeichen des Datensatzes.
205