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: 1226
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
No new posts Unable to catalog a gdg dataset resid... Shovan JCL & VSAM 7 Fri Mar 24, 2017 2:24 pm
No new posts Want to pull the job log into a Mainf... Jishu Mukherjee Compuware & Other Tools 9 Tue Mar 21, 2017 4:48 pm
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Overriding PS data in rexx Shaheen Shaik CLIST & REXX 8 Fri Mar 03, 2017 5:08 pm
No new posts JCL to get submitted once dataset has... vinu78 JCL & VSAM 17 Thu Feb 16, 2017 7:32 am


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