devarav
New User
Joined: 04 Dec 2014 Posts: 1 Location: India
|
|
|
|
My first post here.. so please forgive me for any errors.
We are facing an issue in production where a sub module is abending because of TSQ length error (response code 22).
The program would first check if the TSQ is present and if it gets QID error then it will create the TSQ. If the TSQ is present then it will unload the data and continue processing. The TSQ is mainly used to reduce the number of ADABAS calls.
We are facing the length error only when several transactions queue up and they are executed at once.
The main program is AMODE 24 and it is calling the sub module that is AMODE 31. Per the program comments the TSQ is stored in Main storage. The program maintains another queue with same data in auxiliary storage and has logic to copy the TSQ from auxiliary storage to main storage if the timestamp in the queue is more than 1 minute to prevent the TSQ from corruption.
One other thing that I noticed is that the main program is not initializing the area of the sub program before calling.
Any ideas on this error? This happens only when several transactions are executed at once.
Thank you in advance. |
|