CICS
CIC-WRITEQ-TD QUEUE(name) FROM(dataarea) ... [LENGTH(value)] [SYSID(name)] ... [ERROR(errorpara)]
ERROR (errorpara) |
User-defined error routine to perform when an abnormal condition occurs. |
FROM (dataarea) |
Data area to be acted on. |
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). Required with SYSID. |
QUEUE(name) |
Queue name; can be a literal (maximum 8 characters), or COBOL data name (maximum 30 characters) defined as X(4). |
SYSID(name) |
Remote system name; can be a literal or a COBOL data name (maximum 4 characters). |
CIC-WRITEQ-TD QUEUE('TRDQ') FROM(WS-MESSAGE) ... LENGTH(WS-TD-LEN) ... ERROR(ERROR-PARA)