Z-PRI11Y

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Ein Cnf- oder Zwi-Dokument formatieren und drucken. Mit diesem Subprogramm können Sie auch ein Txt-Dokument drucken.

Sie müssen darauf achten, dass Con-form dem aufrufenden Programm zur Verfügung steht.

Dieses Subprogramm entspricht Z-PRI11I mit der Ausnahme, dass der Parameter ISN das Format P10 hat.

Wenn Sie den Parameter Anlagen markieren, muss jede Anlage in einem druckbaren Format sein (d.h. Txt, Cnf oder Zwi). Wenn eine der Anlagen nicht in einem druckbaren Format ist, wird der Return-Code 88 ausgegeben.

Um den Con-form-Buffer nach dem Drucken des formatierten Dokuments zurückzusetzen, müssen Sie den Parameter Zuruecksetzen-Buffer markieren.

Wenn Sie Con-nect von einem PC aus aufrufen, können Sie das formatierte Dokument auch auf dem Drucker ausgeben, der an Ihren PC angeschlossen ist.

Die aufrufende Routine sollte eine Druckerdefinition in der folgenden Form enthalten:

IF DRUCKER-TID EQ 'PC'
   DEFINE PRINTER(#OUT=5)
ELSE
   DEFINE PRINTER(#OUT=5) OUTPUT DRUCKER-TID
END-IF

Es gelten die folgenden Regeln:

  • Wenn Drucker-TID gleich Binärnull (Format B8) ist, wird DEFINE PRINTER nicht ausgeführt.

  • Wenn Drucker-TID leer oder gleich PC ist, wird DEFINE PRINTER (5) unabhängig vom aktuellen Gerät ausgeführt. Es gibt eine Ausnahme: wenn Drucker-TID gleich PC und *DEVICE ungleich PC ist, wird der Return-Code 5 ausgegeben und die Routine wird beendet.

  • Bei jedem anderen Wert von Drucker-TID wird Folgendes ausgegeben, unabhängig vom aktuellen Gerät:

    DEFINE PRINTER (5) OUTPUT PRINTER-TID
    

Wenn Sie ein Dokument ausdrucken, das sich zur Zeit im Ordner Neu des Fachs Posteingang befindet, wird die dazugehörende Empfängerliste aktualisiert (d.h. der Empfangsstatus des Dokuments weist nun darauf hin, dass das Dokument gelesen wurde) und das Dokument wird in den Ordner Gelesen gestellt.

Nach der erfolgreichen Ausführung von Z-PRI11Y erfolgt immer ein END TRANSACTION. Sie können die Transaktionsverarbeitung nicht kontrollieren.

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2   X  
Buero A8 E   Das Büro, in dem das Dokument gedruckt werden soll.
Passwort A8 E   Das Passwort des o.g. Büros.
Dokumentname A32 E*   Der Name des Dokuments, das gedruckt werden soll. Entweder Dokumentname oder ISN, nicht beides.
ISN P10 E*   Die ISN des Dokuments, das gedruckt werden soll. Entweder ISN oder Dokumentname, nicht beides. Vor dem Aufruf dieses Subprogramms können Sie Z-DIS11X aufrufen, um die ISN des gewünschten Dokuments auszugeben.
Drucker-TID A8 E   Die Terminal-ID, LU-Nummer oder ein vergleichbares Terminal-Ziel für den Drucker, der benutzt werden soll.
Von-Seite N3 O   Wenn Seitenumbrüche definiert wurden, können Sie angeben, mit welcher Seite der formatierte Ausdruck beginnen soll.
Bis-Seite N3 O   Wenn Seitenumbrüche definiert wurden, können Sie angeben, mit welcher Seite der formatierte Ausdruck enden soll.
Druckerprofil A32 O   Der Name des Profils, das für diesen Drucker definiert wurde. Wenn Sie diesen Parameter nicht markieren, wird kein Druckerprofil benutzt.
Formatierprofil A32 O   Der Name des Profils, das zum Formatieren benutzt werden soll. Wenn Sie diesen Parameter nicht markieren, wird kein Formatierprofil benutzt.
Systemvariablen A1 O   Wenn markiert, werden die Systemvariablen durch die entsprechenden Werte ersetzt.
Anlagen A1 O   Wenn markiert, werden die Anlagen gedruckt. Die Anlagen müssen die Formate Cnf, Zwi oder Txt haben.
Zuruecksetzen-Buffer A1 O   Wenn markiert, wird der Con-form-Buffer nach dem Drucken aller formatierten Dokumente zurückgesetzt.
Flags
  Oeffnen-Flag L O   Wenn wahr, wird der Drucker vor jedem formatierten Ausdruck initialisiert. Wenn falsch, wird die Initialisierung unterdrückt. Vorgabe: falsch.
  Schliessen-Flag L O   Wenn wahr, wird der Drucker nach jedem formatierten Ausdruck in seinen Ursprungszustand zurückgesetzt. Wenn falsch, wird das Zurücksetzen unterdrückt. Vorgabe: falsch.
  Meldungs-Flag L O   Wenn wahr, werden Con-form-Meldungen gedruckt. Wenn falsch, werden Con-form-Meldungen unterdrückt. Vorgabe: falsch.
  Hauptdrucker-Flag L O   Wenn wahr, werden Con-form-Meldungen an Natural-Report 0 (Bildschirm) gesendet. Wenn falsch, erscheinen Con-form-Meldungen im formatierten Text. Vorgabe: falsch. Gilt nur, wenn Meldungs-Flag wahr ist.

Return-Codes

00 Erfolg
02 Ungültiger Büroname
03 Falsches Passwort
04 ISN wurde nicht gefunden
05 TID/LU ist kein PC
08 Geben Sie entweder ISN oder Name ein - nicht beides
09 ISN zeigt nicht auf das richtige Objekt
51 Ungültiger Name
53 Das gewünschte Objekt existiert nicht
81 Ungültiger Name für Formatierprofil
82 Das gewünschte Formatierprofil existiert nicht
83 Ungültiger Name für Druckerprofil
84 Das gewünschte Druckerprofil existiert nicht
85 Kompilierte Version des Druckerprofils wurde nicht gefunden
86 Modul für Druckertreiber kann nicht geladen werden
87 Systemadresssatz für Systemvariablen wurde nicht gefunden
88 Das Dokument ist in keinem korrekten Druckformat
90 Der Parameter Von-Seite darf nicht größer sein als der Parameter Bis-Seite

Subprogramme

Z-105
Z-120
Z-122
Z-123
Z-165
Z-170
Z-175
Z-177
Z-194
Z-197
Z-222
Z-223
Z-400
Z-401
Z-1200&0

Beispiel

0010 *
0020 * Cnf- oder Zwi-Dokument formatieren und drucken
0030 *
0040 DEFINE DATA
0050 LOCAL
0060 1 RETURN-CODE          (N2)
0070 1 BUERO                (A8)
0080 1 PASSWORT             (A8)
0090 1 DOKUMENTNAME         (A32)
0100 1 ISN                  (P10)
0110 1 DRUCKER-TID          (A8)
0120 1 VON-SEITE            (N3)
0130 1 BIS-SEITE            (N3)
0140 1 DRUCKERPROFIL        (A32)
0150 1 FORMATIERPROFIL      (A32)
0160 1 SYSTEMVARIABLEN      (A1)
0170 1 ANLAGEN              (A1)
0180 1 ZURUECKSETZEN-BUFFER (A1)
0190 1 OEFFNEN-FLAG         (L)
0200 1 SCHLIESSEN-FLAG      (L)
0210 1 MELDUNGS-FLAG        (L)
0220 1 HAUPTDRUCKER-FLAG    (L)
0230 *
0240 END-DEFINE
0250 *
0260 RESET RETURN-CODE
0270 *
0280 MOVE 'TID     ' TO DRUCKER-TID
0290 *
0300 IF  DRUCKER-TID EQ 'PC'
0310   DEFINE PRINTER(#OUT=5)
0320 ELSE
0330   DEFINE PRINTER(#OUT=5) OUTPUT DRUCKER-TID
0340 END-IF
0350 *
0360 FORMAT(#OUT) PS=250 LS=129
0370 *
0380 MOVE 'BUERO'    TO BUERO
0390 MOVE 'PASSWORT' TO PASSWORT
0400 MOVE 1234567890 TO ISN
0410 *
0420 MOVE 'X'        TO SYSTEMVARIABLEN
0430 MOVE 'X'        TO ANLAGEN
0440 MOVE 'X'        TO ZURUECKSETZEN-BUFFER
0450 MOVE TRUE       TO MELDUNGS-FLAG
0460 *
0470 CALLNAT 'Z-PRI11Y'
0480   RETURN-CODE
0490   BUERO
0500   PASSWORT
0510   DOKUMENTNAME
0520   ISN
0530   DRUCKER-TID
0540   VON-SEITE
0550   BIS-SEITE
0560   DRUCKERPROFIL
0570   FORMATIERPROFIL
0580   SYSTEMVARIABLEN
0590   ANLAGEN
0600   ZURUECKSETZEN-BUFFER
0610   OEFFNEN-FLAG
0620   SCHLIESSEN-FLAG
0630   MELDUNGS-FLAG
0640   HAUPTDRUCKER-FLAG
0650 *
0660 IF  RETURN-CODE EQ 0
0670   WRITE 'Dokument wurde gedruckt' RETURN-CODE
0680 ELSE
0690   WRITE 'Return-Code ' RETURN-CODE
0700 END-IF
0710 *
0720 END