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


Please Help Members By Posting Answers For Below Questions

what are the differences between temporary storage queue (tsq) and transient data quene (tdq)?

675


What are the cics transactions?

578


when a task suspends all the handle conditions via the push command, how does the task reactivate all the handle conditions?

688


Name at least one of the ways by which a transaction can be terminated?

569


difference between tsq and tdq?

752






Can you explain communication area?

590


kindly specify the pic clause for the following:any bll cell, data type of length option field, hhmmss type of data fields?

672


What are the types of processes to create a map in cics?

580


What is bms map?

661


Can you use occurs in bms map?

609


What is the use of tdq and tsq?

601


What Are Send Map Maponly & Send Map Dataonly ?

698


Explain how do you set the mdt option to on status, even if data is not entered?

601


Define an aica abend?

614


What do you mean by CEMT?

771