Interested to Buy Any Domain ? << Click Here >> for more details...
What is the command for reading a record form a TSQ?
- 3 Answers
- 24993 Views
- I also Faced
- E-Mail Answers
Answer Posted / hems
Temporary Storage Queues:
The temporary program (TSP) provides the application
program with an ability to do store and retrieve the data
in a temporary storage queue (TSQ)
TSQ can be used as scratch pad memory.
TSQ can be created and deleted dynamically by an
application program without specifying anything in CICS
control tables.
Temporary storage queue which are to recovered in the event
of failure should be registered in TST (Temporary Storage
Table)
A TSQ is identified by the queue id (1 to 8 bytes).
A record in a TSQ can be read any number of times, they can
be read both sequentially and randomly and records in a TSQ
can also be updated.
TSQ can be written in the main storage or in the auxiliary
storage. If the TSQ is written in main storage, accessing
TSQ is very fast but TSQ in this mode is not recoverable.
TSQ which is written in auxiliary storage (external VSAM
file) can be recoverable.
WRITEQ TS Command
EXEC CICS WRITEQ
QUEUE (name)
FROM (data-area)
LENGTH (data-value)
ITEM (data-area)
REWRITE
MAIN / AUXILIARY
NOSUSPEND
END-EXEC.
The WRITEQ command is used to write a record (item) in a
TSQ.
LENGTH indicates the length of data records. It is a half
word binary (S9(4) COMP)
ITEM specifies the relative position number. It is defined
as a half word binary (S9(4) COMP)
MAIN : specifies main storage.
AUXILIARY : specifies auxiliary storage. This is default.
REWRITE : Option is used to rewrite a record in a TSQ,
which has been read.
NOSUSPEND : If no space is detected in the TSQ for the
new record, CICS will return the control to the next
statement after the WRITEQ command instead of suspending
the task if NOSUSPEND is specified in the WRITEQ command.
At the end of the write command CICS places item number of
the record written into ITEM parameter.
Exceptional condition to WRITEQ are:
NOSPACE Sufficient space is not available. The default
action is suspend the task untill space is available.
READQ TS Command
EXEC CICS READQ
QUEUE (name)
INTO (data-area) / SET (data-area)
LENGTH (data-area)
ITEM (data-value) / NEXT
END-EXEC.
The READQ command is used to read all the records in a TSQ
sequentially or to read a particular record randomly.
INTO determines the area to which the record data is to be
placed.
LENGTH indicates the length of the record to be read.
ITEM indicates item number of the record to be read.
SET option can also be used instead of INTO option.
Other options of the READQ command is
NUMITEMS Specify NUMITEMS (data-area) in READQ command.
The data area defined as S9(4) COMP. At the completion of
the read command, CICS will place the actual number of the
records in the TSQ specified.
NEXT if this option is specified, task will read the
next sequential record in the TSQ
specified. This option should be used very carefully.
Exceptional conditions are
QIDERR : The specified QID is not found.
ITEMERR : The specified item number is not found. For
sequential read it indicates end
of the queue.
DELETEQ TS Command
EXEC CICS DELETEQ TS
QUEUE (name)
END-EXEC.
The DELETEQ command is used to delete a TSQ entirely.
Cannot delete a single item from the TSQ.
Exceptional conditions are
QIDERR : The specified QID is not found.
| Is This Answer Correct ? | 10 Yes | 2 No |
Post New Answer View All Answers
Can you define mapset?
Explain the difference between a physical bms mapset and a logical bms mapset?
What does the 'cebr:cics' transactions do?
when an apllication is invoked via the exec cics start command with the from option, how does the application gain access to the common area?
What is program reentrance?
Can dynamic calls be used in CICS?
Explain how do you delete item 3 in a five-item tsq?
Explain what is the massinsert option?
How can you use dynamic calls in cics?
mention the option used in the cics read command to gain accessibility directly to the file i/o area. (Assume cobol-ii).?
What do you mean by the term fct?
Explain cemt transaction commands?
Explain how do you terminate an already issued delay command?
What is the common work area?
What are the types of important programs that are used in the cics?
