The ACCEPT statement retrieves information from the data area specified in the FOR phrase.
ACCEPT Statement - Format 9 - Data Area >>-ACCEPT--identifier-1--FROM--mnemonic-name--------------------> >--FOR--+-identifier-2-+----------------------------------------> '-literal-1----' >--+-----------------------------------+------------------------> '-+----+--LIBRARY--+-identifier-3-+-' '-IN-' '-literal-2----' >--+----------------------+--+-----------+----------------------> '-AT--+-identifier-4-+-' '-WITH LOCK-' '-integer-1----' >--+-------------------------------------------+----------------> '-+----+--EXCEPTION--imperative-statement-1-' '-ON-' >--+------------------------------------------------+-----------> '-NOT--+----+--EXCEPTION--imperative-statement-2-' '-ON-' >--+------------+---------------------------------------------->< '-END-ACCEPT-'
For more information and an example of how to use data areas,
see the "Using Data Areas You Create" information in the
"Passing Data Using Data Areas" section of the
IBM Rational Development Studio for i: ILE COBOL Programmer's Guide. 