COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-114
DELETEPARAM
DELETEPARAM
The DELETEPARAM routine deletes either specific parts of a PARAM message or the
entire PARAM message. The general form of the ENTER statement to use
DELETEPARAM 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 DELETEPARAM.
portion
is an alphanumeric data item that supplies the identifier for the particular part of the
message to be deleted. The identifier must be a parameter name defined for the
PARAM message. The first unused character position of portion, if any, must be
a space. Example:
21 PORTION PIC X(30) VALUE "MALEFACTOR".
There is a special portion identifier, *ALL*, accepted by DELETEPARAM. The
*ALL* identifier directs the DELETEPARAM routine to delete the entire PARAM
message.
cplist
is a checkpoint list in which the routine records the changes to the message
storage data space. Example:
01 CP-LIST-1.
05 MAX-COUNT PIC 9999 COMP VALUE IS 100.
05 CURRENT-COUNT PIC 9999 COMP VALUE IS 0.
05 ELEMENT PIC 9(9) COMP OCCURS 100 TIMES.
Note. DELETEPARAM uses a protocol different from that used for normal TAL procedures.
The ENTER verb must not be followed by the keyword TAL.
USING
library-reference
portion
OF
resultGIVING
cplist
ENTER
" "
ns
DELETEPARAM
ns
VST361.vsd