Cooperative Processing Commands › RECEIVE-AND-WAIT

RECEIVE-AND-WAIT

Purpose

Names the record or field to receive data.

Syntax

►►──── RECEIVE-AND-WAIT ────┬─────────────────┬─── . ─────────────────────────►◄
                            └─ variable-name ─┘

Parameters

variable-name

Names the record or field to receive data from the remote program.

Variable-name can be up to 32 characters long.

If you omit the variable-name, data received from the remote program is lost. Only a value is received in the WHAT-RECEIVED field.

Usage

Considerations

RECEIVE-AND-WAIT is issued by the dialog in receive state:

• If presentation services are being used, then the variable's definition must match the description of the incoming data definition.
• If unformatted data is being received, the maximum length received is derived from the variable's definition.

Example

This server dialog receives an employee id from the client and then obtains the appropriate employee records from the database. The first RECEIVE-AND-WAIT receives the id. The second turns the line around prior to sending information to the client.

CONTROL SESSION FORMAT.
IF APPCCODE LT ZERO
  THEN CALL SR-ABEND.
RECEIVE-AND-WAIT EMP-ID-WORK.
IF APPCCODE LT 0 OR WHAT-RECEIVED NE 'DATA-COMPLETE'
  THEN CALL SR-ABEND.
RECEIVE-AND-WAIT.
  .
  .
  .