Z-UNDO

Dieses Dokument behandelt die folgenden Themen:

Beschreibung

Post an bestimmte Empfänger stornieren, einschließlich Einladungen zu einer Besprechung.

Wenn keiner der Empfänger die Post gelesen hat, können Sie die gesamte Post stornieren. In diesem Fall brauchen Sie den Parameter Empfaengerindex nicht angeben.

Wenn die Post bereits von einem der Empfänger gelesen wurde, können Sie nur noch die Empfänger stornieren, die die Post noch nicht gelesen haben. In diesem Fall müssen Sie die zu stornierenden Empfänger im Parameter Empfaengerindex angeben. Beispiel: um den 7. Empfänger zu stornieren, geben Sie "7" im Parameter Empfaengerindex an.

Wenn Sie die Post an die Empfänger stornieren wollen, die die Post noch nicht gelesen haben, geben Sie im Parameter Empfaengerindex "-1" an.

Wenn die Post auch an einen externen Empfänger (z.B. SNADS) gesendet wurde, können Sie nicht die gesamte Post stornieren.

Wenn regelmäßige Zustellung definiert wurde, wird im Parameter Regelmaessige-Zustellung ein X ausgegeben. Das bedeutet, dass der Zähler für die regelmäßige Zustellung auf Null zurückgesetzt wurde. Die Empfänger wurden jedoch noch nicht storniert. In diesem Fall müssen Sie Z-UNDO noch einmal aufrufen, um die Empfänger zu stornieren.

Wenn die gesendete Post nicht vollständig storniert wurde (d.h. wenn es immer noch Empfänger gibt, die die Post erhalten haben) wird im Parameter Gesendet ein X ausgegeben.

Return-Code 93 weist darauf hin, dass mehr als 500 Adabas-Aufrufe erfolgt sind und einige Empfänger nicht storniert werden konnten. In diesem Fall sollte der Benutzer eine beliebiges Programm mit Bildschirmausgabe ausführen, um den Fehler NAT3009 im Online-Modus zu vermeiden.

Parameter

Parameter Format Ein Aus Bemerkung
Return-Code N2 O X Eingabe -1: kein ET.
Buero A8 E   Das Büro, in dem die Post oder Einladung storniert werden soll.
Passwort A8 E   Das Passwort des o.g. Büros.
ISN P10 E X Eingabe: ISN der zu stornierenden Post oder Einladung. Ausgabe: ISN der stornierten Post oder Einladung.
Empfaengerindex P7 O   Geben Sie diesen Parameter nicht an, wenn Sie die gesamte Post stornieren wollen. Um nur den Empfänger mit der Nummer n zu stornieren, geben Sie "n" an. Diesen Wert können Sie mit Z-ALISTM ermitteln. Wenn Sie die Post an die Empfänger stornieren wollen, die die Post noch nicht gelesen haben, geben Sie "-1" an.
Regelmaessige-Zustellung A1   X X bedeutet, dass der Zähler für die regelmäßige Zustellung auf Null zurückgesetzt wurde.
Gesendet A1   X X bedeutet, dass die Post nicht vollständig storniert wurde.

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
18 API-Kontext-Buffer ist nicht verfügbar
24 Datenschutz-Sicherheitsübertretung
90 Adressliste oder Post wurde nicht gefunden
91 Post kann nicht storniert werden, weil sie bereits gelesen wurde oder weil sie an einen externen Empfänger geschickt wurde
92 Für den angegebenen Empfaengerindex gibt es keinen Empfänger
93 Einige Empfänger konnten nicht storniert werden
94 Nur die letzte Version einer Besprechung kann storniert werden
99 Dieses Objekt kann nicht storniert werden

Subprogramme

Z-0420
Z-0420A
Z-100
Z-110
Z-120
Z-122
Z-123
Z-124
Z-165
Z-175
Z-180
Z-190
Z-194
Z-197
Z-209
Z-216
Z-222
Z-223
Z-400
Z-401
Z-711
Z-711A
Z-728
Z-729
Z-734
Z-735
Z-736
Z-737
Z-1200&0

Beispiel

* Empfaenger stornieren
*
DEFINE DATA
LOCAL
*
1 RETURN-CODE     (N2)
1 BUERO           (A8)
1 PASSWORT        (A8)
1 ISN             (P10)
1 EMPFAENGERINDEX (P7)
1 REGELMAESSIGE-ZUSTELLUNG (A1)
1 GESENDET        (A1)
*
END-DEFINE
*
MOVE 'Buero'    TO BUERO
MOVE 'Passwort' TO PASSWORT
MOVE 70680      TO ISN
MOVE 2          TO EMPFAENGERINDEX
*
CALLNAT 'Z-UNDO'
  RETURN-CODE
  BUERO
  PASSWORT
  ISN
  EMPFAENGERINDEX
  REGELMAESSIGE-ZUSTELLUNG
  GESENDET
*
WRITE
  '=' BUERO    /
  '=' PASSWORT /
  '=' ISN      /
*
IF GESENDET NE ' '
  WRITE '   Es gibt noch Empfaenger, die die Post erhalten haben! ' GESENDET /
END-IF
*
IF REGELMAESSIGE-ZUSTELLUNG NE ' '
  WRITE '   Nur regelmaessige Zustellung wurde storniert ' REGELMAESSIGE-ZUSTELLUNG /
END-IF
*
IF RETURN-CODE NE 0
  WRITE / 'Return-Code' RETURN-CODE
ELSE
  WRITE / 'Return-Status OK'
END-IF
*
END