COBOL CICS passing data more than 32K



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

COBOL CICS passing data more than 32K

Postby vikas walunj » Sun Sep 16, 2012 3:13 am

I have situation to discuss. And I dont know how to perform this.

Say I am calling program XYZ in program ABC using CICS LINK. Output caopybook of program XYZ is sending back more than 32K data as fixed data + variable data. The field i am concerned in program ABC resides in fixed data.

So i wan to ignore remaining variable data ( or you can say i want to accept <32k data in program ABC from program XYZ). How can i perform this ?
Is there any way to ignore or not accept data after 32K?
vikas walunj
 
Posts: 5
Joined: Sun Sep 16, 2012 2:40 am
Has thanked: 0 time
Been thanked: 0 time

Re: COBOL CICS passing data more than 32K

Postby Robert Sample » Sun Sep 16, 2012 3:46 am

With the last several releases of CICS, you can use containers to pass more than 32K of data between programs.

However, if you are referring to DFHCOMMAREA, the limit is 32767 bytes (and IBM recommends keeping it to 24576 or less bytes), and you cannot get around that limit.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: COBOL CICS passing data more than 32K

Postby vikas walunj » Sun Sep 16, 2012 5:01 am

Thanks Robert for reply.
I got what do you mean. Sorry may be I was not clear in my requirement.

I have two cobol cics programs A and B.
Program A is calling program B using CICS LINK. They are using DFHCOMMAREA to pass data.
In return Program B is sending data to program A more than 32K using UMT process (fixed data + variable data).

Now program A want to accept only fixed data part of return from program B. Which is less than 32K. i.e. A wants to ignore data more than 32K.

Is it possible?
If yes how?
vikas walunj
 
Posts: 5
Joined: Sun Sep 16, 2012 2:40 am
Has thanked: 0 time
Been thanked: 0 time

Re: COBOL CICS passing data more than 32K

Postby Robert Sample » Sun Sep 16, 2012 5:42 am

i.e. A wants to ignore data more than 32K.
As long as program A and program B do not attempt to use more than 32767 bytes for DFHCOMMAREA, you will not have a problem. However, program A will not be ignoring "data more than 32K" -- if program B attempts to use DFHCOMMAREA with more than 32767 bytes, typically the region will ABEND -- I've seen it happen -- in which case program A will not be executing since the region will not be executing.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: COBOL CICS passing data more than 32K

Postby vikas walunj » Sun Sep 16, 2012 6:35 am

yea actually i am facing same problem. Program A is not executing or i would say it is giving me garbage values at output.

Anyways Thanks Robert.
vikas walunj
 
Posts: 5
Joined: Sun Sep 16, 2012 2:40 am
Has thanked: 0 time
Been thanked: 0 time

Re: COBOL CICS passing data more than 32K

Postby Robert Sample » Sun Sep 16, 2012 7:05 am

I will repeat my earlier comment -- if your version of CICS supports containers, you should be using them. If you don't know how to use them, read the manual.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: COBOL CICS passing data more than 32K

Postby vikas walunj » Sun Sep 16, 2012 7:24 am

yea it supports. I was just looking for other options to solve that.
vikas walunj
 
Posts: 5
Joined: Sun Sep 16, 2012 2:40 am
Has thanked: 0 time
Been thanked: 0 time

Re: COBOL CICS passing data more than 32K

Postby dick scherrer » Sun Sep 16, 2012 8:40 am

Hello and welcome to the forum,

Let's recap - what you want to do fails (and may take down the CICS region.

Containers does exactly what you want.

What good reason (other than maybe just you do not want to learn) is there to look for "other optons"?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: COBOL CICS passing data more than 32K

Postby vikas walunj » Sun Sep 16, 2012 9:46 pm

Thanks for welcoming me.

Well Dick, other reason is program A is called by many other applications and I would think 10 times for my options before I change it.
And about containers, as i have written program B uses UMT process which uses containers to pass data. I know this process.
It is just huge impact and timw I have, forcing me to look for other options.
vikas walunj
 
Posts: 5
Joined: Sun Sep 16, 2012 2:40 am
Has thanked: 0 time
Been thanked: 0 time

Re: COBOL CICS passing data more than 32K

Postby mongan » Mon Sep 17, 2012 12:04 pm

Well, you can continue to look, or you can listen to the very good advice that has already been given. But to your problem, why do you suddenly have to do this, perhaps you have a design flaw in what you want and need to do, tell us what has changed that now causes this problem?
User avatar
mongan
 
Posts: 211
Joined: Tue Jan 11, 2011 8:32 pm
Has thanked: 1 time
Been thanked: 5 times

Next

Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post