Z-DIS05F

Dieses Dokument behandelt die folgenden Themen:

Beschreibung

Das Büroprofil eines bestimmten Büros anzeigen.

Dieses Subprogramm kann nur von einem Supervisor oder Büroadministrator benutzt 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. Um das Büroprofil zu ändern, können Sie nach dem Aufruf dieses Subprogramms Z-MOD05F aufrufen.

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 angezeigt werden soll. Entweder Bueroname oder Buero-ISN, nicht beides.
Buero-ISN P8 E*   Die ISN des Büros, dessen Profil angezeigt werden soll. Entweder Buero-ISN oder Bueroname, nicht beides.
Berechtigungsstufen A4   X Siehe die Redefinition unten.
Redefine Berechtigungsstufen
  Berechtigung-Lesen A1   X Die Berechtigungsstufe für das Lesen. Ein Wert zwischen 0 und 9.
  Berechtigung-Aendern A1   X Die Berechtigungsstufe für das Ändern. Ein Wert zwischen 0 und 9.
  Berechigung-Kopieren A1   X Die Berechtigungsstufe für das Kopieren. Ein Wert zwischen 0 und 9.
  Berechtigung-Drucken A1   X Die Berechtigungsstufe für das Drucken. Ein Wert zwischen 0 und 9.
Maximale-Empfaenger N4   X Die maximale Anzahl von Empfängern, an die ein Objekt während eines Sendevorgangs gesendet werden kann. Werte 1 bis 9999.
Adressierstufe N1   X Die Adressierstufe schränkt die Sendefunktion ein. Ein Wert zwischen 0 und 9.
Stufen-hoeher N1   X Die Anzahl von höheren Stufen, an die der Teilnehmer Post senden darf. Ein Wert zwischen 0 und 9.
Erlauben-Flags A12   X Siehe die Redefinition unten.
Redefine Erlauben-Flags
  Befehlsfenster A1   X Wenn markiert, erscheint bei einer fehlerhaften oder nicht eindeutigen Befehlseingabe ein Fenster.
  Con-form A1   X Wenn markiert, kann Con-form benutzt werden.
  Text-Retrieval A1   X Wenn markiert, kann Con-nect Text Retrieval benutzt werden (wenn es installiert wurde).
  Proofreader A1   X Con-nect Proofreader wird nicht mehr unterstützt.
  Eigene-Adresse-aendern A1   X Wenn markiert, kann der Teilnehmer die eigene Büro- oder Privatanschrift ändern.
  Privatadressen-zeigen A1   X Wenn markiert, kann der Teilnehmer die Privatanschrift jedes beliebigen Teilnehmers anzeigen (einschließlich der eigenen Privatanschrift).
  Externe-Post-versenden A1   X Wenn markiert, kann der Teilnehmer Post an externe Knoten (z.B. Telex oder SNADS) senden.
  Ablaufdatum-aendern A1   X Wenn markiert, kann der Teilnehmer das Ablaufdatum eines Objekts ändern.
  Post-lesen A1   X Wenn markiert, kann der Teilnehmer die Post im eigenen Posteingangsfach lesen.
  Fuellparameter A3   X 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
96 Angabe im Parameter Bueroname ist ungültig
97 Ungültige Buero-ISN

Subprogramme

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

Beispiel

0010 *
0020 * Beispielprogramm zum Anzeigen 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 *
0390 CALLNAT 'Z-DIS05F'
0400     RETURN-CODE
0410     BUERO
0420     PASSWORT
0430     BUERONAME
0440     BUERO-ISN
0450     BERECHTIGUNGSSTUFEN
0460     MAXIMALE-EMPFAENGER
0470     ADRESSIERSTUFE
0480     STUFEN-HOEHER
0490     ERLAUBEN-FLAGS
0500 *
0510 IF RETURN-CODE = 0
0520   DISPLAY BUERONAME BERECHTIGUNGSSTUFEN MAXIMALE-EMPFAENGER ADRESSIERSTUFE
0530   STUFEN-HOEHER ERLAUBEN-FLAGS
0540 ELSE
0550   WRITE 'Return-Code' RETURN-CODE
0560 END-IF
0570 *
0580 END