Dieses Dokument behandelt die folgenden Themen:
Um einen externen Druckerknoten einzugeben, geben Sie einen Namen für den Knoten im Feld "Externer Knoten/Knotentyp" am unteren Rand des "Administration - Externe Knoten"-Bildschirms ein (dies ist der Name, der als Empfänger beim Versenden von Mitteilungen eingegeben werden muss). Wählen Sie die Funktion "Externen Knoten eingeben".
Daraufhin erscheint der "Administration - Externen Knoten eingeben"-Bildschirm. Sie müssen die erforderlichen Informationen für einen neuen Knoten eingeben (siehe Externen Knoten eingeben). Geben Sie die Adressierstufe und den Knotentyp (G - Drucker) ein, und drücken Sie EINGABE, um das Fenster "Servicetyp waehlen" anzuzeigen. In diesem Fenster geben Sie an, ob der neue Knoten die Spooldatei oder den Transport Service als Übertragungsmethode benutzen soll. Markieren Sie die gewünschte Methode und drücken Sie EINGABE.
Wenn Sie Transport Service auswählen, erscheint das Fenster "Transport Service-Zielknoten eingeben". Geben Sie dort den Namen des Zielknotens ein und drücken Sie EINGABE. Daraufhin erscheint das Fenster "Druckerknoten Knotenname eingeben". Wenn Sie die Spooldatei als Übertragungsmethode wählen, erscheint dieses Fenster sofort.
13:37 * * * C O N - N E C T 3 * * * 31.Jan.2000
Buero LS Administration - Externen Knoten eingeben A06740
+---------------------------------------+
Externer Knoten RICHMOND ! Transport Service-Zielknoten eingeben !
+----------------------------------------- ----------------+
Beschreibun ! Druckerknoten RICHMOND eingeben ! !
! ___________________________________ ! !
Adressierstuf ! ___________________________________ ! !
! ___________________________________ ! !
Knotenty ! ___________________________________ ! !
! ___________________________________ ! !
A Con-nect G ! ___________________________________ ! !
! Programm ________ fuer Kopfzeilen ! !
! ________ fuer Drucken ! !
! Drucker ________ TID oder LU ! !
! Ankreuzen _ Aenderung erlauben ! !
+----------------------------------------- !
+---------------------------------------+
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
Beend Sich
Weiteren Empfaenger eingeben oder Fenster mit PF3 verlassen
|
Die folgenden Parameter können im Fenster "Druckerknoten Knotenname eingeben" angegeben werden:
1. 6 Zeilen mit jeweils 40 Positionen, z.B. für eine Adresse oder einen Parameter
2. Programm zur Vorbereitung der Kopfzeilen (Parameter 1)
3. Programm, das die gesamte Druckausgabe steuert
4. TID oder LU des Druckers, auf dem die Ausgabe erfolgen soll
5. Änderungen für Parameter 1 und 2 erlauben.
Die sechs Zeilen von Parameter 1 sind wie folgt in den ersten 15 Zeilen (Vorgabewert) enthalten, die an den Drucker geschickt werden:
| Zeile | Inhalt |
|---|---|
| 1 | Con-nect-Absender |
| 2 | Con-nect-Datum |
| 3 | Con-nect-Uhrzeit |
| 4 | |
| 5 | Parameter 1.1 |
| 6 | Parameter 1.2 |
| 7 | Parameter 1.3 |
| 8 | Parameter 1.4 |
| 9 | Parameter 1.5 |
| 10 | Parameter 1.6 |
| 11 | |
| 12 | |
| 13 | Con-nect-Betreff |
| 14 | |
| 15 |
Wenn Parameter 1 leer ist oder Änderungen erlaubt sind, erscheint beim Senden das Fenster "Mitteilung drucken". Die Parameter 1 und 2 können vom Teilnehmer geändert werden wie im nächsten Beispiel gezeigt.
9:12 * * * C O N - N E C T 3 * * * 7.Feb.94
Buero LS Senden C09000
Korrekturen
Empfaenger ____________________________________________________________
Gewaehlt 1 Gesendet an 0
ALC36-2 +---------------------------------------+
! Mitteilung drucken !
! ___________________________________ !
! ___________________________________ !
Betreff Korrektur ! ___________________________________ !
------------------ ! ___________________________________ !-------------------
Hallo Thomas, ! ___________________________________ !
! ___________________________________ !
anbei sende ich ! Programm ________ fuer Kopfzeilen !schen uns, dass
unsere Vorschläg ! ________ fuer Drucken !
! Drucker 287_____ TID oder LU !
Grüße, ! Stornieren _ !
Sonya ! !
------------------ +---------------------------------------+-------------------
1 Empfaenger gewaehlt - mit BESTAETIGEN absenden
Befehl / /
Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12---
Hilfe Menue Beend Best Vorgb Empf Letzt BefZe We
|
Wenn Parameter 2 oder 3 den Namen eines API-Subprogramms enthält, und dieses Modul vorhanden ist, werden folgende Parameter benutzt:
| Parameter | Format | Benutzereingabe | Ausgabe | Bemerkungen |
|---|---|---|---|---|
| Lines | N2 | X | X | Anzahl der Druckzeilen. Vorgabewert: 15 |
| Texts | A132/15 | X | X | Ausgabezeilen |
| User | A8 | X | Absender | |
| ISN | P8 | X |
Parameter werden an das API-Subprogramm übergeben, und vom API-Subprogramm zurückgegeben.
Anmerkung:
Con-nect startet keine Druckausgabe für den Parameter User.
Das folgende Programm namens X-GS-D1 wird aufgerufen, um die Kopfzeilen zu formatieren, bevor das Programm X-GS-D2 aufgerufen wird, um das Objekt an den Drucker zu schicken.
0010 DEFINE DATA PARAMETER 0020 1 P-LINE-COUNT (N2) 0030 1 P-TEXTS (A132/15) 0040 * (1) : Sender-Name 0050 * (2) : Sender-Date 0060 * (3) : Sender-Time 0070 * (4) : Empty 0080 * (5:10) : Lines from printer address form 0090 * (11:12) : Empty 0100 * (13) : Subject 0110 * (14:15) : Empty 0120 * 0130 1 P-SENDER-ID (A8) 0140 1 P-ISN (P10) 0150 * 0160 LOCAL 0170 1 #COUNTER (I1) 0180 END-DEFINE 0190 * 0200 COMPRESS 'Subject :' P-TEXTS(13) INTO P-TEXTS(14) 0210 FOR #COUNTER = 12 TO 4 STEP -1 0220 MOVE P-TEXTS(#COUNTER) TO P-TEXTS(#COUNTER +1) 0230 END-FOR 0240 COMPRESS 'Sent By :' P-TEXTS(1) P-SENDER-ID INTO P-TEXTS(1) 0250 COMPRESS 'Date :' P-TEXTS(2) INTO P-TEXTS(2) 0260 COMPRESS 'Time :' P-TEXTS(3) INTO P-TEXTS(3) 0270 * 0280 END
Das Programm X-GS-D2 wird direkt nach Ausführung des Programms X-GS-D1 aufgerufen, um das Objekt an den Drucker zu schicken. Das folgende Beispielprogramm gilt für Drucker, die die Spooldatei benutzen.
0040 DEFINE DATA PARAMETER 0050 1 P-LINE-COUNT (N2) 0060 1 P-TEXTS (A132/15) 0070 1 P-SENDER-ID (A8) 0080 1 P-ISN (P10) 0090 LOCAL 0100 1 #COUNTER (I1) 0110 1 P-STATE (N2) INIT <02> 0120 * 0130 1 SPOOL-FILE VIEW OF CNT-SPOOL 0140 2 TEXT-KEY 0150 2 REDEFINE TEXT-KEY 0160 3 TEXTKEY (B10) 0170 3 TK-TYP (B1) /* 1..100 is text, 255 is Addr.-List 0180 3 TK-FORMAT (B1) 0190 3 TK-MODE (B1) 0200 3 TK-PAGE (B1) 0210 2 DIR-KEY 0220 2 CREATED-ID 0230 2 CREATED-NODE 0240 2 CREATED-DATE 0250 2 CREATED-TIME 0260 2 ORIG-STAMP 0270 2 STATUS-CODE 0280 2 SENDER-NAME 0290 2 SENDER-ID 0300 2 TEXT-LINES (20) 0310 2 REDEFINE TEXT-LINES 0320 3 TL-GROUP (20) 0330 4 TL-CR (N1) 0340 4 TL-TEXT (A250) 0350 2 C*TEXT-LINES 0360 1 #TEXT-KEY (A17) 0370 1 REDEFINE #TEXT-KEY 0380 2 #TK1 (B10) 0390 2 #TK2 (B7) 0400 * 0410 1 #I1 (I1) 0420 1 #TYP (B1) 0430 1 #PAGE (B1) 0440 1 #MODE (B1) 0450 * 0460 END-DEFINE 0470 * 0480 FORMAT(2) LS=133 PS=60 0490 * 0500 * Write out the lines from the program X-GS-D1 0510 * 0520 FOR #COUNTER EQ 1 TO P-LINE-COUNT 0530 WRITE(2) NOTITLE NOHDR P-TEXTS(#COUNTER) (AL=132) 0540 END-FOR 0550 * 0560 READ(1) SPOOL-FILE BY ISN P-ISN P-ISN 0570 MOVE ORIG-STAMP TO #TK1 0580 RESET #TK2 0590 READ SPOOL-FILE BY TEXT-KEY #TEXT-KEY 0600 IF TEXTKEY NE #TK1 /* no more text records 0610 OR TK-TYP GT 100 /* or no text type 0620 ESCAPE BOTTOM 0630 END-IF 0640 IF TK-FORMAT GT 1 0650 ESCAPE BOTTOM /* not a text format (may be binary) 0660 END-IF 0670 * 0680 * If a change in the document-type, page-number-mode or page-number 0690 * is detected and it is not the first one, a new page is written 0700 IF (TK-TYP NE #TYP OR 0710 TK-MODE NE #MODE OR 0720 TK-PAGE NE #PAGE) AND 0730 C*TEXT-LINES GT 0 0740 IF #TYP NE 0 OR 0750 #MODE NE 0 OR 0760 #PAGE NE 0 0770 NEWPAGE(2) 0780 END-IF 0790 MOVE TK-TYP TO #TYP 0800 MOVE TK-PAGE TO #PAGE 0810 MOVE TK-MODE TO #MODE 0820 END-IF 0830 * 0840 IF C*TEXT-LINES GT 0 0850 FOR #COUNTER = 1 TO C*TEXT-LINES 0860 * Handle carriage control information 0870 IF TEXT-LINES(#COUNTER) EQ MASK(N) 0880 IF TL-CR(#COUNTER) GT 1 0890 FOR #I1 = 2 TO TL-CR(#COUNTER) 0900 WRITE(2) NOTITLE NOHDR ' ' 0910 END-FOR 0920 END-IF 0930 END-IF 0940 WRITE(2) NOTITLE NOHDR TL-TEXT(#COUNTER) (AL=132) 0950 END-FOR 0960 END-IF 0970 END-READ 0980 END-READ 0990 CALLNAT 'X-0POST' P-ISN P-STATE 1000 END
Wenn nur eine Kopfzeile benötigt wird, kann ein Programm wie X-GS-U (von dem unten ein Auszug zu sehen ist) aufgerufen werden, um das Objekt an den Drucker zu schicken.
0010 DEFINE DATA PARAMETER 0020 1 LINES(N2) 0030 1 TEXTS(A132/15) 0040 1 USER(A8) 0050 1 ISN(P8) 0060 LOCAL 0070 1 #COUNTER(N2) 0080 END-DEFINE 0090 * 0100 COMPRESS 'Subject :' TEXTS(13) INTO TEXTS(14) 0110 FOR #COUNTER = 12 TO 4 STEP -1 0120 MOVE TEXTS(#COUNTER) TO TEXTS(#COUNTER +1) 0130 END-FOR 0140 COMPRESS 'From :' TEXTS(1) USER INTO TEXTS(1) 0150 COMPRESS 'Date :' TEXTS(2) INTO TEXTS(2) 0160 COMPRESS 'Time :' TEXTS(3) INTO TEXTS(3) 0170 * 0180 END