Z-MOD05H

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

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

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.

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-MOD05H 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.

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
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
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-1200&0

Beispiel

0010 DEFINE DATA
0020 LOCAL
0030 1 RETURN-CODE         (N2)
0040 1 BUERO               (A8)
0050 1 PASSWORT            (A8)
0060 1 BUERONAME           (A8)
0070 1 BUERO-ISN           (P10)
0080 1 MELDUNG-EINSCHALTEN (A1)
0090 1 EMPFANGSMELDUNG     (A37/1:10)
0100 1 STARTDATUM          (A8)
0110 1 STARTZEIT           (A8)
0120 1 ENDDATUM            (A8)
0130 1 ENDZEIT             (A8)
0140 1 ZEITZONE            (N2)
0150 *
0160 1 #INX (P3)
0170 *
0180 END-DEFINE
0190 *
0200 RESET RETURN-CODE
0210 MOVE 'BUERO'     TO BUERO
0220 MOVE 'PASSWORT'  TO PASSWORT
0230 MOVE 'BUERONAME' TO BUERONAME
0240 MOVE 'X'         TO MELDUNG-EINSCHALTEN 
0250 FOR #INX 1 TO 10
0260   MOVE 'Bin naechsten Montag wieder hier' TO EMPFANGSMELDUNG(#INX)
0270 END-FOR
0280 MOVE '19960318' TO STARTDATUM
0290 MOVE '0800'     TO STARTZEIT
0300 MOVE '19960322' TO ENDDATUM
0310 MOVE '1800'     TO ENDZEIT
0320 MOVE 1          TO ZEITZONE
0330 *
0340 CALLNAT 'Z-MOD05H'
0350     RETURN-CODE
0360     BUERO
0370     PASSWORT
0380     BUERONAME
0390     BUERO-ISN
0400     MELDUNG-EINSCHALTEN 
0410     EMPFANGSMELDUNG(*)
0420     START-DATE
0430     START-TIME
0440     END-DATE
0450     END-TIME
0460     TIMEZONE
0470 *
0480 IF RETURN-CODE = 0
0490   WRITE 'Buero wurde geaendert'
0500 ELSE
0510   WRITE 'Return-Code' RETURN-CODE
0520 END-IF
0530 *
0540 END