COBOL Manual for TNS and TNS/R Programs

Libraries and Utility Routines
HP COBOL Manual for TNS and TNS/R Programs—522555-006
13-112
DELETEASSIGN
portion
is an alphanumeric data item that supplies the identifier for the particular part of the
saved message to be deleted. The identifier must be one defined for the ASSIGN
message (see Table 13-13). The first unused character position of portion, if any,
must be a space. Any message part except the LOGICALNAME can be deleted
individually. Example:
03 PORTION PIC X(30) VALUE "TANDEMNAME".
There is a special portion identifier, *ALL*, accepted by this routine. The *ALL*
identifier directs the DELETEASSIGN routine to delete the entire saved ASSIGN
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.
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:
08 CP-LIST-1 PIC 9(9) COMP VALUE IS 0.