IBM Mainframe Forum

Viswanathchandru wrote:Dear all,

I'm trying to get the date on which it was created. I tried initially with a flat file and I was able to get it. But i'm not able to get the date of creation for a GDG. Are there any specific keyword to display the date of creation for GDG? Below is the code i tried. Please let me know if i need to give any more information on this. Apologize if i or my thoughts are wrong!

Select all

 ***************************** Top of Data **************************
 /*REXX*/                                                           
 TRACE ?R                                                           
 DSN = "SYSK.KOL.xxxxxx"                             
 ADDRESS ISPEXEC                                                     
 "LMDINIT LISTID(TMPID) LEVEL("DSN")"                               
 "LMDLIST LISTID("TMPID") OPTION(LIST) DATASET(DSVAR) STATS(YES)"   
 SAY ZDLCDATE                                                       

Here

Select all

SYSK.KOL.xxxxxx

is a GDG. Please advice.
Regards,
Viswa

Viswanathchandru wrote:hello akatsukami,

here is the trace output. where u can find the quotes alone without the dates.

Select all

  4 *-* ADDRESS ISPEXEC                                                     
                                                                           
  5 *-* "LMDINIT LISTID(TMPID) LEVEL("DSN")"                               
    >>>   "LMDINIT LISTID(TMPID) LEVEL(SYSK.KOL.xxxxxx.DAILY.G0002V00)"   
                                                                           
  6 *-* "LMDLIST LISTID("TMPID") OPTION(LIST) DATASET(DSVAR) STATS(YES)"   
    >>>   "LMDLIST LISTID(ISR00002) OPTION(LIST) DATASET(DSVAR) STATS(YES)"
                                                                           
  7 *-* SAY ZDLCDATE                                                       
    >>>   "          "                                                     

Regards,
V

• From the label for the dataset on the tape. This most likely cannot be done in TSO. A batch job would require a very specialized program to access the tape label.
• From the records of the tape manager at your site.

These users thanked the author steve-myers for the post:

Viswanathchandru (Fri May 11, 2012 3:02 am)

Viswanathchandru wrote:Hello steve,
Is that possible to do a listcat ent to get the creation date through rexx?

Regards,
Viswa

These users thanked the author steve-myers for the post:

Viswanathchandru (Fri May 11, 2012 3:13 am)