Dieses Dokument behandelt die folgenden Themen:
Eine Liste aller Verteiler ausgeben, die ein bestimmtes Mitglied enthalten.
Wenn Sie kein Büroadministrator oder Supervisor sind, müssen die Werte in den Parametern Buero und Buero-von identisch sein. In diesem Fall kann nur ein Büro durchsucht werden. Wenn Sie ein Büroadministrator oder Supervisor sind, können Sie alle Büros durchsuchen.
Wenn Sie nur den Parameter Buero-von angeben, wird nur das angegebene Büro durchsucht. Der angegebene Büroname wird dann automatisch im Parameter Buero-bis benutzt. Wenn Sie auch den Parameter Buero-bis angeben, werden alle angegebenen Büros durchsucht.
Sie können auch einen oder mehrere Zeichen gefolgt von einem Stern (*) im Parameter Buero-von angeben. In diesem Fall werden alle Büros durchsucht, deren Namen mit diesen Zeichen beginnen. Wenn Sie im Parameter Buero-von nur einen Stern (*) eingeben, werden alle Büros durchsucht, einschießlich Büro SYSCNT.
Wenn Sie im Parameter Buero-von den Namen SYSCNT eingeben, wird Folgendes ausgegeben:
eine Liste aller Verteiler im Büro SYSCNT, die das angegebene Mitglied enthalten,
eine Liste aller Gruppenbüros, für die das Mitglied eine Zugriffsberechtigung hat,
eine Liste aller Privatbüros, für die das Mitglied eine Zugriffsberechtigung hat.
Sie können entweder den Parameter Mitgliedskennzeichen-ein oder den Parameter Mitgliedsname-ein angeben. Sie dürfen nicht beide Parameter gleichzeitig angeben. Wenn Sie einen Wert im Parameter Mitgliedskennzeichen-ein angeben, werden alle Verteiler gefunden, die das angegebene Mitgliedskennzeichen enthalten. Wenn Sie einen Wert im Parameter Mitgliedsname-ein angeben, werden alle Verteiler gefunden, die den angegebenen Nachnamen enthalten. Sie können auch einen oder mehrere Zeichen gefolgt von einem Stern (zum Beispiel "sag*") angeben, um alle Mitgliedskennzeichen oder Nachnamen zu finden, die mit diesen Zeichen beginnen. Es ist nicht möglich, nur einen Stern (*) einzugeben.
Sie sollten dieses Subprogramm solange iterativ aufrufen, bis das Ende der Liste durch den Return-Code 77 gekennzeichnet wird.
| Parameter | Format | Ein | Aus | Bemerkung |
|---|---|---|---|---|
| Return-Code | N2 | X | ||
| Buero | A8 | E | Das Bürokennzeichen eines Supervisors oder Büroadministrators. Oder das selbe Kennzeichen wie in Buero-von. | |
| Passwort | A8 | E | Das Passwort des o.g. Büros. | |
| Buero-von | A8 | E | Der Name des zu durchsuchenden Büros. Oder das Startbüro, wenn mehrere Büros durchsucht werden sollen. Sie können einen oder mehrere Buchstaben gefolgt von einem Stern (*) angeben. Sie können auch nur einen Stern angeben, um alle Büros zu durchsuchen. | |
| Buero-bis | A8 | O | Das Endbüro, wenn mehrere Büros durchsucht werden sollen. | |
| Mitgliedskennzeichen-ein | A16 | E* | Das Kennzeichen des gesuchten Mitglieds. Oder ein oder mehrere Buchstaben gefolgt von einem Stern (*). Entweder Mitgliedskennzeichen-ein oder Mitgliedsname-ein, nicht beides. | |
| Mitgliedsname-ein | A20 | E* | Der Nachname des gesuchten Mitglieds. Oder ein oder mehrere Buchstaben gefolgt von einem Stern (*). Entweder Mitgliedsname-ein oder Mitgliedskennzeichen-ein, nicht beides. | |
| Verteilerliste (20) | ||||
| Bueroname | A8 | X | Der Name des Büros, das den Verteiler enthält. | |
| Verteilername | A12 | X | Der Name des Verteilers. | |
| Listentyp | A1 | X | 1=Verteiler, 2=Büro. | |
| Mitgliedsname-aus | A20 | X | Der Name des Mitglieds. | |
| Mitgliedskennzeichen-aus | A16 | X | Das Kennzeichen des Mitglieds. | |
| Mitgliedstyp | N2 | X | 4=Rubrik, 5=Büro, 10=Verteiler, 33=Teilnehmerkennzeichen (Privatbüro), 74=Externe Adresse. | |
| Versandart | A1 | X | Das Mitglied des Verteilers erhält Folgendes: O=Original, C=Kopie, B=Blindkopie. | |
| Mitglieds-ISN | P10 | X | Die ISN des Mitglieds. | |
| Work-Parameter | A50 | Für den internen Gebrauch. Siehe Work-Parameter. | ||
| 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 |
| 31 | Es wurden keine Mitglieder gefunden |
| 32 | Mitglied (Adresse) wurde nicht gefunden |
| 77 | Ende der Liste |
| 90 | Geben Sie entweder Mitgliedskennzeichen-ein oder Mitgliedsname-ein - nicht beides |
| 91 | Ungültiger Name für Buero-von |
| 92 | Ungültiger Name für Mitgliedskennzeichen-ein |
| 93 | Ungültiger Name für Mitgliedsname-ein |
Z-120
Z-122
Z-123
Z-147
Z-165
Z-1200&0
* Verteiler, Gruppenbueros und Privatbueros
* mit einem bestimmten Mitglied ausgeben
*
DEFINE DATA
LOCAL
1 RETURN-CODE (N2)
1 BUERO (A8)
1 PASSWORT (A8)
1 BUERO-VON (A8)
1 BUERO-BIS (A8)
1 MITGLIEDSKENNZEICHEN-EIN (A16)
1 MITGLIEDSNAME-EIN (A20)
1 VERTEILERLISTE (20)
2 BUERO-NAME (A8)
2 VERTEILERNAME (A12)
2 LISTENTYP (A1)
2 MITGLIEDSNAME-AUS (A20)
2 MITGLIEDSKENNZEICHEN-AUS (A16)
2 MITGLIEDSTYP (N2)
2 VERSANDART (A1)
2 MITGLIEDS-ISN (P10)
1 WORK-PARAMETER (A50)
1 INDEX (P3)
*
END-DEFINE
*
RESET RETURN-CODE
MOVE 'BUERO ' TO BUERO
MOVE 'PASSWORT' TO PASSWORT
MOVE 'BUERO ' TO BUERO-VON
MOVE 'MITGLIED' TO MITGLIEDSKENNZEICHEN-EIN
*
REPEAT UNTIL RETURN-CODE NE 0
CALLNAT 'Z-SRCH17'
RETURN-CODE
BUERO
PASSWORT
BUERO-VON
BUERO-BIS
MITGLIEDSKENNZEICHEN-EIN
MITGLIEDSNAME-EIN
VERTEILERLISTE(*)
WORK-PARAMETER
IF RETURN-CODE EQ 0 OR EQ 77
NEWPAGE
FOR INDEX 1 TO 20
IF VERTEILERNAME(INDEX) NE ' '
OR MITGLIEDS-ISN(INDEX) NE 0
WRITE
BUERO-NAME(INDEX) 3X
VERTEILERNAME(INDEX) 3X
LISTENTYP(INDEX) 3X
MITGLIEDSNAME-AUS(INDEX) 3X
MITGLIEDSKENNZEICHEN-AUS(INDEX) /
MITGLIEDSTYP(INDEX) 5X
VERSANDART(INDEX) 5X
MITGLIEDS-ISN(INDEX) /
END-IF
END-FOR
END-IF
END-REPEAT
*
WRITE 'Return-Code ' RETURN-CODE
*
END