Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

DFHCOMMAREA doubt !

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
rohanthengal

Active User


Joined: 19 Mar 2009
Posts: 179
Location: Globe, India

PostPosted: Tue Sep 14, 2010 4:27 pm    Post subject: DFHCOMMAREA doubt !
Reply with quote

i have written this code but when i run the CEDF mode and see the content of COMMAREA, it shows EEEEE on it

MOVE DFHCOMMAREA TO WS-COMMAREA
Code:
IF EIBCALEN = 0                       
    MOVE LOW-VALUES   TO ADDMAPO     
    MOVE -1           TO NUM1L       
    MOVE 'ENTER THE NUMBERS' TO MSGO 
    PERFORM B0000-SEND-PARA           
    MOVE 'EEEEE'      TO WS-COMMAREA 
    PERFORM B0001-RETURN-PARA         
ELSE
    ----- recieve para..............
END-IF

contents of RETURN PARA are:

EXEC CICS RETURN
TRNSID[TRNID]
COMMAREA(WS-COMMAREA)
END-EXEC

I have few doubts in this:
1. Though i dont move anything to DFHCOMMAREA & moving 'EEEEE' to WS-COMMAREA, how length component of EIBCALEN is changing to 5 ?
2. Also, what is the significance of moving DFHCOMMAREA to WS-COMMAREA in the first statement of PROCEDURE DIVISION
3. Does COMMAREA changes with the change in WS-COMMAREA ?
4. What is the use of RETURNING transaction with COMMAREA ?

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

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8003
Location: Bellevue, IA

PostPosted: Tue Sep 14, 2010 4:41 pm    Post subject:
Reply with quote

1. EIBCALEN reflects the length of the DFHCOMMAREA when the program (transaction) starts.

2. Some shops have standards that require the move. There is no reason in COBOL to do so as COBOL can work with the data in LINKAGE SECTION or WORKING-STORAGE SECTION just fine.

3. No, DFHCOMMAREA and WS-COMMAREA are two different areas of memory and are not linked.

4. RETURN TRANSID tells CICS to start this transaction when an attention key (enter, PF key, PA key, clear key, etc) is hit on the attached terminal. The COMMAREA option provides the DFHCOMMAREA for this started transaction, which allows the program to be aware this is the not the first time through the code, and hence to receive the map sent the first time around.
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 992
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Tue Sep 14, 2010 7:21 pm    Post subject:
Reply with quote

Does this program ALWAYS receive a COMMAREA? If not, then EIBCALEN is zero so how does the
Code:
MOVE DFHCOMMAREA TO WS-COMMAREA
work?

Garry.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Doubt in MFS abdulrafi IMS DB/DC 2 Fri Oct 21, 2016 3:09 pm
No new posts Doubt on GETMAIN, FREEMAIN behaviour Arunkumar Chandrasekaran CICS 3 Sun Aug 30, 2015 9:22 pm
No new posts Doubt in using command code O Appu IMS DB/DC 4 Tue Jan 13, 2015 3:14 pm
No new posts Doubt in using command code D and N t... Appu IMS DB/DC 7 Mon Dec 29, 2014 5:52 pm
No new posts DFHCOMMAREA addressing akodakka CICS 4 Fri May 30, 2014 5:17 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us