MVSFORUMS.com

[hithesh_r]

I am calling a COBOL-CICS program AAA.

CALL WS-AAA USING WS-VAR-01.

In the Program AAA,
I have defined WS-VAR-01 in the linkage section.
And also used this variable in PROCEDURE DIVISION as follows.

PROCEDURE DIVISION USING WS-VAR-01.

When XPEDIT, I find the following code.

PROCEDURE DIVISION USING dfheiblk dfhcommarea WS-VAR-01.

While Xpediting, I find the Values in WS-VAR-01 corresponds to DFHEIBLK instead of WS-VAR-01.
And when I am trying to use the 05 variables of WS-VAR-01, I get the error: "Unable to Determine Addr"

As per understanding we can resolve it in 2 ways:-
i) CALL WS-AAA USING dfheiblk
dfhcommarea
WS-VAR-01.

ii) EXEC CICS LINK ('WS-AAA') .....END-EXEC.

Any pointers as why such an error occurs?
Is there any alternate way to resolve this?
What is the best way to resolve this error?

[CT]

Hitesh ,

One more way is , as i guess , Program 'WS-AAA' doesnot contains any CICS commands . If yes then while compiling this program , dont use translator step .....
So the DFHCOMMAREA and DFHEIBLK will not get attached with PROCEDURE DIVISION ....

Hope this help , Thanks, CT