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
when an xctl is done, does the tranid change ? Is a new task created ? Does it cause an implicit syncpoint to be issued ?
What is a transid?
which cics service transaction is used to gain accessibility to cics control tables? Mention the one that has the highest priority.?
When would you use abend command?
Explain how do you delete item 3 in a five-item tsq?
Can you explain cics transaction gateway?
which cics command must be issued by the application program in order to gain access to the common work area (cwa)?
What is the use of the program list table?
I have done a start browse on a vsam dataset. Can I do another start browse without doing an end browse?
In a CICS program, how will you read a VSAM file?
Define ceci?
How to define a vsam file in cics getting into cics to define a vsam file.
What does the 'cemt:cics' transactions do?
Can you define attribute byte?
Can you explain dfhmdf bms macro?