Z-MOD05B

This document covers the following topics:


Description

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.

Parameters

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.

Return Codes

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

Subprograms

Z-GETMSM
Z-106
Z-120
Z-122
Z-123
Z-175
Z-1200&0

Example

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