IBM Extension

Format 4 - Local Data Area

This format is used to transfer data to identifier-1 from the system-defined local data area created for a job.

Read syntax diagramSkip visual syntax diagram
ACCEPT Statement - Format 4 - Local Data Area

>>-ACCEPT--identifier-1--FROM--mnemonic-name-------------------->

>--+---------------------------+--+------------+---------------><
   |     (1)                   |  '-END-ACCEPT-'   
   '-FOR------+-identifier-2-+-'                   
              '-literal-1----'                     

Notes:
  1. Syntax-checked only.

This format is only applicable when the mnemonic-name in the SPECIAL-NAMES paragraph is associated with the environment-name LOCAL-DATA.

The move into identifier-1 takes place according to the rules for the MOVE statement for a group move without the CORRESPONDING phrase. Identifier-1 cannot be a date-time item. If the description of identifier-1 contains a TYPE clause, the type-name referenced in that clause must be elementary.

Identifier-1 can be an internal or external floating-point data item.

Identifier-1 can be a DBCS or national data item.

When the FOR phrase is specified, it is syntax checked during compilation but treated as a comment during execution. The value of literal-1 or identifier-2 indicates the program device name of the device that is associated with 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. Literal-1, if specified, must be nonnumeric and 10 characters or less in length. Identifier-2, if specified, must refer to an alphanumeric data item, 10 characters or less in length. For more information about the local data area, see the CL Programming manual.

End of IBM Extension