Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to solve this compiler error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
diwakar_rao

New User


Joined: 04 Mar 2007
Posts: 14
Location: Chennai

PostPosted: Mon Apr 07, 2008 11:26 pm    Post subject: How to solve this compiler error
Reply with quote

I am getting compile error while i prepare the jcl attached below for compile jcl for Cobol Db2 Pg. Kindly help me out in sorting this issue


1)PRECOMPILE , COMPILE JCL
==================================



Code:
//Z000064C  JOB 002,CLASS=E,MSGCLASS=D,REGION=0M,NOTIFY=&SYSUID     
//*********************************************************         
//*       DB2 PRECOMPILE                                           
//*********************************************************         
//DB2PC   EXEC PGM=DSNHPC,REGION=0M,                               
//       PARM='HOST(IBMCOB),XREF,SOURCE,FLAG(I),APOST,APOSTSQL'     
//STEPLIB  DD  DISP=SHR,DSN=DEV.SMTW.LOAD.PGM                       
//SYSLIB   DD  DISP=SHR,DSN=DEV.SMTW.SOURCE.SQL                     
//DBRMLIB  DD  DSN=DEV.SMTW.SOURCE.DBRM(CHDB2PG1),DISP=SHR         
//SYSCIN   DD  DSN=&&DSNHOUT,DISP=(NEW,PASS),UNIT=SYSDA,           
//             SPACE=(800,(500,500))                               
//SYSPRINT DD  SYSOUT=*                                             
//SYSTERM  DD  SYSOUT=*                                             
//SYSUDUMP DD  SYSOUT=*                                             
//SYSUT1   DD  SPACE=(800,(500,500),,,ROUND),UNIT=SYSDA             
//SYSUT2   DD  SPACE=(800,(500,500),,,ROUND),UNIT=SYSDA             
//SYSIN    DD  DISP=SHR,DSN=DEV.SMTW.SOURCE.COB(CHDB2PG1)           
//***********************************************************       
//**                       COMPILE                         **
//***********************************************************
//COMPILE  EXEC PGM=IGYCRCTL,                                 
//  PARM='LIB,XREF,SOURCE,TRUNC(BIN),DATA(24),               
//              LIST,OBJECT,SQL'                             
//*                                                           
//STEPLIB  DD DSN=IGY.SIGYCOMP,DISP=SHR                       
//*                                                           
//SYSTERM  DD  SYSOUT=*                                       
//SYSUDUMP  DD SYSOUT=*                                       
//SYSPRINT  DD SYSOUT=*                                       
//*                                                           
//SYSLIB    DD DSN=DEV.SMTW.SOURCE.DBRM,DISP=SHR             
//          DD DSN=DEV.SMTW.SOURCE.SQL,DISP=SHR               
//SYSIN     DD DSN=&&DSNHOUT,                                 
//             DISP=(OLD,DELETE,DELETE)                       
//SYSUT1    DD UNIT=SYSDA,SPACE=(CYL,(2,2))                   
//SYSUT2    DD UNIT=SYSDA,SPACE=(CYL,(2,2))                   
//SYSUT3    DD UNIT=SYSDA,SPACE=(CYL,(2,2))                   
//SYSUT4    DD UNIT=SYSDA,SPACE=(CYL,(2,2))     
//SYSUT5    DD UNIT=SYSDA,SPACE=(CYL,(2,2))     
//SYSUT6    DD UNIT=SYSDA,SPACE=(CYL,(2,2))     
//SYSUT7    DD UNIT=SYSDA,SPACE=(CYL,(2,2))     
//SYSLIN     DD  DSN=&&OBJECT,                   
//           DISP=(NEW,PASS,DELETE),             
//           UNIT=SYSDA,                         
//           SPACE=(CYL,(1,1)),                 
//           DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
/*                                               



In COMPILE step it shows the following error

IGYDS0211-U DSNH006I FILE "DBRMLIB " COULD NOT BE OPENED

===========================================================================================

2) PRECOMPILE , COMPILE , BIND , LINKEDIT
===============================================


Code:
//Z000064C  JOB 002,CLASS=E,MSGCLASS=D,REGION=0M,NOTIFY=&SYSUID
//*********************************************************     
//*       DB2 PRECOMPILE                                       
//*********************************************************     
//DB2PC   EXEC PGM=DSNHPC,REGION=0M,                           
//       PARM='HOST(IBMCOB),XREF,SOURCE,FLAG(I),APOST,APOSTSQL'
//STEPLIB  DD  DISP=SHR,DSN=DEV.SMTW.LOAD.PGM                   
//SYSLIB   DD  DISP=SHR,DSN=DEV.SMTW.SOURCE.SQL                 
//DBRMLIB  DD  DSN=DEV.SMTW.SOURCE.DBRM(CHDB2PG1),DISP=SHR     
//SYSCIN   DD  DSN=&&DSNHOUT,DISP=(NEW,PASS),UNIT=SYSDA,       
//             SPACE=(800,(500,500))                           
//SYSPRINT DD  SYSOUT=*                                         
//SYSTERM  DD  SYSOUT=*                                         
//SYSUDUMP DD  SYSOUT=*                                         
//SYSUT1   DD  SPACE=(800,(500,500),,,ROUND),UNIT=SYSDA         
//SYSUT2   DD  SPACE=(800,(500,500),,,ROUND),UNIT=SYSDA         
//SYSIN    DD  DISP=SHR,DSN=DEV.SMTW.SOURCE.COB(CHDB2PG1)       
//***********************************************************   
//**                       COMPILE                         **   
//***********************************************************   
//COMPILE  EXEC IGYWCL,                                         
//   PARM.COBOL='LIB,XREF,SOURCE,TRUNC(BIN),DATA(24),           
//               LIST,OBJECT,SQL',                             
//   PARM.LKED='LIST,AMODE(24),RMODE=24,REUSE'                 
//COBOL.SYSIN    DD DSN=&&DSNHOUT,DISP=SHR                     
//SYSUT1   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT2   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT5   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT6   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//SYSUT7   DD UNIT=SYSDA,SPACE=(CYL,(10,20))                   
//LKED.SYSLIB    DD DSN=CEE.SCEELKED,DISP=SHR                   
//               DD DSN=DEV.SMTW.LOAD.PGM,DISP=SHR             
//LKED.SYSLMOD   DD DSN=&&OBJSET,UNIT=SYSDA,DCB=BLKSIZE=3200,   
//            SPACE=(CYL,(5,5),RLSE),DISP=(,PASS)               
//SYSPRINT DD SYSOUT=*                                         
//*********************************************************************
//***               BIND                                              *
//*********************************************************************
//BIND    EXEC PGM=IKJEFT01,DYNAMNBR=20                               
//DBRMLIB  DD  DISP=SHR,DSN=DEV.SMTW.SOURCE.DBRM(CHDB2PG1)             
//SYSPRINT DD  SYSOUT=*                                               
//SYSTSPRT DD  SYSOUT=*                                               
//SYSUDUMP DD  SYSOUT=*                                               
//SYSTSIN DD *                                                         
   DSN SYSTEM(DBOB)                                                   
   BIND PLAN(CHDB2PG1)     -                                           
        MEMBER(CHDB2PG1)    -                                         
        LIBRARY('DEV.SMTW.SOURCE.DBRM') -                             
        RELEASE(COMMIT) -                                             
        ACTION(REPLACE)    -                                           
        QUALIFIER(DSN8710) -                                           
        VALIDATE(BIND) -                                               
        ISOLATION(CS)                                                 
   END                                                                 
//********************************************************************
//**              LINKEDIT                                           *
//********************************************************************
//LKED   EXEC PGM=IEWL,                                               
//            COND=(4,LT)                                             
//SYSLIB   DD DSN=CEE.SCEELKED,DISP=SHR                               
//         DD DSN=DEV.SMTW.LOAD.PGM,DISP=SHR                         
//SYSLIN   DD DSN=&&OBJSET,DISP=(OLD,DELETE)                         
//SYSLMOD  DD DSN=DEV.SMTW.LOAD.PGM(CHDB2PG1),DISP=SHR               
//SYSPRINT DD SYSOUT=*                                               



In COMPILE step it shows the following error

IGYDS0211-U DSNH006I FILE "DBRMLIB " COULD NOT BE OPENED
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Apr 07, 2008 11:36 pm    Post subject:
Reply with quote

Does DSN=DEV.SMTW.SOURCE.DBRM(CHDB2PG1) exist?
Is it enqued?
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Mon Apr 07, 2008 11:49 pm    Post subject:
Reply with quote

DBRM lib in the compile step should have a DD name of DBRMLIB.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Error IEC161I 052(009,XXXRS00)-084 wh... amitc23 JCL & VSAM 10 Wed Oct 12, 2016 5:00 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us