Previous Topic Next topic Print topic


CIC-READQ-TD

Read transient data from a predefined data queue.
Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.

Target:

CICS

Syntax:

CIC-READQ-TD QUEUE(name)
... INTO(dataarea)|SET(linkdataname)
... [LENGTH(dataarea)] [SYSID(name)]
... [ERROR(errorpara)]

Parameter:

ERROR (errorpara)

User-defined error routine to perform when an abnormal condition occurs.

INTO (dataarea)

Name of data area where AMB places transient or temporary data.

LENGTH (value)

Maximum length of data; can be a literal (LINK or XCTL only) or COBOL data name defined as S9(04)COMP. Can also be a partial length (XCTL only).

QUEUE(name)

Queue name; can be a literal (maximum 8 characters), or COBOL data name (maximum 30 characters) defined as X(4).

SET(link-dataname)

01-level Linkage Section data area identical to the linkdataname in the associated TP-LINKAGE call.

SYSID(name)

Remote system name; can be a literal or a COBOL data name (maximum 4 characters).

Example:

Read a record from a transient data queue `TDAQ' into data area WS-TD-REC.
CIC-READQ-TD QUEUE('TDAQ') INTO(WS-TD-REC)
... LENGTH(WS-TD-LEN)
... ERROR(ERROR-PARA)
Previous Topic Next topic Print topic