This document covers the following topics:
Display the date and time formats and the sliding window (YSLW) value in the user profile of a specific cabinet.
This subprogram can be used only by a supervisor or cabinet administrator.
To get the ISN for the wanted cabinet, you can invoke either Z-ADD05 or Z-DIS05 prior to this subprogram. To modify the profile, you can invoke Z-MOD05I after this subprogram.
The sequence of the values 1 to 5 in the Date-format parameter defines the order in which the day, month and year appear in all screens. The values mean:
| 1 | The day is shown as a number. |
| 2 | The month is shown as a number. |
| 3 | The year is shown as a two-digit number. |
| 4 | The month is shown as a three-letter abbreviation. |
| 5 | The year is shown as a four-digit number. |
A delimiter separates the day, month and year values. For example, the values 1.4.3 in the parameter Date-format indicate that the date appears as 24.Dec.99 in all screens.
| Parameter | Format | In | Out | Remarks |
|---|---|---|---|---|
| Return-code | N2 | X | ||
| Cabinet | A8 | R | The cabinet ID of a supervisor or cabinet administrator. | |
| Password | A8 | R | The password of the above cabinet. | |
| Cabinet-name | A8 | R* | The name of the cabinet to be diplayed. Either Cabinet-name or Cabinet-ISN, not both. | |
| Cabinet-ISN | P8 | R* | The ISN of the cabinet to be displayed. Either Cabinet-ISN or Cabinet-name, not both. | |
| Date-format | A5 | X | See the description above. | |
| Time-format | N1 | X | 0=24 hour, 1=am/pm | |
| Time-delimiter | A1 | X | Character to separate hours and minutes. | |
| Timezone | N2 | X | The timezone in which the user is located, relative to the CPU's timezone. | |
| Week-start | N1 | X | Values 1 to 7 specify the first day of the week to be shown in the Con-nect menu and the calendar screens. 1=Monday, 2=Tuesday ... 7=Sunday. | |
| Day-start | N4 | X | Values 0 to 23 specify the start of a 10-hour period which includes the user's working day. 0=midnight ... 9=9:00 am ... 13=1:00 pm ... | |
| Use-system-SLW | A1 | X | If marked, the value of the sliding window defined in the system defaults is used. | |
| Sliding-window | A2 | X | A value between 0 and 99. |
| 00 | Success |
| 02 | Invalid cabinet name |
| 03 | Password incorrect |
| 08 | Supply either ISN or name, not both |
| 15 | Invalid administrator status |
| 91 | Supply Cabinet-name or Cabinet-ISN |
| 96 | Cabinet-name is not valid |
| 97 | Cabinet-ISN is not valid |
Z-120
Z-122
Z-123
Z-1200&0
0010 Example program to display date and time formats. 0020 * 0030 DEFINE DATA 0040 LOCAL 0050 * 0060 1 RETURN-CODE (N2) 0070 1 CABINET (A8) 0080 1 PASSWORD (A8) 0090 1 CABINET-NAME (A8) 0100 1 CABINET-ISN (P8) 0110 1 DATE-FORMAT (A5) 0120 1 TIME-FORMAT (N1) 0130 1 TIME-DELIMITER (A1) 0140 1 TIMEZONE (N2) 0150 1 WEEK-START (N1) 0160 1 DAY-START (N4) 0170 1 USE-SYSTEM-SLW (A1) 0180 1 SLIDING-WINDOW (N2) 0190 END-DEFINE 0200 * 0210 RESET RETURN-CODE 0220 MOVE 'CABINET ' TO CABINET 0230 MOVE 'PASSWORD' TO PASSWORD 0240 MOVE 'CAB-NAME' TO CABINET-NAME 0250 * 0260 CALLNAT 'Z-DIS05I' RETURN-CODE 0270 CABINET 0280 PASSWORD 0290 CABINET-NAME 0300 CABINET-ISN 0310 DATE-FORMAT 0320 TIME-FORMAT 0330 TIME-DELIMITER 0340 TIMEZONE 0350 WEEK-START 0360 DAY-START 0370 USE-SYSTEM-SLW 0380 SLIDING-WINDOW 0390 * 0400 IF RETURN-CODE EQ 0 0410 WRITE 0420 / '=' CABINET 0430 / '=' PASSWORD 0440 / '=' CABINET-NAME 0450 / '=' CABINET-ISN 0460 / '=' DATE-FORMAT 0470 / '=' TIME-FORMAT 0480 / '=' TIME-DELIMITER 0490 / '=' TIMEZONE 0500 / '=' WEEK-START 0510 / '=' DAY-START 0520 / '=' USE-SYSTEM-SLW 0530 / '=' SLIDING-WINDOW / 0540 * 0550 ELSE 0560 WRITE 'Return code' RETURN-CODE 0570 END-IF 0580 * 0590 END