
Chapter 14. Statement Reference
306
Syntax:
Syntax 1:
PRIVATE varname [,varname...]
Syntax 2:
PRIVATE DEFREG registerdefinition [,registerdefini-
tion...]
Parameter:
varname
numericvariable [(subscript)]
stringvariable [(subscript)[[stringlength]]]
registerdefinition
non-arraynumericvariable [=numericconstant]
arraynumericvariable(subscript)
[=numericinitialvaluedefinition]
non-arraystringvariable[[stringlength]]
[=stringconstant]
arraystringvariable(subscript)[[stringlength]]
[=stringinitialvaluedefinition]
numericinitialvaluedefinition
For one-dimensional:
{numericconstant[,numericconstant...]}
For two-dimensional:
{{numericconstant[,numericconstant...]},
{numericconstant[,numericconstant...]} ...}
stringinitialvaluedefinition
For one-dimensional:
{stringconstant[,stringconstant...]}
For two-dimensional:
{{stringconstant[,stringconstant...]},
{stringconstant[,stringconstant...]} ...}
Declarative statement
PRIVATE
Declares one or more work variables or register variables defined in a file, to be private.
Commentaires sur ces manuels