MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Listds

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
danm
Intermediate


Joined: 29 Jun 2004
Posts: 170
Topics: 73

PostPosted: Thu Sep 16, 2004 1:59 pm    Post subject: Listds Reply with quote

After allocated dataset REXX.EXEC to SYSEXEC
Code:

TSO LISTDS REXX.EXEC STATUS   returns:
  USER.REXX.EXEC
  --RECFM-LRECL-BLKSIZE-DSORG--DDNAME---DISP
    FB    80    27920   PO     SYSEXEC  KEEP
  --VOLUMES--
     USER57

I then edit a member in the REXX.EXEC. When I issued
Code:

TSO LISTDS REXX.EXEC STATUS   returns:
  USER.REXX.EXEC
  --RECFM-LRECL-BLKSIZE-DSORG--DDNAME---DISP
    FB    80    27920   PO     ISP14213 KEEP,KEEP
  --VOLUMES--
     USER57

How can I have listds returns DDName "SYSEXEC" instead? "TSO LISTALC" listed both DDNAME "SYSEXEC" and "ISP14213". I don't want to use LISTALC since I do not want to see all the allocated dataset.

If I have allocated 3 datasets to a DDNAME. REXX function listdsi only shows the 1st dataset in the SYSDSNAME variable. Is there a way to get all 3 datasets without using the TSO LISTALC command?
Back to top
View user's profile Send private message
sriramla
Beginner


Joined: 22 Feb 2003
Posts: 74
Topics: 1

PostPosted: Thu Sep 16, 2004 2:24 pm    Post subject: Reply with quote

You can use TSO ISRDDN to see the DD Names & associalted dataset(s). I don't know whether you can use ISRDDN inside a program to process the results further.
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Thu Sep 16, 2004 5:35 pm    Post subject: Reply with quote

You can search the internal control blocks yourself in Rexx if you want to. Then you don't need any external programs. I'm not going to (re)write the code for you here, but it should be relatively straight forward to distill it from this previous post. Just lift the logic that scans the TIOT.
Back to top
View user's profile Send private message Visit poster's website
danm
Intermediate


Joined: 29 Jun 2004
Posts: 170
Topics: 73

PostPosted: Mon Sep 20, 2004 1:54 pm    Post subject: Reply with quote

Semigeezer,
The TIOT logic works fine. Thanks.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group