COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-134
PUTPARAMTEXT
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 PUTPARAMTEXT.
portion
is an alphanumeric data item that supplies the identifier for the particular part of the
message to be changed. 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:
04 PORTION PIC X(30) VALUE "CONTINENT".
text
is an alphanumeric data item containing the new value for the parameter. Any
trailing spaces are ignored. Example:
01 TEXT-VALUE PIC X(120) VALUE "ANTARCTICA".
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.
The initial value of MAX-COUNT must be the same as the number of occurrences
of ELEMENT.
In the non-CRE environment, the initial value of MAX-COUNT is the maximum
number of elements that cplist can contain. In the CRE, the maximum number
of elements that cplist can contain is the initial value of MAX-COUNT divided
by 2.5. The cplist in the preceding example can contain 100 elements in the
non-CRE environment, but only 40 in the CRE.
The required number of table elements depends on the number of operations the
list must record. The worst-case situation uses six elements.
A complete checkpoint list is required only when a program has a backup that must
be kept current. When a record of changes is not required, a null checkpoint list
can be used. This is an example description:
04 CP-LIST-1 PIC 9(9) COMP VALUE IS 0.
Note. PUTPARAMTEXT uses a protocol different from that used for normal TAL procedures.
The ENTER verb must not be followed by the keyword TAL.