Define a transient data queue in the local CICS region.
CREATE TDQUEUE >>-CREATE TDQUEUE(data-value)--ATTRIBUTES(data-value)-----------> >--ATTRLEN(data-value)--LOGMESSAGE(cvda)-----------------------><
Conditions: ILLOGIC, INVREQ, LENGERR, NOTAUTH
CREATE TDQUEUE attribute values for extra-partition queues: |--TYPE(EXTRA)--+------------------------+----------------------> +-BLOCKFORMAT(BLOCKED)---+ '-BLOCKFORMAT(UNBLOCKED)-' .-BLOCKSIZE(0)-------. .-DATABUFFERS(1)-----. >--+--------------------+--+--------------------+---------------> '-BLOCKSIZE(0-32767)-' '-DATABUFFERS(1-255)-' >--DDNAME(char8)--+---------------------+-----------------------> '-DESCRIPTION(char58)-' .-DISPOSITION(SHR)-. >--+------------------+--+----------------+---------------------> +-DISPOSITION(OLD)-+ +-DSNAME(DUMMY)--+ '-DISPOSITION(MOD)-' '-DSNAME(char44)-' .-ERROROPTION(IGNORE)-. .-OPENTIME(INITIAL)--. >--+---------------------+--+--------------------+--------------> '-ERROROPTION(SKIP)---' '-OPENTIME(DEFERRED)-' >--+-----------------+--+------------------------+--------------> +-PRINTCONTROL(A)-+ +-RECORDFORMAT(FIXED)----+ '-PRINTCONTROL(M)-' '-RECORDFORMAT(VARIABLE)-' .-RECORDSIZE(0)-------. >--+---------------------+--+-----------------------+-----------> '-RECORDSIZE(0-32767)-' '-| Remote attributes |-' .-SYSOUTCLASS(*)-----. >--+----------------+--+--------------------+-------------------> +-REWIND(LEAVE)--+ '-SYSOUTCLASS(char1)-' '-REWIND(REREAD)-' .-TYPEFILE(INPUT)--. >--+------------------+-----------------------------------------| +-TYPEFILE(OUTPUT)-+ '-TYPEFILE(RDBACK)-'
CREATE TDQUEUE attribute values for intra-partition queues: .-ATIFACILITY(TERMINAL)-. |--TYPE(INTRA)--+-----------------------+-----------------------> +-ATIFACILITY(FILE)-----+ '-ATIFACILITY(SYSTEM)---' >--+---------------------+--+-------------------+---------------> '-DESCRIPTION(char58)-' '-FACILITYID(char4)-' .-RECOVSTATUS(NO)-------. >--+-----------------------+--+-----------------------+---------> +-RECOVSTATUS(LOGICAL)--+ '-| Remote attributes |-' '-RECOVSTATUS(PHYSICAL)-' .-TRIGGERLEVEL(1)-------. >--+----------------+--+-----------------------+----------------> '-TRANSID(char4)-' '-TRIGGERLEVEL(0-32767)-' .-WAIT(YES)-. .-WAITACTION(REJECT)-. >--+---------------+--+-----------+--+--------------------+-----| '-USERID(char8)-' '-WAIT(NO)--' '-WAITACTION(QUEUE)--'
CREATE TDQUEUE attribute values for indirect queues: |--TYPE(INDIRECT)--+---------------------+----------------------> '-DESCRIPTION(char58)-' >--INDIRECTNAME(char4)--+-----------------------+---------------| '-| Remote attributes |-'
CREATE TDQUEUE attribute values for remote queues of unspecified TYPE: |--+---------------------+--+-----------------------+-----------| '-DESCRIPTION(char58)-' '-| Remote attributes |-'
Remote attributes: |--REMOTESYSTEM(char4)------------------------------------------> .-REMOTENAME(tdqueue)-. >--+-----------------------+--+---------------------+-----------| '-REMOTELENGTH(0-32767)-' '-REMOTENAME(char4)---'
The CREATE TDQUEUE command installs a TDQUEUE definition with the attribute specified on the command. It does not use a resource definition stored in the CSD. If there is already a transient data queue with the name you specify in the local CICS region, the new definition replaces the old one; if not, the new definition is added.
A syncpoint is implicit in CREATE TDQUEUE processing, except when an exception condition is detected early in processing the command. Uncommitted changes to recoverable resources made up to that point in the task are committed if the CREATE executes successfully, and rolled back if not. See Creating resource definitions for other general rules governing CREATE commands.