Drucken unter Cobol

Stellt man sich einen Ausdruck eines Druckers vor, so liegt auf der Hand, daß es sich hier um eine sequentielle Datei handeln muß, die den Ausdruck zeilenweise voran bringt. Daher wird der Drucker wie eine sequentielle Datei behandelt.
Um den Drucker verwenden zu können, muß man ihn zunächst in der ENVIRONMENT DIVISION anmelden.
Genau geschieht dies wie bei allen Dateien in der INPUT-OUTPUT SECTION im FILE-CONTROL Paragraphen mit den SELECT und ASSIGN Klauseln.
Hinter ASSIGN wird zur Ansprache des Druckers das Literal verwandt, welches in der CONFIGURATION SECTION im SPECIAL-NAMES-Paragraphen hinter PRINTER hierfür vorgesehen wurde. Natürlich kann der Drucker auch direkt unter "PRN" oder "LPT" bis "LPT-3" angesprochen werden.
Beschrieben wird die Druckdatei in der DATA DIVISION. Dort muß auch eine mit SELECT angemeldete Druckdatei in der FILE SECTION mit der Stufenbezeichnung FD beschrieben werden.
Die Drucksteuerung findet hauptsächlich mit Hilfe der WRITE-Anweisung statt. So wird die Zeilen- und Seitensteuerung hauptsächlich durch den ADVANCING-Zusatz verwirklicht.
Des Weiteren hält Cobol auch eine 'Layouthilfe' für die Seitensteuerung bereit, welche in der FILE SECTION vorbereitet wird und ebenfalls mit der WRITE-Anweisung umgesetzt wird.
Die Druckersteuerung (Fettdruck, Schriftgröße etc.) wird ebenfalls mit Hilfe der WRITE-Anweisung realisiert, wobei auf die ESCAPE-Sequenzen der einzelnen Drucker zurückgegriffen wird.
Sollen kleine Mengen von Daten an den Drucker geschickt werden, kann hierzu auch der DISPLAY-Befehl verwendet werden:

DISPLAY "- Verarbeitungsfehler -" UPON Drucker.
Natürlich muß auch hier im SPECIAL NAMES-Paragraphen der Merkname (Drucker) dem PRINTER zugeordnet worden sein.

...