COBOL/400 Language Help

Format 2 (Local Data Area)

Description
Format 2 of the DISPLAY statement transfers data to the system-defined area created for the job.

The data is written to the local data area according to the rules for the MOVE statement for a group move without the CORRESPONDING phrase, and without padding on the right with spaces.

There is only one local data area for each job, and all devices in a job access the same local data area.

Format 2 (Local Data Area)
 
             *--------------*
             V              +
->->--DISPLAY--*-identifier-1-*--UPON---mnemonic-name--------->
             *-literal-1----*
 
->---*------------------------*------------------------------><-
    **-----*-*-identifier-2-**
     *-FOR-* *-literal-2----*
 

identifier-1 or literal-1

The DISPLAY statement's literal operands, or the contents of the DISPLAY statement's identifier operands, are written to the system-defined local data area of the job containing the program that issues the DISPLAY.

The data is written to the local data area according to the rules for the MOVE statement for a group move without the CORRESPONDING phrase, and without padding on the right with spaces.

mnemonic-name

Mnemonic-name must be associated with an environment-name of LOCAL-DATA in the SPECIAL-NAMES paragraph.

FOR

When you specify the FOR phrase, it is syntax checked during compilation but treated as a comment during execution.

identifier-2 or literal-2

The value of literal-2 or identifier-2 indicates the program device name of the device that is writing data to the local data area. There is only one local data area for each job, and all devices in a job access the same local data area.

If you specify literal-2, it must be nonnumeric and 10 characters or less in length. If you specify identifier-2, it must refer to an alphanumeric data item, 10 characters or less in length.


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