IBM MAINFRAME HELP FORUMS for COBOL, JCL, CICS, DB2, IMS etc...
Help & Support Forums for IBM Mainframe computers Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7, CA-11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, VSAM, ISPF, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
 

how to set the dbname run time

THIS IS AN ARCHIVE FORUM: CLICK HERE TO GO TO THE ORIGINAL TOPIC

 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> IDMS/ADSO
View previous topic :: View next topic  
Author Message
nirmal.poikaikumaran



Joined: 29 Nov 2005
Posts: 50
Location: Bangalore

Posted: Wed Apr 09, 2008 2:50 pm    Post subject: how to set the dbname run time  

Hi,

My application has many DBnames like

1)forecast
2)inventry
3)distribu

but all the 3 db access the same MAPS/DIALOGS .... its set using a CList command

CLIST FORECAST.... while doing this ... I directly get into Common Map with this db enabled.

Like wise it happens for the other 2 tooo.


Query,

Is there any way that I can switch the DBNAME ... runtime?

for instance

1If i have enabled Forecast dbname and in one of the option I want to go to Inventory Database.... how can it be achieved?

Plz help

Thanks
Back to top  
tgortner



Joined: 02 Jun 2006
Posts: 3

Posted: Thu Apr 10, 2008 12:49 am    Post subject:  

I hope I understand your question right. You would use DCUF SET DBNAME XXXXX at the CV prompt before executing the dialog. It will then be using that DB.
Back to top  
nirmal.poikaikumaran



Joined: 29 Nov 2005
Posts: 50
Location: Bangalore

Posted: Thu Apr 10, 2008 9:27 am    Post subject:  

Hey

The query is to do it in run time.... like i want to enable it via selecting some menu... not thru the national task code

DCUF SET DBNAME XXXXX... may be it shud be called via some kick offs......
Back to top  
tgortner



Joined: 02 Jun 2006
Posts: 3

Posted: Mon Apr 14, 2008 7:27 pm    Post subject:  

You can issue a DCUF command from inside a dialog by linking to RHDCUF00. See manual "Callable Services." You could then invoke a different DB by menu option.
Back to top  
nirmal.poikaikumaran



Joined: 29 Nov 2005
Posts: 50
Location: Bangalore

Posted: Wed Apr 23, 2008 2:29 pm    Post subject:  

Tim,

Thanks for the help. may i know which manual you are referrign to?

my code says

LINK PROG 'RHDCUF00' USING (RHDCUF00-INREC,
RHDCUF00-OUTREC).


Is this what you are referring? Please let me know how this works
Back to top  
tgortner



Joined: 02 Jun 2006
Posts: 3

Posted: Wed Apr 23, 2008 7:43 pm    Post subject:  

The manual I am referring to is called "Callable Services." Chapter 4 is titled "Invoking DCMT and DCUF Commands from Programs." Your code looks correct. I will attempt to attach the manual to this post.

Attachment Removed. The distriution of copyrighted material is both against the policy of this forum and is illegal.
Back to top  
 
       IBMMAINFRAMES.com - IBM Mainframe Support Forums Index -> IDMS/ADSO
Page 1 of 1
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
Related Links