View previous topic :: View next topic |
Author |
Message |
chandhroo Beginner
Joined: 02 Dec 2002 Posts: 36 Topics: 13
|
Posted: Wed Feb 18, 2004 7:31 am Post subject: Executing DB2 program from non-db2 cobol program? |
|
|
Hi,
I tried to find answer for this question by search option from previous post, but couldn't find. I'm sorry if this is duplicate question.
Actually I would like to know execution procedure to call COBOL-DB2 program from COBOL(non-db2) program. We should use IKJEFT1 when we execute DB2 program, will it be same when we call cobol-db2 program from cobol program?
Also please please send me link to do search from previous post as well as manuals.
--Chandru |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
chandhroo Beginner
Joined: 02 Dec 2002 Posts: 36 Topics: 13
|
Posted: Wed Feb 18, 2004 8:46 am Post subject: |
|
|
Thanks Kolusu,
I did searched with my question, but found nothing. Could you please send me link or explain how to execute COBOL program calling DB2-COBOL program?
Thanks in advance.
--Chandru |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Wed Feb 18, 2004 9:03 am Post subject: |
|
|
Chandru,
You need to run your pgm using IKJEFT01 with a plan for the main pgm.
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
chandhroo Beginner
Joined: 02 Dec 2002 Posts: 36 Topics: 13
|
Posted: Wed Feb 18, 2004 9:27 am Post subject: |
|
|
Kolusu,
Main program is just COBOL program, sub program is DB2 program which has plan. Could I give subprogram's plan?
--Chandru |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Wed Feb 18, 2004 9:35 am Post subject: |
|
|
Chandru,
Create a plan with a package list for the subprogram.
ex:
Code: |
BIND PLAN(Main PGM) +
MEMBER(Main PGM) +
PKLIST(Sub Routine) +
ACTION(REPLACE) +
RETAIN +
VALIDATE(BIND) +
ISOLATION(CS) +
CACHESIZE(0) +
ACQUIRE(USE) +
RELEASE(COMMIT) +
CURRENTDATA(NO) +
EXPLAIN(YES)
|
And run the main pgm shown in this Topic.
http://www.mvsforums.com/helpboards/viewtopic.php?t=793&highlight=ikjeft01
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
chandhroo Beginner
Joined: 02 Dec 2002 Posts: 36 Topics: 13
|
Posted: Wed Feb 18, 2004 1:31 pm Post subject: |
|
|
Thanks Kolusu. |
|
Back to top |
|
|
|
|