saithvis2
New User
Joined: 23 Dec 2005 Posts: 61 Location: Providence , US
|
|
|
|
Hi Guys
I am running a DB2 Program in the IMS environment. The sample JCL is attached
Code: |
//LCJ31803 EXEC PGM=&IKJEFT1,DYNAMNBR=20,
// PARM='%OPA269 DB2(&SYSTEM) PGM(&CLP522) PLAN(&CLP522)',
// ACCT='FILL DB2 CARD',
// COND=((03,LT,LCJ31801),(03,GT,LCJ31802))
//SYSTSPRT DD SYSOUT=&PRTU
//SYSPROC DD DSN=SYS2.CTLCDS,DISP=SHR
//CARDOUT DD DSN=&INDB2,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,1),
// DCB=(LRECL=80,BLKSIZE=800,RECFM=FB)
//SYSTSIN DD DUMMY
//SYSUDUMP DD SYSOUT=&PRTU
//LCJ31804 EXEC PGM=&DFSRRC0,TIME=&P522TIM,
// ACCT='MTS EXTRACT ADV TERM',
// PARM='DLI,DSNMTV01,&PSB,,,,,,&CLP522M',
// COND=((04,LT,LCJ31801),(04,GT,LCJ31802))
//STEPLIB DD DSN=&RESLIB,DISP=SHR
// DD DSN=&CLP522A,DISP=SHR
// DD DSN=&CLP522S,DISP=SHR
// DD DSN=&CLP522L,DISP=SHR
// DD DSN=&LINKLB2,DISP=SHR
//DFSRESLB DD DSN=&RESLIB,DISP=SHR
//DFSVSAMP DD DSN=&CLP522V,DISP=SHR
//IMS DD DSN=&TDBDLIB,DISP=SHR
// DD DSN=&DBDLIB,DISP=SHR
// DD DSN=&TPSBLIB,DISP=SHR
// DD DSN=&PSBLIB,DISP=SHR
//DDITV02 DD DSN=&INDB2,DISP=&ODK
//DDOTV02 DD DSN=&OUTDB2,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1),RLSE),
|
The DB2 card is being built in Step 3 of the Proc. The 4th step is responsible for executing it in the DB2 environment. I have given the relevant DB2 libraries in this step. I also matched the CONTOKEN on the package with that on the DBRM. They are in sync. I am pasting the SQL error message
Code: |
* CRITICAL DB2 ERROR DETECTED *
* DB2 SQLCODE = 927-
* DB2 FUNCTION = CLAIMCSR OPEN ERROR
* FORMATTED DB2 ERROR MESSAGE:
* DSNT408I SQLCODE = -927, ERROR: THE LANGUAGE INTERFACE (LI) WAS CALLED WHEN
* THE CONNECTING ENVIRONMENT WAS NOT ESTABLISHED. THE PROGRAM SHOULD BE
* INVOKED UNDER THE DSN COMMAND
* DSNT418I SQLSTATE = 51006 SQLSTATE RETURN CODE
* DSNT415I SQLERRP = DSNELI SQL PROCEDURE DETECTING ERROR
|
To me it seems that it is able to establish the connection to DB2 but failing while it trying to open the cursor as evident from the message "DB2 Function". Can someone tell me how I can rectify this error ?
Thanks in advance |
|