Z-ERA10

Dieses Dokument behandelt die folgenden Themen:

Beschreibung

Einen Verteiler und alle darin enthaltenen Mitglieder löschen.

Sie können keinen Verteiler löschen, der für ein Gruppenbüro erstellt wurde.

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2 O X Eingabe -1: kein ET.
Buero A8 E   Das Büro, in dem der Verteiler abgelegt ist.
Passwort A8 E   Das Passwort des o.g. Büros.
Verteilername A32 E*   Der Name des Verteilers, der gelöscht werden soll. Entweder Verteilername oder ISN, nicht beides.
ISN P8 E*   Die ISN des Verteilers, der gelöscht werden soll. Entweder ISN oder Verteilername, nicht beides.

Return-Codes

00 Erfolg
02 Ungültiger Büroname oder - nur im Batch-Betrieb - Büro gesperrt
03 Falsches Passwort
04 ISN wurde nicht gefunden
08 Geben Sie entweder ISN oder Name ein - nicht beides
09 ISN zeigt nicht auf das richtige Objekt
51 Ungültiger Name
53 Das gewünschte Objekt existiert nicht
90 Der Verteiler gehört zu einem Gruppenbüro

Subprogramme

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

Beispiel

0010 DEFINE DATA LOCAL
0020 1 RETURN-CODE         (N2)
0030 1 BUERO               (A8)
0040 1 PASSWORT            (A8)
0050 1 VERTEILERNAME       (A32)
0060 1 ISN                 (P8)
0070 END-DEFINE
0080 *
0090 MOVE 'LS'             TO BUERO
0100 MOVE 'PASSWORT'       TO PASSWORT
0110 MOVE 'VERTEILER-1'    TO VERTEILERNAME
0120 *
0130 CALLNAT 'Z-ERA10' RETURN-CODE BUERO PASSWORT
0140   VERTEILERNAME ISN
0150 *
0160 IF RETURN-CODE EQ 0
0170    WRITE 'Verteiler wurde geloescht'
0180 ELSE
0190    WRITE 'Return-Code' RETURN-CODE
0200 END-IF
0210 *
0220 END