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 DEQ?
Highlight the difference between a symbolic map and physical map?
Explain the mdt in cics?
Can you define mdt?
What is the term bms in cics?
What is bms map?
What is the cics command level?
Explain the difference between cics program control table (pct) and cics processing program table (ppt)?
What is the common work area?
Define the term function request shipping?
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?
Can you define mapset?
Explain the difference between tsq and tdq
Explain the purpose of the program list table?
When would you use abend command?