Z-MOD05F

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Das Büroprofil eines bestimmten Büros ändern.

Dieses Subprogramm kann nur von einem Supervisor oder Büroadministrator benutzt werden. Das Teilnehmerprofil des Büros SYSCNT kann mit diesem Subprogramm nicht geändert werden.

Um die ISN des gewünschten Büros auszugeben, können Sie vor dem Aufruf dieses Subprogramms entweder Z-ADD05 oder Z-DIS05 aufrufen.

Die Parameter, die nicht mit Werten gefüllt werden, werden aus dem Teilnehmerprofil gelöscht. Um die bestehenden Werte beizubehalten, müssen Sie sie daher vor dem Aufruf dieses Subprogramms erneut angeben.

Nach der erfolgreichen Ausführung von Z-MOD05F 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ürokennzeichen eines Supervisors oder Büroadministrators.
Passwort A8 E   Das Passwort des o.g. Büros.
Bueroname A8 E*   Der Name des Büros, dessen Profil geändert werden soll. Entweder Bueroname oder Buero-ISN, nicht beides.
Buero-ISN P8 E*   Die ISN des Büros, dessen Profil geändert werden soll. Entweder Buero-ISN oder Bueroname, nicht beides.
Berechtigungsstufen A4 E   Siehe die Redefinition unten.
Redefine Berechtigungsstufen
  Berechtigung-Lesen A1 E   Die Berechtigungsstufe für das Lesen. Ein Wert zwischen 0 und 9.
  Berechtigung-Aendern A1 E   Die Berechtigungsstufe für das Ändern. Ein Wert zwischen 0 und 9.
  Berechigung-Kopieren A1 E   Die Berechtigungsstufe für das Kopieren. Ein Wert zwischen 0 und 9.
  Berechtigung-Drucken A1 E   Die Berechtigungsstufe für das Drucken. Ein Wert zwischen 0 und 9.
Maximale-Empfaenger N4 E   Die maximale Anzahl von Empfängern, an die ein Objekt während eines Sendevorgangs gesendet werden kann. Werte 1 bis 9999.
Adressierstufe N1 O   Die Adressierstufe schränkt die Sendefunktion ein. Ein Wert zwischen 0 und 9. Die Summe aus Adressierstufe und Stufen-hoeher darf nicht größer als 9 sein.
Stufen-hoeher N1 O   Die Anzahl von höheren Stufen, an die der Teilnehmer Post senden darf. Ein Wert zwischen 0 und 9. Die Summe aus Stufen-hoeher und Adressierstufe darf nicht größer als 9 sein.
Erlauben-Flags A12 O   Siehe die Redefinition unten.
Redefine Erlauben-Flags
  Befehlsfenster A1 O   Wenn markiert, erscheint bei einer fehlerhaften oder nicht eindeutigen Befehlseingabe ein Fenster.
  Con-form A1 O   Wenn markiert, kann Con-form benutzt werden.
  Text-Retrieval A1 O   Wenn markiert, kann Con-nect Text Retrieval benutzt werden (wenn es installiert wurde).
  Proofreader A1 O   Con-nect Proofreader wird nicht mehr unterstützt.
  Eigene-Adresse-aendern A1 O   Wenn markiert, kann der Teilnehmer die eigene Büro- oder Privatanschrift ändern.
  Privatadressen-zeigen A1 O   Wenn markiert, kann der Teilnehmer die Privatanschrift jedes beliebigen Teilnehmers anzeigen (einschließlich der eigenen Privatanschrift).
  Externe-Post-versenden A1 O   Wenn markiert, kann der Teilnehmer Post an externe Knoten (z.B. Telex oder SNADS) senden.
  Ablaufdatum-aendern A1 O   Wenn markiert, kann der Teilnehmer das Ablaufdatum eines Objekts ändern.
  Post-lesen A1 O   Wenn markiert, kann der Teilnehmer die Post im eigenen Posteingangsfach lesen.
  Fuellparameter A3 O   Für den späteren Gebrauch.

Return-Codes

00 Erfolg
02 Ungültiger Büroname oder - nur im Batch-Betrieb - Büro gesperrt
03 Falsches Passwort
08 Geben Sie entweder ISN oder Name ein - nicht beides
15 Ungültiger Administratorstatus
91 Geben Sie Bueroname oder Buero-ISN ein
92 Ungültiger Wert für Maximale-Empfaenger; der Wert muss größer als 0 sein
93 Geben Sie numerische Werte ein
94 Die Summe aus Adressierstufe und Stufen-hoeher darf nicht größer als 9 sein
95 Die Werte dürfen nicht größer als die Systemwerte sein
96 Angabe im Parameter Bueroname ist ungültig
97 Ungültige Buero-ISN
99 Das Büro SYSCNT darf nicht geändert werden

Subprogramme

Z-120
Z-122
Z-123
Z-1200&0

Beispiel

0010 *
0020 * Beispielprogramm zum Aendern des Bueroprofils eines Teilnehmers
0030 *
0040 *
0050 DEFINE DATA
0060 LOCAL
0070 1 RETURN-CODE              (N2)
0080 1 BUERO                    (A8)
0090 1 PASSWORT                 (A8)
0100 1 BUERONAME                (A8)
0110 1 BUERO-ISN                (P8)
0120 1 BERECHTIGUNGSSTUFEN      (A4)
0130 1 REDEFINE BERECHTIGUNGSSTUFEN
0140   2 BERECHTIGUNG-LESEN     (A1)
0150   2 BERECHTIGUNG-AENDERN   (A1)
0160   2 BERECHTIGUNG-KOPIEREN  (A1)
0170   2 BERECHTIGUNG-DRUCKEN   (A1)
0180 1 MAXIMALE-EMPFAENGER      (N4)
0190 1 ADRESSIERSTUFE           (N1)
0200 1 STUFEN-HOEHER            (N1)
0210 1 ERLAUBEN-FLAGS           (A12)
0220 1 REDEFINE ERLAUBEN-FLAGS
0230   2 BEFEHLSFENSTER         (A1)
0240   2 CON-FORM               (A1)
0250   2 TEXT-RETRIEVAL         (A1)
0260   2 PROOFREADER            (A1)
0270   2 EIGENE-ADRESSE-AENDERN (A1)
0280   2 PRIVATADRESSEN-ZEIGEN  (A1)
0290   2 EXTERNE-POST-VERSENDEN (A1)
0300   2 ABLAUFDATUM-AENDERN    (A1)
0310   2 POST-LESEN             (A1)
0320 END-DEFINE
0330 *
0340 RESET RETURN-CODE
0350 MOVE 'BUERO'     TO BUERO
0360 MOVE 'PASSWORT'  TO PASSWORT
0370 MOVE 'B-NAME'    TO BUERONAME
0380 MOVE '3' TO BERECHTIGUNG-LESEN
0390 MOVE '3' TO BERECHTIGUNG-AENDERN
0400 MOVE '3' TO BERECHTIGUNG-KOPIEREN
0410 MOVE '3' TO BERECHTIGUNG-DRUCKEN
0420 MOVE 5 TO MAXIMALE-EMPFAENGER
0430 MOVE 5 TO ADRESSIERSTUFE
0440 MOVE 1 TO STUFEN-HOEHER
0450 MOVE 'X' TO BEFEHLSFENSTER
0460 MOVE 'X' TO CON-FORM
0470 MOVE 'X' TO TEXT-RETRIEVAL
0480 MOVE 'X' TO PROOFREADER
0490 MOVE 'X' TO EIGENE-ADRESSE-AENDERN 
0500 MOVE 'X' TO PRIVATADRESSEN-ZEIGEN
0510 MOVE 'X' TO EXTERNE-POST-VERSENDEN
0520 MOVE 'X' TO ABLAUFDATUM-AENDERN
0530 MOVE 'X' TO POST-LESEN
0540 *
0550 CALLNAT 'Z-MOD05F'
0560     RETURN-CODE
0570     BUERO
0580     PASSWORT
0590     BUERONAME
0600     BUERO-ISN
0610     BERECHTIGUNGSSTUFEN
0620     MAXIMALE-EMPFAENGER
0630     ADRESSIERSTUFE
0640     STUFEN-HOEHER
0650     ERLAUBEN-FLAGS
0660 *
0670 IF RETURN-CODE = 0
0680   WRITE 'Buero wurde geaendert'
0690 ELSE
0700   WRITE 'Return-Code' RETURN-CODE
0710 END-IF
0720 *
0730 END