CREATE TDQUEUE

Define a transient data queue in the local CICS region.

Read syntax diagramSkip visual syntax diagramCREATE TDQUEUE
 
>>-CREATE TDQUEUE(data-value)--ATTRIBUTES(data-value)----------->
 
>--ATTRLEN(data-value)--LOGMESSAGE(cvda)-----------------------><
 

Conditions: ILLOGIC, INVREQ, LENGERR, NOTAUTH

Read syntax diagramSkip visual syntax diagramCREATE 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)-'
 
Read syntax diagramSkip visual syntax diagramCREATE 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)--'
 
Read syntax diagramSkip visual syntax diagramCREATE TDQUEUE attribute values for indirect queues:
 
|--TYPE(INDIRECT)--+---------------------+---------------------->
                   '-DESCRIPTION(char58)-'
 
>--INDIRECTNAME(char4)--+-----------------------+---------------|
                        '-| Remote attributes |-'
 
Read syntax diagramSkip visual syntax diagramCREATE TDQUEUE attribute values for remote queues of unspecified TYPE:
 
|--+---------------------+--+-----------------------+-----------|
   '-DESCRIPTION(char58)-'  '-| Remote attributes |-'
 

Read syntax diagramSkip visual syntax diagramRemote attributes:
 
|--REMOTESYSTEM(char4)------------------------------------------>
 
                              .-REMOTENAME(tdqueue)-.
>--+-----------------------+--+---------------------+-----------|
   '-REMOTELENGTH(0-32767)-'  '-REMOTENAME(char4)---'
 
Note to COBOL programmers:

In the syntax above, you must use
     --- ATTRIBUTES ( data-area )---  instead of
     --- ATTRIBUTES ( data-value)---

Description

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.

Options

ATTRIBUTES(data-value)
specifies the attributes of the queue being added. The list of attributes must be coded as a single character string and must include the TYPE option unless the queue is remote. The remaining attributes depend on the queue type; use the syntax shown in the figure (extra-partition, intra-partition, or indirect) that corresponds to your TYPE value. If the queue is remote, you still can specify TYPE and use the appropriate syntax, but you can also use the briefer form labelled remote queues of unspecified TYPE. See ATTRIBUTES option for general rules for specifying attributes, and the TDQUEUE section in the CICS® Resource Definition Guide for details about specific attributes.
ATTRLEN(data-value)
specifies the length in bytes of the character string supplied in the ATTRIBUTES option, as a halfword binary value. The length may not exceed 32767 bytes.
LOGMESSAGE
specifies whether CICS logs the attributes used for the resource being created to the CSDL transient data queue. CVDA values are:
LOG
The resources attributes are logged to the CSDL transient data queue.
NOLOG
The resources attributes are not logged to the CSDL transient data queue.
TDQUEUE(data-value)
specifies the 4-character name of the TDQUEUE definition to be added to the CICS region.

Conditions

ILLOGIC
RESP2 values:
2
The command cannot be executed because an earlier CONNECTION or TERMINAL pool definition has not yet been completed.
INVREQ
RESP2 values:
n
There is a syntax error in the ATTRIBUTES string, or an error occurred during either the discard or resource definition phase of the processing. See Appendix C. EXEC CICS CREATE RESP2 values for information on RESP2 values.
7
The LOGMESSAGE cvda value is not valid.
200
The command was executed in a program defined with an EXECUTIONSET value of DPLSUBSET or a program invoked from a remote system by a distributed program link without the SYNCONRETURN option.
LENGERR
RESP2 values:
1
The length you have specified in ATTRLEN is negative.
NOTAUTH
RESP2 values:
100
The user associated with the issuing task is not authorized to use this command.
101
The user associated with the issuing task is not authorized to create a TDQUEUE definition with this name.
102
The user of the transaction issuing the CREATE TDQUEUE command is not an authorized surrogate of the user specified in USERID.
[[ Contents Previous Page | Next Page Index ]]