COBOL/400 Language Help

Format 1 (Data Transfer)

Description
Format 1 of the ACCEPT statement transfers data from an input/output device into the specified identifier. The incoming data is received in USAGE IS DISPLAY format. When you omit the FROM phrase, the ACCEPT statement obtains input from the job input stream for batch jobs, and from the workstation for interactive jobs.

Format 1 is useful for exceptional situations when operator intervention (to supply a given message, code, or exception indicator) is required. The operator must have the appropriate messages with which to reply.

Format 1 (Data Transfer)
 
->->--ACCEPT identifier --*------------------------------*----------------><-
                        *-FROM-*--mnemonic-name-----*--*
                               *--environment-name--*
 

identifier

Identifier is the receiving data item.

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 SYSIN.


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