| View previous topic :: View next topic |
| Author |
Message |
rajeev_sjc
Beginner
Joined: 17 Jan 2006
Posts: 3
Topics: 2
|
 Posted: Tue Jan 17, 2006 6:42 am Post subject: Info required on DFHCOMMAREA |
 |
|
Hi,
Was asked the following question in an interview:
'I have a CICS program that does not have DFHCOMMAREA defined it. Will this program compile and run.
If yes, why? and if not, why not ?"
Can someone please let me know the answer to the above question.
Thanks,
Rajeev |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12394
Topics: 75
Location: San Jose
|
| Posted: Tue Jan 17, 2006 8:01 am Post subject: |
|
|
Rajeev,
When you compile a CICS program , the The translator modifies the linkage section by inserting the EIB structure as the first parameter, and inserts declarations of the temporary variables that it requires into the working-storage section. It also inserts a DFHCOMMAREA if the first item in the linkage section is not a DFHCOMMAREA.
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
haree_amrid
Beginner
Joined: 21 Dec 2005
Posts: 9
Topics: 3
Location: INDIA
|
| Posted: Tue Jan 17, 2006 9:31 am Post subject: |
|
|
Ya Kolusu u r right. Just an addition to your point.
The translator will create the DFHCOMMAREA of PIC x(1) if we didn't coded it in the VERY FIRST of linkage section.
Also it will create the copy book DFHEIBLK. This will be the first one in the linkage. Second one will be COMMAREA. Also it modifies the PROCEDURE DIVISION STATEMENT AS "PROCEDURE DIVISION USING DFHEIBLK DFHCOMMAREA. "
The copy book DFHEIBLK will have all the EXEC Interface Block variable(EIB) which is used for handling CICS. I am providing the copybook DFHEIBLK for reference:-
| Code: |
01 DFHEIBLK.
02 EIBTIME COMP-3 PIC S9(7).
02 EIBDATE COMP-3 PIC S9(7).
02 EIBTRNID PIC X(4).
02 EIBTASKN COMP-3 PIC S9(7).
02 EIBTRMID PIC X(4).
02 DFHEIGDI COMP PIC S9(4).
02 EIBCPOSN COMP PIC S9(4).
02 EIBCALEN COMP PIC S9(4).
02 EIBAID PIC X(1).
02 EIBFN PIC X(2).
02 EIBRCODE PIC X(6).
02 EIBDS PIC X(8).
02 EIBREQID PIC X(8).
02 EIBRSRCE PIC X(8).
02 EIBSYNC PIC X(1).
02 EIBFREE PIC X(1).
02 EIBRECV PIC X(1).
02 EIBFIL01 PIC X(1).
02 EIBATT PIC X(1).
02 EIBEOC PIC X(1).
02 EIBFMH PIC X(1).
02 EIBCOMPL PIC X(1).
02 EIBSIG PIC X(1).
02 EIBCONF PIC X(1).
02 EIBERR PIC X(1).
02 EIBERRCD PIC X(4).
02 EIBSYNRB PIC X(1).
02 EIBNODAT PIC X(1).
02 EIBRESP COMP PIC S9(8).
02 EIBRESP2 COMP PIC S9(8).
02 EIBRLDBK PIC X(1).
|
_________________
With Regards,
Hareesh Amrideswaran |
|
| Back to top |
|
|
rajeev_sjc
Beginner
Joined: 17 Jan 2006
Posts: 3
Topics: 2
|
| Posted: Wed Jan 18, 2006 4:36 am Post subject: |
|
|
Hi,
Thanks a lot, Kolusu and Hareesh for the answer.
Best Regards,
Rajeev |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
