Z-MOD05E

This document covers the following topics:


Description

Modify the language code, default command sequence, blank substitute character and autosave interval 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.

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-MOD05E 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.
Language-code N1 R   Only codes for languages which have been installed on the system are valid. 1=English; 2=German; 3=French; 4=Spanish; 5=Italian; 6=Dutch; 7=Turkish, Icelandic, Finnish, Swedish; 8=Danish, Hebrew; 9=Norwegian, Portuguese (Brazilian), Arabic, Russian.
Library-name A8 R   Library in which Con-nect is installed.
Command-sequence A1 O   If blank, the sequence "command object name" is used. If marked, the alternative sequence "object name command" is used.
Blank-substitute A1 O   The character which must be entered in place of a blank when specifying a name or date. The characters "*", "." and "X" are not allowed.
Autosave N2 O   The frequency with which the "(Undo Document-name)" version of a document or the menulines in the menu editor is updated. You can specify a number between 1 and 99. If a value has not been specified, or if an invalid value has been specified, this is set to 10 (default); a return code is not issued.

Return Codes

00 Success
02 Invalid cabinet name or - in batch mode only - locked cabinet
03 Password incorrect
08 Supply either ISN or name, not both
15 Invalid administrator status
91 Supply Cabinet-name or Cabinet-ISN
93 Language not available
94 Do not use "*", "." or "X" for the Blank-substitute parameter
95 Enter library name where Con-nect is installed
96 Cabinet-name is not valid
97 Cabinet-ISN is not valid
99 Cabinet SYSCNT cannot be modified

Subprograms

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

Example

0010 *
0020 * Example program to modify the language code of a cabinet
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 LANGUAGE-CODE       (N1)
0130 1 LIBRARY-NAME        (A8)
0140 1 COMMAND-SEQUENCE    (A1)
0150 1 BLANK-SUBSTITUTE    (A1)
0160 1 AUTOSAVE            (N2)
0170 END-DEFINE
0180 *
0190 RESET RETURN-CODE
0200 MOVE 'CABINET'      TO CABINET
0210 MOVE 'PASSWORD'     TO PASSWORD
0220 MOVE 'CAB-NAME'     TO CABINET-NAME
0230 MOVE 1              TO LANGUAGE-CODE
0240 MOVE 'LIBRARY'      TO LIBRARY-NAME
0250 MOVE ' '            TO COMMAND-SEQUENCE
0260 MOVE '/'            TO BLANK-SUBSTITUTE 
0270 MOVE 5              TO AUTOSAVE
0280 *
0290 CALLNAT 'Z-MOD05E'
0300     RETURN-CODE
0310     CABINET
0320     PASSWORD
0330     CABINET-NAME
0340     CABINET-ISN
0350     LANGUAGE-CODE
0360     LIBRARY-NAME
0370     COMMAND-SEQUENCE
0380     BLANK-SUBSTITUTE 
0390     AUTOSAVE
0400 IF RETURN-CODE = 0
0410   WRITE 'Cabinet was modified'
0420 ELSE
0430   WRITE 'Return code' RETURN-CODE
0440 END-IF
0450 END