Z-INFPRA

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Die Druckvorgaben eines Büros ausgeben.

Dieses Subprogramm entspricht Z-INFPR mit der Ausnahme, dass es auch die Parameter Linker-Rand und Zeilenumbruch ausgibt.

Wenn Sie den Parameter Buero nicht angeben (d.h. wenn Sie den Parameter Logischer-Druckername als einzigen Parameter angeben), gibt dieses Subprogramm das Druckerziel (TID oder LU) für den Drucker und das damit verknüpfte Druckerprofil aus.

Wenn Sie den Parameter Buero angeben, gibt dieses Subprogramm die Druckvorgaben für das Büro aus.

Anmerkung:
Wenn Sie beide Parameter angeben, wird die Angabe im Parameter Logischer-Druckername ignoriert und die Druckvorgaben werden ausgegeben.

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2   X  
Buero A8 E*   Der Name des Büros, für das Sie die Druckvorgaben ausgeben wollen. Wenn Sie das Druckerziel (TID oder LU) ausgeben wollen, muss dieser Parameter leer sein.
Logischer-Druckername A32 E* X Der Name des Druckers.
TID/LU A8   X Das Druckerziel für den angegebenen Drucker. Wird nur ausgegeben, wenn der Parameter Buero leer ist.
Druckerprofil A32   X Der Name des Profils, das beim Drucken eines Objekts benutzt wird.
Formatierprofil A32   X Der Name des Profils, das beim Formatieren eines Dokuments benutzt wird.
Seitenlaenge N4   X Die Anzahl der Zeilen pro Seite.
Zeilenbreite N4   X Die Anzahl der Zeichen pro Zeile.
Con-form A1   X Wenn nicht markiert, kann der Teilnehmer Con-form nicht benutzen. In diesem Fall kann der Teilnehmer die Befehle FORMATIEREN und AUSGABE nicht benutzen und kann kein Druckerprofil EINGEBEN, ZEIGEN oder AENDERN.
Info-drucken A1   X Markiert, wenn die Information aus dem "Info"-Schirm gedruckt wird.
Notizen-drucken A1   X Markiert, wenn Notizen, Begleitschreiben und Anlagen gedruckt werden.
Empfaenger-drucken A1   X Markiert, wenn die Empfängerliste von Post gedruckt wird.
Linker-Rand N2   X Die Anzahl der Leerzeichen am Anfang jeder gedruckten Zeile. Wird nur ausgegeben, wenn der Parameter Buero angegeben wurde. Wird nicht ausgegeben für Logischer-Druckername.
Zeilenumbruch A1   X Markiert, wenn die gedruckten Zeilen umgebrochen werden. Wenn nicht markiert, werden die Zeilen abgeschnitten. Wird nur ausgegeben, wenn der Parameter Buero angegeben wurde. Wird nicht ausgegeben für Logischer-Druckername.

Return-Codes

00 Erfolg
02 Ungültiger Büroname oder - nur im Batch-Betrieb - Büro gesperrt
91 Drucker wurde nicht gefunden

Subprogramme

Keine

Beispiel

DEFINE DATA
LOCAL
*
1 RETURN-CODE           (N2)
1 BUERO                 (A8)
1 LOGISCHER-DRUCKERNAME (A32)
1 TID/LU                (A8)
1 DRUCKERPROFIL         (A32)
1 FORMATIERPROFIL       (A32)
1 SEITENLAENGE          (N4)
1 ZEILENBREITE          (N4)
1 CON-FORM              (A1)
1 INFO-DRUCKEN          (A1)
1 NOTIZEN-DRUCKEN       (A1)
1 EMPFAENGER-DRUCKEN    (A1)
1 LINKER-RAND           (N2)
1 ZEILENUMBRUCH         (A1)
*
END-DEFINE
*
MOVE 'Buero' TO BUERO
*
CALLNAT 'Z-INFPRA'
  RETURN-CODE
  BUERO
  LOGISCHER-DRUCKERNAME
  TID/LU
  DRUCKERPROFIL
  FORMATIERPROFIL
  SEITENLAENGE
  ZEILENBREITE
  CON-FORM
  INFO-DRUCKEN
  NOTIZEN-DRUCKEN
  EMPFAENGER-DRUCKEN
  LINKER-RAND
  ZEILENUMBRUCH
*
WRITE
  '='    BUERO /
  '='    TID/LU /
  '='    LOGISCHER-DRUCKERNAME /
  '='    DRUCKERPROFIL /
  '='    FORMATIERPROFIL /
  '='    SEITENLAENGE /
  '='    ZEILENBREITE /
  '='    CON-FORM /
  '='    INFO-DRUCKEN /
  '='    NOTIZEN-DRUCKEN /
  '='    EMPFAENGER-DRUCKEN /
  '='    LINKER-RAND /
  '='    ZEILENUMBRUCH //
*
IF RETURN-CODE NE 0
  WRITE / 'Return-Code' RETURN-CODE
ELSE
  WRITE / 'Return-Status OK'
END-IF
*
END