Interested to Buy Any Domain ? << Click Here >> for more details...
What is the command for reading a record form a TSQ?
- 3 Answers
- 25132 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
what are the differences between and exec cics xctl and exec cics start command?
How vsam files are read in cics pgms?
What are the types of the dfhmdf present in the cics?
Code the related portions of cics/cobol-i programs to gain addressability to twa area assigned to a particular task. Assme that the size of twa area is 300bytes. What are the advantages if cobol-ii is used in the place of cobol?
How to handle exceptional conditions in cics?
In a CICS program, how will you read a VSAM file?
Explain the difference between link xctl?
when a task suspends all the handle conditions via the push command, how does the task reactivate all the handle conditions?
Explain the difference between a package and a plan.
Can you explain exec cics handle condition command?
what is the most common way of building queue-id of a tsq?
Define cebr?
Explain how do you access the records randomly in tsq?
specify the requirements for automatic task initiation. (Mention the control table, it is entries and the corresponding procedure division cics command).?
What is the syncpoint command?
