karunkallore Beginner
Joined: 11 Dec 2004 Posts: 103 Topics: 39
|
Posted: Mon Aug 07, 2006 5:39 am Post subject: Got it ! |
|
|
Hi Friends,
Thank you to all who have taken time to read the post. In the meanwhile i have got some inputs which i would like to share. Please find it below:-
Code: |
*************************************************************
Mixed IMS and DB2 Execution
*************************************************************
If your CA-Easytrieve/Plus program accesses an IMS database and DB2
database, you should run your program under the control of DB2-DL/I
BATCH SUPPORT.
This ensures synchronization of checkpoints and rollbacks across both
IMS and DB2.
Under this control, SQL COMMITs and SQL ROLLBACKs are not permitted.
To do this, change your execution JCL to execute Module DSNMTV01
instead of EZTPA00 or your linked application program. DSNMTV01 then
loads the real program.
The following is sample JCL:
//EZIMSDB2 EXEC PGM=DFSRRC00,
// PARM='DLI,DSNMTV01,PSBNAME,,,,,,,,,,O,N,N,'
//STEPLIB DD DSN=IMSVS.RESLIB,DISP=SHR
// DD DSN=IMSVS.PGMLIB,DISP=SHR
// DD DSN=your.ibm.db2.sspgm.library,DISP=SHR
// DD DSN=your.eztp.loadlib,DISP=SHR
// DD DSN=your.pansql.loadlib,DISP=SHR
//IMS DD DSN=IMSVS.PSBLIB,DISP=SHR
// DD DSN=IMSVS.DRDLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//EZTVFM DD UNIT=SYSDA,SPACE=(4096,(100,100))
//DDOTV02 DD DSN=&&TEMP,DISP=(NEW,PASS),SPACE=(TRK,(5,5),
UNIT=SYSDA,DCB=(RECFM=VB,LRECL=4092,BLKSIZE=4096)
//DDITV02 DD *
SSN,LIT,ESMT,RTT,ERR,CRC,CONNECTION_NAME,PLAN,PROG
/*
//SYSIN DD *
CA-Easytrieve/Plus statements follow
.
.
.
/*
//
Note: Under the control of DB2 or DLI batch support, your STEPLIB
must define the IMS RESLIB before the DB2 library.
The DDITV02 DD defines the following parameters:
───────────────────────────────────────────────────
Parameter Description
───────────────────────────────────────────────────
SSN DB2 subsystem
───────────────────────────────────────────────────
LIT Language Interface token value
───────────────────────────────────────────────────
ESMT Initialization module name, must
be DSNMIN10
───────────────────────────────────────────────────
RTT Resource Translation Table
───────────────────────────────────────────────────
ERR Region Error Option
───────────────────────────────────────────────────
CRC Command Recognition Character
───────────────────────────────────────────────────
CONNECTION_NAME A unique one-to eight-character
name
───────────────────────────────────────────────────
PLAN DB2 plan name
───────────────────────────────────────────────────
PROG Application program name to
execute-either EZTPA00 or linked
program name.
───────────────────────────────────────────────────
Refer to your IBM DB2 guides for a detailed explanation of these
parameters.
|
Thanks,
Karun. |
|