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
 

 

help on the usage of VGET

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Tue Mar 27, 2012 6:19 pm    Post subject: help on the usage of VGET
Reply with quote

I copied and executed IBM provided sample REXX-DB2 program, but error occurred at below point,
Code:
SSID = "" /* Default */         
"VGET (DSNEOV01)"               
If RC = 0 Then SSID = DSNEOV01 


I tried to search for the usage of VGET, but no satisfactory result.

can you please help me on where I should look for the usage of VGET?

how can I assign the default DB2 subsystem ID to REXX program?
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Mar 27, 2012 6:33 pm    Post subject:
Reply with quote

this is the ispf services manual where you will find VGET

the dsid for the db2 subsystem,
either hard code or have it read an appropriate parm like you would for a systin for the DSN parm of an IKJEFT.. step.

you, of course, need to know the db2 dsids of your own system.
Back to top
View user's profile Send private message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Wed Mar 28, 2012 6:51 am    Post subject:
Reply with quote

THANKS, DICK!
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 647
Location: Whitby, ON, Canada

PostPosted: Wed Mar 28, 2012 5:50 pm    Post subject:
Reply with quote

FYI: DSNEOV01 is the variable used by DB2I to store the DB2 ssid. To access this value, your ISPF application has to run under the same APPLID as DB2I. Our shop uses NEWAPPL(DBMS), but that can vary.
Back to top
View user's profile Send private message
dejunzhu

Active User


Joined: 08 May 2008
Posts: 390
Location: China

PostPosted: Fri Apr 06, 2012 3:07 pm    Post subject:
Reply with quote

don.leahy wrote:
FYI: DSNEOV01 is the variable used by DB2I to store the DB2 ssid. To access this value, your ISPF application has to run under the same APPLID as DB2I. Our shop uses NEWAPPL(DBMS), but that can vary.

Thanks for your information.
but what if I want to retrieve SSID into general REXX program?
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


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

PostPosted: Fri Apr 06, 2012 3:22 pm    Post subject:
Reply with quote

dejunzhu wrote:
don.leahy wrote:
FYI: DSNEOV01 is the variable used by DB2I to store the DB2 ssid. To access this value, your ISPF application has to run under the same APPLID as DB2I. Our shop uses NEWAPPL(DBMS), but that can vary.

Thanks for your information.
but what if I want to retrieve SSID into general REXX program?

VGET draws from one of two profile pools -- the application pool or the shared pool. If the variable is in the pool of a different application, you can't get it.

You can write an external function that VGETs a variable and pushes it onto a stack, and start it as a different application using the NEWAPPL parameter of the SELECT service. Note that you will still need error checking to handle the situation where the variable doesn't exist.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How can amount of the Storage Usage b... esduman61 CICS 6 Wed Mar 09, 2016 1:19 pm
No new posts Controlling usage of resources by tasks raja1128 CICS 3 Fri Nov 06, 2015 9:53 am
No new posts TDQ & its usage as ATI akodakka CICS 3 Sat Oct 17, 2015 6:04 pm
No new posts XPED - When command usage anand1204 Compuware & Other Tools 3 Tue Sep 15, 2015 12:50 am
No new posts Usage of NETRC for FTP step in JCL Vineetha_123 JCL & VSAM 3 Fri Jul 17, 2015 3:24 pm


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