Z-MOD05A

Dieses Dokument behandelt die folgenden Themen:


Beschreibung

Die Datums- und Zeitformate im Teilnehmerprofil eines bestimmten Büros ändern.

Dieses Subprogramm kann nur von einem Supervisor oder Büroadministrator benutzt werden. 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 Reihenfolge der Werte 1 bis 5 im Parameter Datumsformat bestimmt die Reihenfolge, in der Tag, Monat und Jahr in allen Schirmen angezeigt werden. Die Werte bedeuten:

1 Der Tag wird als Zahl angezeigt.
2 Der Monat wird als Zahl angezeigt.
3 Das Jahr wird mit einer 2-stelligen Zahl angezeigt.
4 Der Monat wird mit einer Abkürzung aus 3 Buchstaben angezeigt.
5 Das Jahr wird mit einer 4-stelligen Zahl angezeigt.

Ein Füllzeichen trennt die Werte für Tag, Monat und Jahr. Sie können ein beliebiges Füllzeichen (einschließlich Leerzeichen) benutzen. Wenn Sie z.B die Werte 1.4.3 im Parameter Datumsformat angeben, wird das Datum folgendermaßen angezeigt: 24.Dez.94. Wenn Sie die Werte 4 1,5 angeben, wird das Datum folgendermaßen angezeigt: Dez 24,1994.

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.

Nach der erfolgreichen Ausführung von Z-MOD05A 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 oder Büroadministrators.
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 P8 E*   Die ISN des Büros, in dem das Profil geändert werden soll. Entweder Buero-ISN oder Bueroname, nicht beides.
Datumsformat A5 O   Siehe die Beschreibung oben. Bei einem ungültigen Datumsformat wird das Vorgabeformat 1.2.3 benutzt (wenn z.B. Tag (1) und Monat (2 oder 4) nicht angegeben wurden).
Zeitformat N1 E   0=24-Stundenformat, 1=AM/PM-Zeitformat.
Zeit-Fuellzeichen A1 O   Das Zeichen, das die Stunden und Minuten trennt. Sie können ein beliebiges Zeichen definieren.
Zeitzone N2 O   Die Zeitzone des Teilnehmers, relativ zur Zeitzone der CPU. Die Summe aus den Zeitzonen des Teilnehmers und der CPU muss einen Wert zwischen -12 und +11 ergeben. Beispiel: die Zeitzone der CPU ist -5 und in diesem Parameter wird +16 eingegeben; dies ist ein gültiger Wert, weil die Summe +11 beträgt. Vorgabe: 0 (CPU).
Wochenbeginn N1 E   Ein Wert zwischen 1 und 7 definiert den ersten Wochentag, der im Con-nect-Menü und den Kalenderschirmen angezeigt wird. 1=Montag, 2=Dienstag ... 7=Sonntag.
Tagesbeginn N4 E   Ein Wert zwischen 0 und 23 definiert den Beginn der 10-Stunden-Periode, in die der Arbeitstag des Teilnehmers fällt. 0=Mitternacht ... 9=9:00 ...

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
47 Ungültige Zeitzone (Bereich -12 bis +11)
91 Geben Sie Bueroname oder Buero-ISN ein
94 Ungültiges Zeitformat
95 Ungültiger Tagesbeginn
96 Angabe im Parameter Bueroname ist ungültig
97 Ungültige Buero-ISN
98 Ungültiger Wochenbeginn
99 Das Büro SYSCNT darf nicht geändert werden

Subprogramme

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

Beispiel

0010 *
0020 * Beispielprogramm zum Aendern der Datums- und Zeitformate
0030 * in einem Teilnehmerprofil
0040 *
0050 DEFINE DATA
0060 LOCAL
0070 1 RETURN-CODE         (N2)
0080 1 BUERO               (A8)
0090 1 PASSWORT            (A8)
0100 1 BUERONAME           (A8)
0110 1 BUERO-ISN           (P8)
0120 1 DATUMSFORMAT        (A5)
0130 1 ZEITFORMAT          (N1)
0140 1 ZEIT-FUELLZEICHEN   (A1)
0150 1 ZEITZONE            (N2)
0160 1 WOCHENBEGINN        (N1)
0170 1 TAGESBEGINN         (N4)
0180 END-DEFINE
0190 *
0200 RESET RETURN-CODE
0210 MOVE 'BUERO'          TO BUERO
0220 MOVE 'PASSWORT'       TO PASSWORT
0230 MOVE 'B-NAME'         TO BUERONAME
0240 MOVE '1.2.3'          TO DATUMSFORMAT
0250 MOVE 1                TO ZEITFORMAT
0260 MOVE ':'              TO ZEIT-FUELLZEICHEN
0270 MOVE -1               TO ZEITZONE
0280 MOVE 1                TO WOCHENBEGINN
0290 MOVE 9                TO TAGESBEGINN
0300 *
0310 CALLNAT 'Z-MOD05A'
0320     RETURN-CODE
0330     BUERO
0340     PASSWORT
0350     BUERONAME
0360     BUERO-ISN
0370     DATUMSFORMAT
0380     ZEITFORMAT
0390     ZEIT-FUELLZEICHEN
0400     ZEITZONE
0410     WOCHENBEGINN
0420     TAGESBEGINN
0430 *
0440 IF RETURN-CODE = 0
0450   WRITE 'Buero wurde geaendert'
0460 ELSE
0470   WRITE 'Return-Code' RETURN-CODE
0480 END-IF
0490 *
0500 END