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
 

 

Getting the dataset name from a DD name - REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
kalais

New User


Joined: 18 Apr 2006
Posts: 22

PostPosted: Tue Jun 20, 2006 6:06 pm    Post subject: Getting the dataset name from a DD name - REXX
Reply with quote

Hi,


How can i get a dataset name from a DD name in REXX program.

The DD name is defined in a PROC which executes the REXX program.

What REXX command/function can be used for this purpose?
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Tue Jun 20, 2006 6:22 pm    Post subject: Re: Getting the dataset name from a DD name - REXX
Reply with quote

LISTDSI.

I've given you this same answer in previous posts.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1224
Location: Israel

PostPosted: Wed Jun 21, 2006 7:07 pm    Post subject:
Reply with quote

Code:
DDNAME = 'myddname'
Ret = LISTDSI(DDNAME' FILE')

If Ret <> 0 Then Do
    SAY 'REASON....:'SYSREASON
    SAY 'MSGLVL1...:'SYSMSGLVL1
    SAY 'MSGLVL2...:'SYSMSGLVL2     
End; Else Do
    SAY 'DSNAME....:'SYSDSNAME     
    SAY 'VOLUME....:'SYSVOLUME     
    SAY 'UNIT......:'SYSUNIT       
    SAY 'DSORG.....:'SYSDSORG       
    SAY 'RECFM.....:'SYSRECFM       
    SAY 'LRECL.....:'SYSLRECL       
    SAY 'BLKSIZE...:'SYSBLKSIZE     
    SAY 'KEYLEN....:'SYSKEYLEN     
    SAY 'ALLOC.....:'SYSALLOC       
    SAY 'USED......:'SYSUSED       
    SAY 'USEDPAGES.:'SYSUSEDPAGES   
    SAY 'PRIMARY...:'SYSPRIMARY     
    SAY 'SECONDS...:'SYSSECONDS     
    SAY 'UNITS.....:'SYSUNITS       
    SAY 'EXTENTS...:'SYSEXTENTS     
    SAY 'CREATE....:'SYSCREATE     
    SAY 'REFDATE...:'SYSREFDATE     
    SAY 'EXDATE....:'SYSEXDATE
    SAY 'PASSWORD..:'SYSPASSWORD
    SAY 'RACFA.....:'SYSRACFA   
    SAY 'UPDATED...:'SYSUPDATED
    SAY 'TRKSCYL...:'SYSTRKSCYL
    SAY 'BLKSTRK...:'SYSBLKSTRK
    SAY 'ADIRBLK...:'SYSADIRBLK
    SAY 'UDIRBLK...:'SYSUDIRBLK
    SAY 'MEMBERS...:'SYSMEMBERS
    SAY 'DSSMS.....:'SYSDSSMS   
End
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 -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts REXX DB2: Dynamic allocation of DB2.D... BHAS CLIST & REXX 3 Mon Dec 19, 2016 8:26 pm
No new posts find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm
No new posts FTP - JCL failed while passing FTP co... Suneetha1612 JCL & VSAM 12 Wed Nov 16, 2016 7:33 pm


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