This document covers the following topics:
Modify the menu and overlay calendar information in the user profile of a specific cabinet.
This subprogram can be used only by a supervisor or cabinet administrator. It is not possible to use this subprogram to modify the user profile of the cabinet SYSCNT.
To get the ISN for the wanted cabinet, you can invoke either Z-ADD05 or Z-DIS05 prior to this subprogram.
The values in the parameters Display-month, Display-mail and Display-calendar define the order in which this information is shown in the menu. The values mean:
| 0 | The information is not displayed. |
| 1 | The information displayed first. |
| 2 | The information displayed next. |
| 3 | The information displayed last. |
Parameters which are not completed in the parameter list are deleted from the user profile. Thus, to retain the existing values, you must specify them once more before you invoke this subprogram.
Successful termination of Z-MOD05B always results in an END TRANSACTION. You are not able to control transaction handling.
| 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 modified. Either Cabinet-name or Cabinet-ISN, not both. | |
| Cabinet-ISN | P8 | R* | The ISN of the cabinet to be modified. Either Cabinet-ISN or Cabinet-name, not both. | |
| Menu-name | A32 | O | The name of the menu that is to be used as the main menu. If blank, the menu which has been defined in cabinet SYSCNT is used as the main menu. | |
| Display-month | N1 | R | The calendar for the current and next month. See the description above. | |
| Display-mail | N1 | R | Inbasket information (number of new phone messages, mail items and invitations). See the description above. | |
| Display-calendar | N1 | R | The next entries in the personal calendar (appointments, meetings, reminders and todos). See the description above. | |
| Display-day | A1 | O | If marked, the name of the current day is shown below the date in the upper right hand corner of the screens. If blank, the screen number is shown. | |
| Calendar-overlay1 | A8 | O | The ID of a cabinet to which this cabinet is to have access. | |
| Calendar-overlay2 | A8 | O | The ID of a cabinet to which this cabinet is to have access. | |
| Window-border | A1 | O | The character to be used for the vertical window borders. If the terminal supports reverse video, the window border is always shown in reverse video. |
| 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 |
| 93 | Enter values 0 to 3 for Display-month, Display-mail, and Display-calender |
| 94 | Access to calendar not allowed |
| 96 | Cabinet-name does not exist |
| 97 | Cabinet-ISN is not valid |
| 99 | Cabinet SYSCNT cannot be modified |
Z-GETMSM
Z-106
Z-120
Z-122
Z-123
Z-175
Z-1200&0
0010 * 0020 * Example program to modify Menu-Layout of a user profile 0030 * 0040 * 0050 DEFINE DATA 0060 LOCAL 0070 1 RETURN-CODE (N2) 0080 1 CABINET (A8) 0090 1 PASSWORD (A8) 0100 1 CABINET-NAME (A8) 0110 1 CABINET-ISN (P8) 0120 1 MENU-NAME (A32) 0130 1 DISPLAY-MONTH (N1) 0140 1 DISPLAY-MAIL (N1) 0150 1 DISPLAY-CALENDAR (N1) 0160 1 DISPLAY-DAY (A1) 0170 1 CALENDAR-OVERLAY1 (A8) 0180 1 CALENDAR-OVERLAY2 (A8) 0190 1 WINDOW-BORDER (A1) 0200 END-DEFINE 0210 * 0220 RESET RETURN-CODE 0230 MOVE 'CABINET' TO CABINET 0240 MOVE 'PASSWORD' TO PASSWORD 0250 MOVE 'CAB-NAME' TO CABINET-NAME 0260 MOVE ' ' TO MENU-NAME 0270 MOVE 1 TO DISPLAY-MONTH 0280 MOVE 2 TO DISPLAY-MAIL 0290 MOVE 3 TO DISPLAY-CALENDAR 0300 MOVE 'X' TO DISPLAY-DAY 0310 MOVE 'CAB-ID1' TO CALENDAR-OVERLAY1 0320 MOVE 'CAB-ID2' TO CALENDAR-OVERLAY2 0330 MOVE '!' TO WINDOW-BORDER 0340 * 0350 CALLNAT 'Z-MOD05B' 0360 RETURN-CODE 0370 CABINET 0380 PASSWORD 0390 CABINET-NAME 0400 CABINET-ISN 0410 MENU-NAME 0420 DISPLAY-MONTH 0430 DISPLAY-MAIL 0440 DISPLAY-CALENDAR 0450 DISPLAY-DAY 0460 CALENDAR-OVERLAY1 0470 CALENDAR-OVERLAY2 0480 WINDOW-BORDER 0490 * 0500 IF RETURN-CODE = 0 0510 WRITE 'CABINET WAS MODIFIED' 0520 ELSE 0530 WRITE 'RETURN CODE' RETURN-CODE 0540 END-IF 0550 * 0560 END