Pathway/iTS SCREEN COBOL Reference Manual (H06.10+, J06.03+)

Procedure Division
HP NonStop Pathway/iTS SCREEN COBOL Reference Manual—426750-003
6-66
DIVIDE Statements
•
The DISPLAY statement places screen items on the output line in the column
location specified in the Screen Section. If another screen item has the same line
number description, but is not named in the DISPLAY statement, that screen item
appears in the screen display.
•
If you specify a screen group name to display multiple screen fields, each screen
field appears in the column described for that field. However, the screen fields are
on consecutively numbered lines regardless of the screen field descriptions.
•
Any nonfiller screen item must be defined with a TO, FROM, or USING clause in
the Screen Section. If a screen item is defined with both a VALUE clause and a
TO, FROM, or USING clause, the literal in the VALUE clause is never displayed.
The DISPLAY statement output is always from the associated Working-Storage
data items.
•
If nonnumeric-literal is listed in a DISPLAY statement and the screen-
identifier list contains more than one field, the literal appears in each of the screen
fields named in the list.
The Break key for conversational terminals can be enabled to terminate a DISPLAY
operation. The Break key is enabled through the PATHCOM commands SET TERM
or SET PROGRAM TYPE in the Pathway system configuration. If the Break key is
enabled and is pressed during a DISPLAY operation, the DISPLAY terminates and no
terminal error condition results.
The value of the TERMINATION-SUBSTATUS special register on the DISPLAY
operation is:
•
1 if the BREAK key is pressed
•
0 if the BREAK key is not pressed
DIVIDE Statements
The DIVIDE statements divide one data item into another and store the results in one
or more data items. The forms of the DIVIDE statements are:
DIVIDE INTO
DIVIDE GIVING
DIVIDE BY GIVING
Each form is described in the following paragraphs.
DIVIDE INTO Statement
The DIVIDE INTO statement divides one data item into one or more other data items.
divisor
is either a numeric literal or the identifier of an elementary numeric data item.
DIVIDE divisor INTO { dividend } ,...