Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
DFHCOMMAREA uses 1st byte for Address??

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
Author Message
go4salu

New User


Joined: 12 Jan 2006
Posts: 4

PostPosted: Fri Jan 11, 2008 2:58 pm    Post subject: DFHCOMMAREA uses 1st byte for Address??
Reply with quote

Hi all,
If I do not define any Linkage section variable in my CICS program then while compiling, DFHCOMMAREA PIC X gets added automatically. This is for addressability to be maintained by CICS root program.
Everybody is ok with it??

If it is....
Now, there is a requirement to Link (call) a program say B and get back 8bytes variables from it and use it in the calling program say A.

In the working storage of calling prog A how should i define the variable?
01 WS-COMMAREA PIC X(9) or
01 WS-COMMAREA PIC X(8).

If I define it with PIC X(8) then won;t it truncate because the first byte will be used for addressability?
Please let me know asap, I'm stuck up. Thanks in advance.

Regards,
Shailendra
Back to top
View user's profile Send private message
References
gupta vishal

New User


Joined: 25 Sep 2007
Posts: 16
Location: Gurgaon

PostPosted: Fri Jan 11, 2008 4:37 pm    Post subject: Reply to: DFHCOMMAREA uses 1st byte for Address??
Reply with quote

Hi,
you should define it as 05 var pic x(08). The Listing thus produced as a result of compilation wouldn't truncate.The compiler add a default pic x(01) DFHCOMM when no linkage is actually there.

Regards,
Vishal
Back to top
View user's profile Send private message
go4salu

New User


Joined: 12 Jan 2006
Posts: 4

PostPosted: Fri Jan 11, 2008 5:41 pm    Post subject: Reply to: DFHCOMMAREA uses 1st byte for Address??
Reply with quote

Thanks Vishal..
Compiler adds DFHCOMMAREA pic X, when there is no variable defined in lankage for addressability.

But what if there is already DFHCOMMAREA in the program. Then in that case system will assign first byte for addressability and rest we can use.. is it that way..
Or

when there is explicit DFHCOMMAREA then the compiler will not use the first byte of it for addressability and the all bytes can be used for data passage.

Please confirm on this asap

Thanks
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 219

PostPosted: Fri Jan 11, 2008 6:36 pm    Post subject:
Reply with quote

lgo4salu,

first byte of dfhcommarea is not for addressability. you need to
do some more review on CICS cobol programming and commareas.


take a look at:
http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol3.doc/tpenv03.htm
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1