COBOL Manual for TNS/E Programs (H06.08+, J06.03+)
Usage Considerations:
• Do Not Use SET UP or SET DOWN for Record Pointers
Do not use SET UP or SET DOWN to point a record pointer at a different record. This would
be syntactically correct, but the memory positions of records are not defined in HP COBOL
and can vary between implementations.
• Incompatibility With IBM/370 Mainframe Pointer Variables
If you redefine a VS COBOL II pointer variable as a COMP field and perform an arithmetic
operation on the field to change the value of the pointer, the pointer does not behave the
same as it would in IBM/370 COBOL. The reason is that pointer format depends on machine
architecture, and HP and IBM/370 machines have different architectures.
Nonpointer Data Items
SET UP increments an index value by an integer amount. SET DOWN decrements an index value
by an integer amount.
index-name
is the name of an index whose value is to be incremented or decremented.
identifier
is the identifier of an integer numeric item whose value UP adds to the index or DOWN subtracts
from the index.
integer
is an integer that UP adds to the index or DOWN subtracts from the index. It can be signed.
The value of each index-name is incremented (UP) or decremented (DOWN) by a value
corresponding to the number of occurrences represented by identifier or integer. Each
time, the identifier of an integer numeric item is used as it was at the beginning of the execution
of the statement.
Both before and after the execution of the SET statement, the value of the index must correspond
to an occurrence number of an element in the associated table.
SORT
SORT orders a set of records according to one or more keys. The records can either be in a file
or an input procedure can send them to SORT, one at a time. SORT can either write the sorted
records to a file or it can send them to an output procedure, one at a time. SORT calls the FastSort
utility.
SORT 441










