COBOL/400 Language Help

Format 1 (Data Transfer)

Description
Format 1 of the DISPLAY statement transfers the data in the sending field to the output device. The size of the sending field is the total character count of all operands listed. If the hardware device is capable of receiving data of the same size as the data item being transferred, then the data item is transferred. If the hardware device is not capable of receiving data of the same size as the data item being transferred, then one of the following applies:

After the last operand has been transferred to the output device, the device is reset to the leftmost position of the next line of the device.

Format 1 (Data Transfer)
 
             *--------------*
             V              +
->->--DISPLAY--*-identifier-1-*------------------------------->
             *-literal-1----*
 
->---*-----------------------------*-------------------------><-
    **------*-*-mnemonic-name----**
     *-UPON-* *-environment-name-*
 

identifier-1

If identifier-1 is numeric and is not described as an external decimal, the identifier is converted automatically to external format as follows:

literal-1

Literal-1 may be any figurative constant. When you specify a figurative constant, only a single occurrence of that figurative constant is displayed.

Each numeric literal must be an unsigned integer. Signed noninteger numeric literals are allowed.

UPON

The UPON phrase specifies the output device to be used for the DISPLAY statement. The logical record length depends on the device:

When you omit the UPON phrase, the DISPLAY statement sends output to the REQUESTOR (workstation).

mnemonic-name

Mnemonic-name must be associated in the SPECIAL-NAMES paragraph with an input/output device: a workstation (REQUESTOR), or a system operator's message queue (CONSOLE or SYSTEM-CONSOLE).

environment-name

Environment-name may be specified in place of mnemonic-name. Valid environment-names are CONSOLE and SYSOUT.


[ Top of Page | Previous Page | Next Page | Table of Contents ]