Z-MOD17

This document covers the following topics:


Description

Authorize a user to use another private cabinet, or modify the profile of a user who is authorized to use another private cabinet.

Only the user of a private cabinet can be authorized to use another private cabinet.

When a value other than 0 is returned in the parameter Return-code, BACKOUT TRANSACTION is always issued.

Parameters

Parameter Format In Out Remarks
Return-code N2 O X Input -1: no ET.
Cabinet A8 R   The cabinet in which the profile for the authorized user is to be added or modified.
Password A8 R   The password of the above cabinet.
Member A8 R   The user who is to be authorized to use the private cabinet or the user whose profile is to be modified.
Profile A55 R   See the redefinition below.
Redefine Profile
  Security-read A1 R   The security level for Read. A value between 0 and 9.
  Security-modify A1 R   The security level for Modify. A value between 0 and 9.
  Security-copy A1 R   The security level for Copy. A value between 0 and 9.
  Security-print A1 R   The security level for Print. A value between 0 and 9.
  Read-mail A1 O   If marked, the user can read mail.
  Reply A1 O   If marked, the user can reply to mail.
  Forward A1 O   If marked, the user can forward mail.
  Send-mail A1 O   If marked, the user can send mail.
  Display-calendar A1 O   If marked, the user can display all calendar entries.
  Modify-calendar A1 O   If marked, the user can act upon all calendar entries.
  Modify-other-items A1 O   If marked, the user can modify all other objects.
  Erase-other-items A1 O   If marked, the user can erase all other objects.
  Display-other-items A1 O   If marked, the user can display all other objects.
  Filler A42 O   For future use.

See the Con-nect User's Guide, section Adding Shared Users to Your Private Cabinet for further information regarding the above parameters.

Return Codes

00 Success
02 Invalid cabinet name or - in batch mode only - locked cabinet
03 Password incorrect
90 Both the member and the cabinet must be private
91 A cabinet cannot be shared with itself
92 Requested member cabinet could not be found
93 Invalid security level

Subprograms

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

Example

0010 *
0020 * Demo program to add a member to a private cabinet, where this member is
0030 * only allowed to display the calendar of the shared private cabinet
0040 *
0050 DEFINE DATA
0060 LOCAL
0070 1 RETURN-CODE       (N2)
0080 1 CABINET           (A8)
0090 1 PASSWORD          (A8)
0100 1 MEMBER            (A8)
0110 1 PROFILE           (A55)
0120 END-DEFINE
0130 *
0140 MOVE 'LS'          TO CABINET
0150 MOVE 'PASSWORD'    TO PASSWORD
0160 MOVE 'ESH'         TO MEMBER
0170 MOVE '6666    X'   TO PROFILE
0180 *
0190 CALLNAT 'Z-MOD17'  RETURN-CODE
0200                    CABINET
0210                    PASSWORD
0220                    MEMBER
0230                    PROFILE
0240 *
0250 IF  RETURN-CODE NE 0
0260     WRITE 'Return code' RETURN-CODE
0270 ELSE
0280     WRITE 'Member was modified/added'
0290 END-IF
0300 *
0310 END