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

IMS error U4038 while executing my PL/I code


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Thu Feb 08, 2018 1:05 pm
Reply with quote

Hi All,

In my PL/I code, I am accessing IMS database and it fails in the first GU call. This program is a production module and I am trying to execute it in test region. Below is the message I get when GU call is performed,

UNABLE TO OPEN DATA SET WITH DDNAME IL010030 FOR REASON 0,BC

I could see PL\I ONCODE 9 for my program.

Could anyone kindly let me know how can I resolve this. what does this REASON 0,BC signify?

Note: I have copied dataset (IL010030) from production and used for my testing.

Kindly assist.
Back to top
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Thu Feb 08, 2018 2:24 pm
Reply with quote

Additional info:

Below is the jcl used to execute,
Code:

000001 //A04124TV JOB (0000),                                                 
 000002 //       'UPDATE VEH ORDER',                                           
 000003 //        CLASS=4,                                                     
 000004 //        MSGCLASS=A,                                                   
 000005 //        MSGLEVEL=(1,1),                                               
 000006 //        RESTART=*,                                                   
 000007 //        COND=(9,LT),NOTIFY=&SYSUID                                   
 000008 //JOBLIB  DD DISP=SHR,DSN=SYS1VR.ENDEVOR.DEV.LOADLIB                   
 000009 //        DD DISP=SHR,DSN=SYS1VR.ENDEVOR.COMMON.EMER.LOADLIB           
 000010 //        DD DISP=SHR,DSN=SYS1VR.ENDEVOR.COMMON.PROD.LOADLIB           
 000011 //        DD DISP=SHR,DSN=SYS1.UTLIB                                   
 000012 //JS010   EXEC TST1BTCH,MBR=PASB512,PSB=VEHS512                         
 000013 //IN01     DD DSN=TPAS.DL0511A.DAY.T25,                                 
 000014 //           DISP=(SHR,KEEP,KEEP)                                       
 000015 //IN02     DD  DSN=TISM.PCP.CNTL(PASNGDAY),DISP=SHR                     
 000016 //IL010010     DD DSN=A04124T.TPAS.BL010010.VEORINDX.G6538C,           
 000017 //           DISP=(OLD,KEEP,KEEP)                                       
 000018 //IL010030     DD DSN=A04124T.TPAS.BL010020.VEHORDER.G6538C,           
 000019 //           DISP=(OLD,KEEP,KEEP)                                       
 000020 //STEPFF  EXEC STEPFF           



The ddnames IL010010 AND IL010030 are the index and data components. These are copied from prod tape files to local dasd files.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Thu Feb 08, 2018 11:56 pm
Reply with quote

As the answers would have been evident had you conducted the most cursory of research, I will merely tell you to RTFM.
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 -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts problem in select max when executing ... IMS DB/DC 6
No new posts How to convert RESP code 12 to text? CICS 9
No new posts Secondary index error while loading d... IMS DB/DC 2
No new posts Execute step regardless of previous s... JCL & VSAM 2
No new posts Error 0C1 Reason Code 1 with branch i... PL/I & Assembler 3
Search our Forums:

Back to Top