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
 

 

GDG version creation date

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
niveditamukherjee1602

New User


Joined: 08 Mar 2010
Posts: 5
Location: Kolkata

PostPosted: Mon Mar 08, 2010 12:36 pm    Post subject: GDG version creation date
Reply with quote

HI!!!

Need few helps regarding REXX as I am just new to this.

1. I wish to know the creation date of a GDG version and check whether
it is same with the input date
2. The number of GDG versions present.
Back to top
View user's profile Send private message

Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Mon Mar 08, 2010 1:04 pm    Post subject:
Reply with quote

Hi,

This link might help you.
http://www.ibmmainframes.com/about16234.html

Or

LISTDSI and with SYSCREATE
Back to top
View user's profile Send private message
niveditamukherjee1602

New User


Joined: 08 Mar 2010
Posts: 5
Location: Kolkata

PostPosted: Mon Mar 08, 2010 2:50 pm    Post subject: Reply to: GDG version creation date
Reply with quote

Thanks a lOT!!!

But it would be a gr8 help if you elaborate it a bit to me. I am just a novice in this matter.

Thanks again,
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Mon Mar 08, 2010 3:12 pm    Post subject: Re: Reply to: GDG version creation date
Reply with quote

niveditamukherjee1602 wrote:
Thanks a lOT!!!

But it would be a gr8 help if you elaborate it a bit to me. I am just a novice in this matter.

Thanks again,

Below code snippet will give you generation creation date
Code:

lvl="MY.GDG.BASE.BKP(0)"                                       
"ISPEXEC LMDINIT LISTID(TMPID) LEVEL("LVL")"                           
I=0                                                                     
Do Forever                                                             
"ISPEXEC LMDLIST LISTID("TMPID") OPTION(LIST) DATASET(DSVAR) STATS(YES)"
   If rc = 0 Then DO                                                   
   SAY ZDLCDATE                                                         
   END                                                                 
   Else Leave                                                           
End                                                                     
"ISPEXEC LMDLIST LISTID("TMPID") OPTION(FREE)"                         
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Mon Mar 08, 2010 3:13 pm    Post subject:
Reply with quote

Hi,
Quote:
GDG version

You meant GDG generation here?. Please use correct terminlogy while referring GDG stuffs. Generations and Versions are valid terms with GDG.

LMDLIST is explained here (and in above mentioned thread too). LMDLIST - List Data Sets

This is using LISTDSI.
Code:
DS_NAME="'DS_NAME'"             
dsinfo=LISTDSI(DS_NAME)                           
IF  DSINFO == 0 THEN                                                                                 
  SAY 'Data Set Created :' SYSCREATE       
ELSE                         
DO                           
  SAY DSINFO                 
  SAY 'Data Set Is Not Found!' 
END


Please refer the REXX User Guide & Language Reference by clicking "IBM Manuals" link on top of the page if you need any clarification.
Back to top
View user's profile Send private message
niveditamukherjee1602

New User


Joined: 08 Mar 2010
Posts: 5
Location: Kolkata

PostPosted: Tue Mar 09, 2010 11:24 am    Post subject:
Reply with quote

I am really sorry for my mistake...I asked for version creation date.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Mar 09, 2010 11:29 am    Post subject:
Reply with quote

Hello,
Quote:
I am really sorry for my mistake...I asked for version creation date.
From your reply it is not clear if there is still a question. . . icon_confused.gif

Just so we are all in sync - there is no date recorded that is the "version creation date".
Back to top
View user's profile Send private message
niveditamukherjee1602

New User


Joined: 08 Mar 2010
Posts: 5
Location: Kolkata

PostPosted: Tue Mar 09, 2010 11:34 am    Post subject:
Reply with quote

What i wish to do through rexx is to view the same date that we see whener we do a "cd" command beside any GDG version.

That was my question.
I hope i am a bit clear in explaining my query........Thanks...Regards
Back to top
View user's profile Send private message
Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 785
Location: Chennai, India

PostPosted: Tue Mar 09, 2010 11:38 am    Post subject:
Reply with quote

Quote:
cd" command beside any GDG version

Perhaps specific to your site? What date would you get with that command? The GDG Generation creation date???
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Tue Mar 09, 2010 11:39 am    Post subject:
Reply with quote

Quote:
we see whener we do a "cd" command beside any GDG version.

You are stil not on track..

And CD looks your inhouse command..
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Mar 09, 2010 11:40 am    Post subject:
Reply with quote

Hello,

Quote:
view the same date that we see whener we do a "cd" command beside any GDG version
Sounds like something site-specific. From which screen/list is the "cd" entered?
Back to top
View user's profile Send private message
niveditamukherjee1602

New User


Joined: 08 Mar 2010
Posts: 5
Location: Kolkata

PostPosted: Fri Mar 12, 2010 1:24 pm    Post subject:
Reply with quote

Sorry a little change in preveous query...

I am getting the creation date using SYSCREATE command as an e.g->

LVL ="'XXXXXXX.XX.XXXXXX.XXX.G0005V00'"
I = LISTDSI(LVL)
SAY I
IF I == 0 THEN DO
DAT= SYSCREATE
SAY DAT
END


if I wish to make it dynamic say,I am creating my DSN like,
DSN1='XXXXXXX.XXXXX.XXXXXXX.XXXXX'||'.'||'G'||DIFF||'V00'

Then how to know the creation date
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Fri Mar 12, 2010 8:24 pm    Post subject: Reply to: GDG version creation date
Reply with quote

Code:
DSN1='XXXXXXX.XXXXX.XXXXXXX.XXXXX'||'.'||'G'||DIFF||'V00'
LVL = DSN1
I = LISTDSI(LVL)
/* followed by rest of your code */
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 TOT & DATE parameter in ICEMAN hemanthj642 DFSORT/ICETOOL 4 Mon Nov 14, 2016 5:19 am
No new posts COBOL Version 6.1 Virendra Shambharkar COBOL Programming 5 Tue Nov 01, 2016 11:24 am
This topic is locked: you cannot edit posts or make replies. How to pass the previous month date i... Suganya87 DFSORT/ICETOOL 5 Mon Oct 31, 2016 4:13 pm
This topic is locked: you cannot edit posts or make replies. Get correct date and time when curren... balaji81_k DB2 24 Fri Oct 14, 2016 10:40 pm
No new posts Change date (DD/MM/YY) in 2nd record ... uday kiran DFSORT/ICETOOL 12 Wed Sep 07, 2016 10:57 pm


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