MVSFORUMS.com

mfusers · Beginner Joined: 08 Aug 2005 Posts: 3 Topics: 2

Hi all.
In a CICS transaction, I am reading a VSAM file and loading the data into an internal table that is occuring 1000 times. The intenal table size is 31 bytes and for occurs 1000 it occupies 31000 bytes. Till now I was writing this 31000 bytes into a Queue as a single item. But now the VSAM may contain 2000 records. I can load this into the internal table by increasing the occurs clause. But the queue cannot accommodate 62000 bytes in a single item. How can i solve this problem? I have to carry this data to different programs. Also i dont have enough COMMAREA.

kolusu · Posted: Tue Aug 09, 2005 7:02 am Post subject:

warp5 · Posted: Wed Aug 10, 2005 12:53 am Post subject:

Try using temporary storage (TS queue) and writing each record instead of the whole table at once. Really do not see much of an advantage to all this. This seems to be a design error as far as I can see.

SureshKumar · Intermediate Joined: 23 Jan 2003 Posts: 211 Topics: 21

mfusers,
Re-visit the business requirement, look at the bigger picture. Most transactions don't need special requirements. However, I have read articles about BTS Containers (Business Transaction Services) some kind of an API interface within the transaction server. I have not had an oppurtunity to explore or implement it. I don't have the link with me, so look into the z/os server manual - look for BTS containers. thanks