Dieses Dokument behandelt die folgenden Themen:
Einen logischen Drucker eingeben.
Dieses Subprogramm kann nur von einem Supervisor oder Systemadministrator benutzt werden.
Sie müssen Druckername und Drucker-TID angeben.
Anmerkung:
Wenn Sie unter Natural Advanced Facilities arbeiten, müssen Sie im
Parameter Drucker-TID den Namen des logischen Druckerprofils eingeben.
Nach der erfolgreichen Ausführung von Z-ADD79 erfolgt immer ein END TRANSACTION. Sie können die Transaktionsverarbeitung nicht kontrollieren.
Parameter | Format | Ein | Aus | Bemerkung |
---|---|---|---|---|
Return-Code | N2 | X | ||
Buero | A8 | E | Das Bürokennzeichen eines Supervisors oder Systemadministrators. | |
Passwort | A8 | E | Das Passwort des o.g. Büros. | |
Druckername | A32 | E | Der Name für den logischen Drucker, der eingegeben werden soll. | |
Drucker-TID | A8 | E | Die Terminal-ID, LU-Nummer oder ein vergleichbares Terminal-Ziel für den Drucker, der benutzt werden soll, wenn ein Teilnehmer den Namen eines logischen Druckers eingibt. | |
Druckerprofil | A32 | O | Das Druckerprofil, das dem logischen Drucker zugeordnet werden soll. | |
Beschreibung | A60/1:4 | O | Eine kurze Beschreibung für den logischen Drucker. | |
Drucker-ISN | P8 | X | Die ISN des neuen logischen Druckers. |
00 | Erfolg |
02 | Ungültiger Büroname oder - nur im Batch-Betrieb - Büro gesperrt |
03 | Falsches Passwort |
15 | Ungültiger Administratorstatus |
84 | Das gewünschte Druckerprofil existiert nicht |
91 | Der Druckername ist nicht eindeutig |
93 | Sie müssen Druckername und Drucker-TID angeben |
Z-120
Z-122
Z-123
Z-1200&0
0010 * 0020 DEFINE DATA 0030 LOCAL 0040 1 RETURN-CODE (N2) 0050 1 BUERO (A8) 0060 1 PASSWORT (A8) 0070 1 DRUCKERNAME (A32) 0080 1 DRUCKER-TID (A8) 0090 1 DRUCKERPROFIL (A32) 0100 1 BESCHREIBUNG (A60/1:4) 0110 1 DRUCKER-ISN (P8) 0120 * 0130 END-DEFINE 0140 * 0150 RESET RETURN-CODE 0160 MOVE 'LS' TO BUERO 0170 MOVE 'PASSWORT' TO PASSWORT 0180 MOVE 'DRUCKERNAME' TO DRUCKERNAME 0190 MOVE 'TID' TO DRUCKER-TID 0200 MOVE 'DRUCKERPROFIL' TO DRUCKERPROFIL 0210 MOVE 'BESCHREIBUNG-1' TO BESCHREIBUNG(1) 0220 MOVE 'BESCHREIBUNG-2' TO BESCHREIBUNG(2) 0230 MOVE 'BESCHREIBUNG-3' TO BESCHREIBUNG(3) 0240 MOVE 'BESCHREIBUNG-4' TO BESCHREIBUNG(4) 0250 * 0260 CALLNAT 'Z-ADD79' 0270 RETURN-CODE 0280 BUERO 0290 PASSWORT 0300 DRUCKERNAME 0310 DRUCKER-TID 0320 DRUCKER-PROFIL 0330 BESCHREIBUNG(*) 0340 DRUCKER-ISN 0350 * 0360 IF RETURN-CODE = 0 0370 WRITE 'Der logische Drucker wurde eingegeben' 0380 ELSE 0390 WRITE 'Return-Code:' RETURN-CODE 0400 END-IF 0410 * 0420 END