COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-108
CHECKLOGICALNAME
ALTERPARAMTEXT returns one of these integer values to report the routine’s success
or failure:
CHECKLOGICALNAME
The CHECKLOGICALNAME routine checks whether a saved ASSIGN message with
the given logical file name exists. The general form of the ENTER statement to use
CHECKLOGICALNAME is:
library-reference
is a mnemonic-name associated in the SPECIAL-NAMES paragraph with either
$SYSTEM.SYSTEM.COBOLLIB or some other object file containing an object
copy of CHECKLOGICALNAME.
Value Meaning
0 or greater A nonnegative value, equal to the number of characters in the new parameter
value, indicates that size characters of text value is assigned as the new
parameter value.
-1 Failure due to a logic error. The message is unchanged. These are possible
logic errors:
•
The portion identifier is not correct.
•
The size value is negative or exceeds 255 characters.
•
The total length of the new PARAM message exceeds the maximum.
•
The contents of the checkpoint list parameter are inconsistent.
-2 Insufficient checkpoint list space is available to complete the operation. The
message is unchanged.
-3 Insufficient storage space to complete the operation. The message is
unchanged.
Note. CHECKLOGICALNAME uses a protocol different from that used by normal TAL
procedures. The ENTER verb must not be followed by the keyword TAL.
ENTER
" "
ns ns
USING
library-referenceOF
resultGIVINGlogical-name
CHECKLOGICALNAME
VST352.vsd