This document covers the following topics:
Modify the language code, system folder names, default command sequence, blank substitute character and autosave interval in the user profile of a specific cabinet.
This subprogram is similar to Z-MOD05E with the exception that you can also rename the cabinet's system folders (including all of their files). The parameter Cabinet-ISN uses the format P10.
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 or to rename the system folders in 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 (except Language-code) are deleted from the user profile. Thus, to retain the existing values, you must specify them once more before you invoke this subprogram. If you do not specify a new value for the language code, the old value is retained.
Successful termination of Z-MOD05M 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 | P10 | R* | The ISN of the cabinet to be modified. Either Cabinet-ISN or Cabinet-name, not both. | |
| Language-code | N1 | O | 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.If blank, the previously language code is retained. | |
| 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. | |
| Rename-system-folders | A1 | O | If marked, the names of all system folders (e.g. Inbasket and Outbasket) are translated into the language that has been defined for this cabinet. If not marked, the names of the system folders are not changed. | |
| 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. |
| 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 |
Z-120
Z-122
Z-123
Z-163
Z-168
Z-175
Z-1200&0
*
* Example program to modify the language code of a cabinet
* and to rename the system folders/files of this cabinet
*
DEFINE DATA
LOCAL
1 RETURN-CODE (N2)
1 CABINET (A8)
1 PASSWORD (A8)
1 CABINET-NAME (A8)
1 CABINET-ISN (P10)
1 LANGUAGE-CODE (N1)
1 LIBRARY-NAME (A8)
1 COMMAND-SEQUENCE (A1)
1 RENAME-SYSTEM-FOLDERS (A1)
1 BLANK-SUBSTITUTE (A1)
1 AUTOSAVE (N2)
END-DEFINE
*
RESET RETURN-CODE
MOVE 'CABINET' TO CABINET
MOVE 'PASSWORD' TO PASSWORD
MOVE 'CAB-NAME' TO CABINET-NAME
MOVE 1 TO LANGUAGE-CODE
MOVE 'LIBRARY' TO LIBRARY-NAME
MOVE ' ' TO COMMAND-SEQUENCE
MOVE 'X' TO RENAME-SYSTEM-FOLDERS
MOVE '/' TO BLANK-SUBSTITUTE
MOVE 5 TO AUTOSAVE
*
CALLNAT 'Z-MOD05M'
RETURN-CODE
CABINET
PASSWORD
CABINET-NAME
CABINET-ISN
LANGUAGE-CODE
LIBRARY-NAME
COMMAND-SEQUENCE
RENAME-SYSTEM-FOLDERS
BLANK-SUBSTITUTE
AUTOSAVE
*
IF RETURN-CODE EQ 0
WRITE 'Cabinet' CABINET-NAME 'was modified'
ELSE
WRITE 'Return code' RETURN-CODE
END-IF
*
END