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 is the use of the eibaid field?
What does the 'cebr:cics' transactions do?
Define an aey9 abend?
name the command that is used to dump the main storage areas related to a task?
What is the common work area?
list the sequence of steps used to achieve modiication in skip sequential mode?
Define primary objective of cics?
Explain how do you access the records randomly in tsq?
What are the cics tables?
How to define a vsam file in cics getting into cics to define a vsam file.
Define an asra abend?
Can QSAM files be accessed from CICS?
the dfhcommara is used to pass information from one application to another. What are some other ways that this function can be accomplished?
What is the meaning of the eibaid field?
Define cics interface block?