DECLARE-CONSTANT Declare variable with constant value

The DECLARE-CONSTANT command is used to declare one or more variables and to assign them a constant value, thus protecting these values from being overwritten. Variables with a constant value are treated in much the same way as ordinary variables. You cannot, however, modify their value using SET-VARIABLE or remove the value using FREE-VARIABLE.

DECLARE-CONSTANT

VARIABLE-NAME = list-poss(2000): <structured-name 1..20>(...)
	<structured-name 1..20>(...)
			VALUE = <text 0..1800 with-low expr>
			,TYPE = *ANY / *STRING / *INTEGER / *BOOLEAN
,SCOPE = *CURRENT(...) / *PROCEDURE(...) / *TASK(...)
	*CURRENT(...)
			IMPORT-ALLOWED = *NO / *YES
	*PROCEDURE(...)
			IMPORT-ALLOWED = *NO / *YES
	*TASK(...)
			STATE = *ANY / *NEW / *OLD
,CONTAINER = *STD / <composed-name 1..64> / *VARIABLE(...)
	*VARIABLE(...)
			VARIABLE-NAME = <structured-name 1..20>
			,SCOPE = *VISIBLE / *TASK

Return codes

(SC2)	SC1	Maincode	Meaning/Guaranteed messages
	0	CMD0001	No error
1	0	CMD0001	Warning; element already declared
	1	CMD0202	Syntax error
	3	CMD2203	Incorrect syntax file
	32	CMD0221	System error (internal error)
	64	CMD0216	Do not have required privilege
	64	SDP0091	Semantic error Guaranteed messages: SDP1018, SDP1030
	130	SDP0099	No further address space available