Dynamic copybooks??

[sKrEwBaLL]

Hi

Is there any way you can define the working storage differently, depending on which sub-system the program is running in (ie depending on calling program)?

I have a CICS program which is used in two different sub-systems. The working storage needs to be different depending on which program calls it (xctls to it). I have made changes to the working storage and copybooks which would work for one sub-system and not the other. It would be easy enough to redefine large fillers, but there is hardly any space left in the commarea. I was hoping there was maybe some way of include copybooks dynamically.

I want to avoid having to clone the program.

I am using COBOL/2 for OS/390.

Any advice would be very much appreciated.

Neil

 

[MarcLodge]

Hi Neil,
I'm not sure I understand your problem, but first off, there is not any way in which you can dynamically include a copybook at run time (that I know of!).

Is the commarea the same size in both systems, and is it this area that you wish redefined?

Marc

 

[sKrEwBaLL]

Hi Marc,

Yes the commarea is the same size in both systems, but different parts of it are being used by the two systems.

The main problem that I have is that I have run out of space in my commarea, but after giving it some thought, I reckon I can probably get around it by using a TSQ.

Thanks anyway!

Cheers

Neil

 

[MarcLodge]

Hi Neil,
If you have solved it, all well and good. A TSQ certainly seems a possibility if you have run out of room in the commarea and need to get more data into the program.

Good luck

Marc

 

[slade]

Hi SB,

I assume you can determine which CALLER you're servicing. Why not include both copybooks, with one redefining the other? Or am I missing something?

Regards, Jack.

 

[MarcLodge]

Jack,
If you are missing somewthing on this one, then that makes two of us!

Neil,
If you wish to clarify what you are are attempting to do, then please free. But if you've solced it, then no problems.

Marc