What is the command for reading a record form a TSQ?
Answer Posted / srivani dorbala
EXEC CICS READQ TS
QUEUE('QNAME')
INTO(WS-TSQ-REC)
ITEM(Q-ITEM)
LENGTH(LENGTH OF WS-TSQ-REC)
END-EXEC.
WHERE QNAME IS ANYNAME OF TSQ WHICH SHOULD B 8 CHARACTERS.
WS-TSQ-REC WHICH IS A RECORD DECLARED IN WORKING STORAGE
SECTION AND Q-ITEM IS A WORKING STORAGE VARIABLE WHICH HAS
PIC S9(04) COMP VALUE 0.EVERY TIME THIS ITEM IS INCREASING
BY 1.
IF U HAVE ANY DOUBT, PLEASE SHARE WITH ME.
| Is This Answer Correct ? | 25 Yes | 2 No |
Post New Answer View All Answers
What will happen if some program tries to process a queue on which an ENQ command has been issued by some other program?
Explain cemt transaction commands?
Can you explain communication area?
which transient data queue support ati?
Explain the difference between start and xctl?
what are the differences between and exec cics xctl and exec cics start command?
What is the cics command level?
Mention the option used in a cics command to retrieve the response code after execution of the command?
Can you define cics task?
What is the term conversational programs means?
Specify the requirements for automatic task initiation?
if i am having a cics,vsam and db2 programs with each functions and i want that each function on screen?
what is the difference between a return with transid and xctl? For example program. A is issuing return with transid to program b. Program a. Is isssuing xctl to program b?
Mention one alternative aspect of CICS?
What is DEQ?