Z-MOD05L

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Die Empfangsmeldung im Teilnehmerprofil eines bestimmten Büros ändern.

Dieses Subprogramm entspricht Z-MOD05J mit der Ausnahme, dass Sie auch angeben können, dass der Zeitraum, in dem die Empfangsmeldung aktiv ist, nicht angezeigt werden soll.

Dieses Subprogramm kann von einem Supervisor, einem Büroadministrator, dem Inhaber eines Privatbüros oder von einem Teilnehmer benutzt werden, der dazu berechtigt wurde, die Empfangsmeldung zu ändern. 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.

Um die Parameter mit bereits bestehenden Empfangsmeldungswerten zu füllen, können Sie vor dem Aufruf dieses Subprogramms Z-MLGETC 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.

Der Zeitraum zwischen Startdatum und Enddatum muss entweder kleiner oder gleich 1095 Tagen sein (sonst wird der Return-Code 43 ausgegeben). Startdatum und Enddatum werden entsprechend der vorgegebenen Zeitzone berechnet.

Wenn keine Zeitzone angegeben wird, werden Startzeit und Endzeit als GMT (0) interpretiert. Wenn diese Werte in eine andere Zeitzone umgerechnet werden sollen, müssen Sie die Differenz im Parameter Zeitzone eingeben.

Wenn Startzeit und Endzeit nicht angegeben werden, wird automatisch der Zeitraum von 0:00 Uhr bis 23:59 Uhr eingetragen. In diesem Fall erscheint die Empfangsmeldung während des ganzen Tages.

Nach der erfolgreichen Ausführung von Z-MOD05L 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, Büroadministrators, Privatbüros oder eines Teilnehmers, der dazu berechtigt wurde, die Empfangsmeldung zu ändern.
Passwort A8 E   Das Passwort des o.g. Büros.
Bueroname A8 E*   Der Name des Büros, in dem das Profil geändert werden soll. Entweder Bueroname oder Buero-ISN, nicht beides.
Buero-ISN P10 E*   Die ISN des Büros, in dem das Profil geändert werden soll. Entweder Buero-ISN oder Bueroname, nicht beides.
Meldung-einschalten A1 O   Wenn markiert, wird die Empfangsmeldung angezeigt, wenn ein Teilnehmer Post an dieses Büro sendet.
Empfangsmeldung A37/1:10 O   Die Nachricht, die angezeigt werden soll, wenn ein Teilnehmer Post an dieses Büro sendet. Wenn Sie keine Nachricht eingeben, wird eine bereits definierte Empfangsmeldung gelöscht.
Startdatum A8 E   Das (Start-)Datum für die Empfangsmeldung. Format yyyymmdd.
Startzeit A8 O   Die Startzeit für die Empfangsmeldung. Format hhmm.
Enddatum A8 O   Das Enddatum für die Empfangsmeldung. Es darf nicht mehr als 3 Jahre (1095 Tage) nach dem Startdatum liegen. Format yyyymmdd.
Endzeit A8 O   Die Endzeit für die Empfangsmeldung. Format hhmm.
Zeitzone N2 O   Vorgabe: 0 (GMT). Werte -12 bis +11.
Cc-Flag A1 O   Wenn markiert, wird Cc gesetzt.
Cc A20 O   Empfänger einer Kopie der Post: Adresse, Büro, Teilnehmerkennzeichen oder Rubrik.
Cc-Adresstyp N2 O   Wenn Cc angegeben wird, muss dies einer der folgenden sein: 1=Adresse (Rufname), 4=Rubrik, 5=Büro, 33=Teilnehmerkennzeichen.
Cc-Adressquelle A1 O   Nur wenn Cc-Adresstyp 1 (Adresse) ist: S=Adresse von Büro SYSCNT. Leer=Adresse von Bueroname.
Datum-Zeit-nicht-anzeigen A1 O   Wenn markiert, wird der Zeitraum, in dem die Empfangsmeldung aktiv ist, nicht im Empfangsmeldungsfenster angezeigt.

Return-Codes

00 Erfolg
02 Ungültiger Büroname
03 Falsches Passwort
08 Geben Sie entweder ISN oder Name ein - nicht beides
15 Ungültiger Administratorstatus
41 Ungültiges Startdatum
42 Ungültige Startzeit
43 Ungültiges Enddatum
44 Ungültige Endzeit
47 Ungültige Zeitzone
91 Geben Sie Bueroname oder Buero-ISN ein
94 Ungültiger Cc
95 Cc wurde nicht gefunden
96 Angabe im Parameter Bueroname ist ungültig
97 Ungültige Buero-ISN
99 Das Büro SYSCNT darf nicht geändert werden

Subprogramme

N-IDATCM
Z-GETMSM
Z-0106C
Z-120
Z-122
Z-123
Z-160
Z-175
Z-723
Z-1200&0

Beispiel

*********************************************************************
* Empfangsmeldung eines Teilnehmers aendern
*********************************************************************
*
DEFINE DATA
*
LOCAL
*
1 RETURN-CODE         (N2)
1 BUERO               (A8)
1 PASSWORT            (A8)
1 BUERONAME           (A8)
1 BUERO-ISN           (P10)
1 MELDUNG-EINSCHALTEN (A1)
1 EMPFANGSMELDUNG     (A37/1:10)
1 STARTDATUM          (A8)
1 STARTZEIT           (A5)
1 ENDDATUM            (A8)
1 ENDZEIT             (A5)
1 ZEITZONE            (N2)
1 CC-FLAG             (A1)
1 CC                  (A20)
1 CC-ADRESSTYP        (N2)
1 CC-ADDESSQUELLE     (A1)
1 DATUM-ZEIT-NICHT-ANZEIGEN (A1)
*
1 #INX                (P3)
*
END-DEFINE
*
RESET RETURN-CODE
MOVE 'BUERO'  TO BUERO
MOVE 'PASSWORT' TO PASSWORT
MOVE 'BUERONAME' TO BUERONAME
MOVE 'X'        TO MELDUNG-EINSCHALTEN
FOR #INX 1 TO 10
  MOVE 'Bin naechsten Montag wieder hier' TO EMPFANGSMELDUNG(#INX)
END-FOR
MOVE '20020126' TO STARTDATUM
MOVE '08:00'    TO STARTZEIT
MOVE '20020204' TO ENDDATUM
MOVE '18:00'    TO ENDZEIT
MOVE 1          TO ZEITZONE
MOVE 'X'        TO CC-FLAG
MOVE 'ESH'      TO CC
MOVE 33         TO CC-ADRESSTYP
MOVE 'X'        TO DATUM-ZEIT-NICHT-ANZEIGEN
*
CALLNAT 'Z-MOD05L'
    RETURN-CODE
    BUERO
    PASSWORT
    BUERONAME
    BUERO-ISN
    MELDUNG-EINSCHALTEN
    EMPFANGSMELDUNG(*)
    STARTDATUM
    STARTZEIT
    ENDDATUM
    ENDZEIT
    ZEITZONE
    CC-FLAG
    CC
    CC-ADRESSTYP
    CC-ADRESSQUELLE
    DATUM-ZEIT-NICHT-ANZEIGEN
*
  IF RETURN-CODE EQ 0
    WRITE 'Bueo wurde geaendert'
  ELSE
    WRITE 'Return-Code' RETURN-CODE
  END-IF
*
END