This format is used to transfer data to identifier-1 from the system-defined local data area created for a job.
ACCEPT Statement - Format 4 - Local Data Area >>-ACCEPT--identifier-1--FROM--mnemonic-name--------------------> >--+---------------------------+--+------------+--------------->< | (1) | '-END-ACCEPT-' '-FOR------+-identifier-2-+-' '-literal-1----'
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.