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

Extract Member Name for a given DSN


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
chowdhrykapildev

New User


Joined: 05 Aug 2009
Posts: 44
Location: Hyderabad

PostPosted: Wed Sep 30, 2009 5:43 pm
Reply with quote

Hi All,

I am trying to invoke an ISPF panel after giving a line Command. The Panel which is invoked will have the dataset name at which this line command is given. But when the same line command is given in front of a member of a PDS it is able to capture only the PDS name but not member name.
I have used the following code for capturing the dataset and its member name.
code:
ADDRESS ISPEXEC VGET (ZDLDSN) SHARED
DSNAME = ZDLDSN
ADDRESS ISPEXEC VGET (ZLMEMBER) SHARED
MEMNAM = ZLMEMBER

ZDLDSN is working, but the ZLMEMBER is not working.
Can anyone of you suggest me how we can capture the member name.

attachment deleted - added link to the IBM zOS internet library
www-03.ibm.com/systems/z/os/zos/bkserv/index.html#other_pubs
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Sep 30, 2009 7:17 pm
Reply with quote

Please DO NOT post attachments as I for one can not open them, so am unable to help you.

Please take a few extra seconds to post plain text rather than attachments.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Wed Sep 30, 2009 7:36 pm
Reply with quote

Can you be more explicit about where you are issuing your command from? And how do you issue the command?
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Wed Sep 30, 2009 8:00 pm
Reply with quote

expat wrote:
Please DO NOT post attachments as I for one can not open them, so am unable to help you.

Please take a few extra seconds to post plain text rather than attachments.


And the bozo posts
Code:
Interactive System Productivity Facility (ISPF)
Reference Summary
OS/390 Version 2 Release 5.0
from March 1998, which is of course "© Copyright International Business Machines Corporation 1989, 1998. All rights reserved."
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Thu Oct 01, 2009 1:14 am
Reply with quote

Strange, your document does not list ZDLDSN .
Back to top
View user's profile Send private message
chowdhrykapildev

New User


Joined: 05 Aug 2009
Posts: 44
Location: Hyderabad

PostPosted: Thu Oct 01, 2009 6:10 pm
Reply with quote

Firstly I am sorry for posting the document. I wasn't aware of it.

As I already explained I am trying to give a command beside the PS/PDS member and my command should work something similar to "i" which is used to view the properties of PS/PDS

Code:
DSLIST - Data Sets Matching IN2779.TEMP
Command ===>                           
                                       
Command - Enter "/" to select action   
----------------------------------------
SEND     IN2779.TEMP.DATASET.CHANGES   
         IN2779.TEMP.FILE               
         IN2779.TEMP.FILEIN             


"IN2779.TEMP.DATASET.CHANGES" is a PS file
and as soon as I give this command a new panel will be invoked
Code:
           ********************************************               
           TOOL TO GET FILES FROM MAINFRAMES TO DESKTOP               
           ********************************************               
                                                                       
                                                                       
                                                                       
YOUR IP ADDRESS         :                                             
                                                                       
                                                                       
YOUR FILE NAME (PS/PDS) : IN2779.TEMP.DATASET.CHANGES                 
                                                                       
                                                                       
DESTINATION ON YOUR PC  : C:\DOCUMENTS AND SETTINGS\FTP\SUCCESS       
                                                                       
                                                                       
                                                                       
"DESKTOP/FTP" IS THE DEFAULT DESTINATION                               
KINDLY CHANGE IT IF YOU WANT IT TO ANOTHER LOACTION                   


Now in this screen if you give your system IP then the file will come and sit at the destination you specified.

Similar to above situation when the same command is given beside a member of a PDS, the member name is not getting captured. Instead only the PDS name is getting captured. I want a command to capture the member name.
Code:
BROWSE            IN2779.REXX.JCL                 
Command ===>                                     
           Name     Prompt       Size   Created   
SENT_____ LIST                     26  2009/04/30
_________ LJCL                     50  2009/08/08
_________ TEMP                                   
_________ ULJCL                    39  2009/08/08


After giving this line command the same screen is invoked but only with PDS name
Code:

YOUR IP ADDRESS         :                                             
                                                                       
                                                                       
YOUR FILE NAME (PS/PDS) : IN2779.REXX.JCL
                                                                     
                                                                       
DESTINATION ON YOUR PC  : C:\DOCUMENTS AND SETTINGS\FTP\SUCCESS       


Where as I need the following to appear on my screen.

Code:

YOUR IP ADDRESS         :                                             
                                                                       
                                                                       
YOUR FILE NAME (PS/PDS) : IN2779.REXX.JCL(LIST)
                                                                     
                                                                       
DESTINATION ON YOUR PC  : C:\DOCUMENTS AND SETTINGS\FTP\SUCCESS       


Hope my explanation gave some idea to you people on wat I am trying to do exactly.
I am attaching the document as a link for your reference. This document has most of the system variables that can be used.
ISPF reference Manual
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Thu Oct 01, 2009 9:34 pm
Reply with quote

1. SEND is a TSO command. I do not think you should use exec names with the same name as regular TSO commands.

2. You did not show us enough of your SEND exec. It is not clear how you get ZDLDSN. It was not a variable listed in your doc.


Try this:
Code:
/* rexx */               
Parse arg the_dsn         
say 'dsn='the_dsn         
Back to top
View user's profile Send private message
chowdhrykapildev

New User


Joined: 05 Aug 2009
Posts: 44
Location: Hyderabad

PostPosted: Wed Oct 07, 2009 3:54 pm
Reply with quote

Hi Pedro,

I do accept your suggestion of not using the standard names line "SEND".
I agree ZDLDSN is not there in the doc i have sent but i got it over google wen i was searching..
now I need a similar one to get the member name

please see the piece of code I am using..
Code:

/*REXX**/                                                               
ADDRESS ISPEXEC VGET (ZDLDSN) SHARED                                   
 DSNAME = ZDLDSN                                                       

 ADDRESS ISPEXEC "DISPLAY PANEL(SENDT)"                         
                                                               
            /* WSCON - CONNECT TO THE WSA */                   
 "ISPEXEC WSCON IP(IPADD) CODEPAGE(0037) CHARSET(0697) NOGUIDSP"
 

In the above code DSNAME is the name of the variable in the panel for displaying the DSN

Hope I am clear atleast now.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2546
Location: Silicon Valley

PostPosted: Wed Oct 07, 2009 7:18 pm
Reply with quote

Repeating earlier code snippet:
Code:
/* rexx */               
Parse arg the_dsn         
say 'dsn='the_dsn
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Need help for File Aid JCL to extract... Compuware & Other Tools 23
No new posts optim extract file - SAS DB2 2
No new posts How to copy the -1 version of a membe... TSO/ISPF 4
No new posts Searching for a member but don't know... TSO/ISPF 6
No new posts Looking For a PDS Member Without Open... PL/I & Assembler 10
Search our Forums:

Back to Top