This macro creates a guard and sets its attributes. Nonprivileged users may create guards only for their own user IDs. The guard administrator may create guards for any user ID.
Macro | Operands |
CREGUAD | MF = D / L / C / M / E ,PREFIX = P / <name 1> ,MACID = ROK / <name 3> ,PARAM = <name 1..8> ,NAME =<c-string: filename 1..24 without-gen-vers> / <var: char(24)> /(<reg: A(char(24))>) ,COMMENT = <c-string: text 1..80> / <var: char(80)> / (<reg: A(char(80))>) ,SCOPE = *USERID / *USER_GROUP / *HOST_SYSTEM / <var: enum SCOPE> / (<reg: enum SCOPE>) |
For a description of the parameters MF, PREFIX, MACID, PARAM see the “Executive Macros” manual [ 16 ].
NAME
Fully qualified name of the guard to be created. This name must be entered in uppercase letters. Do not use “SYS” at the start of the name: this name space is reserved for guards defined by BS2000 development.
COMMENT
Text to be stored as a comment for this guard.
SCOPE
This specifies who may use this guard to protect his/her objects:
=*USERID
Only the owner may use this guard, or the object owner with the privilege TSOS.
=*USER_GROUP
The owner and the members of the owner’s user group may use this guard.
=*HOST_SYSTEM
Any user may use this guard.
Macro return codes
SC2 | SC1 | Maincode | Meaning |
X’01’ | X’1000’ | The specified operand value lies outside the permitted range. The invalid operand is stored as a symbolic value in SC2 | |
X’20’ | X’1001’ | An internal error has occurred. A SERSLOG entry has been written for further analysis | |
X’40’ | X’1002’ | Syntax error in the guard name | |
X’40’ | X’1003’ | Memory for the parameter area not allocated with the required length or not accessible | |
X’40’ | X’1006’ | The specified guard already exists | |
X’40’ | X’1012’ | The specified catalog is not defined or not accessible | |
X’40’ | X’1013’ | The pubset is not known to the GUARDS administration (the guards catalog was probably not opened at IMPORT-PUBSET) | |
X’40’ | X’1014’ | The user is not authorized to execute this function | |
X’40’ | X’1016’ | Error in the MRS communication facility | |
X’40’ | X’1017’ | Unknown user ID | |
X’40’ | X’1018’ | The remote system is not available | |
X’40’ | X’1020’ | No more memory space available | |
X’40’ | X’1021’ | BCAM connection error | |
X’40’ | X’1022’ | The BCAM connection has been interrupted | |
X’40’ | X’1029’ | GUARDS is not available on the remote system | |
X’80’ | X’1036’ | The guards catalog is locked |