IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

SQLCODE Code -927


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
saithvis2

New User


Joined: 23 Dec 2005
Posts: 61
Location: Providence , US

PostPosted: Thu Jul 12, 2007 11:18 pm
Reply with quote

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
Back to top
View user's profile Send private message
sudip_ghanvat

New User


Joined: 05 Apr 2007
Posts: 15
Location: pune

PostPosted: Mon Jul 16, 2007 11:40 am
Reply with quote

What a -927 says is the a user has tried to execute an application program without establishing the proper execution environment.

In the IMS environment check that the application was link-edited with or is dynamically allocating the correct language interface module. The language interface modules required in each environment are as follows:

IMS: DFSLI000
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts VSAM return code 23 - for a Random read COBOL Programming 4
No new posts Monitoring production job progress. N... JCL & VSAM 4
Search our Forums:

Back to Top