IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

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: 1789
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 All times are GMT + 6 Hours
Forum Index -> IMS DB/DC
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts JCL for replacing code in Cobol JCL & VSAM 8
No new posts can someone please help me in finding... IBM Tools 9
No new posts SYNCSORT Error - CONTROL FIELD BEYOND... SYNCSORT 10
No new posts Easytrieve EZABX007 with error code 0... CA Products 7
No new posts SARBCH REPORT DD writing error CA Products 1

Back to Top