Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Creation date of load module

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
antonrino.b

New User


Joined: 10 Jan 2006
Posts: 76
Location: Germany

PostPosted: Tue May 30, 2006 12:26 pm    Post subject: Creation date of load module
Reply with quote

Hi,

How to get the creation date of a load module?

Thanks,
Antu.
Back to top
View user's profile Send private message

hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Tue May 30, 2006 2:34 pm    Post subject: Re: Creation date of load module
Reply with quote

hi ,

u hav to make a bit of gusses.

i mean
open the loadlib in view mode
then try a find 'cc'
cc - it is the century year .

if u find any date in loadlib it got to be
creation Date .

Thanks ,
-Kapil .
Back to top
View user's profile Send private message
antonrino.b

New User


Joined: 10 Jan 2006
Posts: 76
Location: Germany

PostPosted: Tue May 30, 2006 3:10 pm    Post subject:
Reply with quote

Yeah hikaps14. Ofcourse, I can open the load module and search for a timestamp.

But I want to do that in batch mode and have to do that for all the members in a load lib.

So, I am in need of a service which would get the creation date of a load module.

I too did a bit of research. Let me list my findings..

1) I think that the load module created is dependent of the compiler. Hence the location of timestamp might vary.

2) And also, I observed that some of the load modules had timestamp in the form of yyyymmddhhmmssnnnnnn. and some other had yy/mm/dd hh:mm:ss:nnnn..

3) I tried using a pattern search in the load module using
f p"##########" to get all the occurences of tendigit numerals, so that I would end up in some timestamp. What I observed was, the load module had lot of timestamps (all those of called modules). But, The first occurence was the creation date.

4) Let me tell you another interesting thing. I found that the timestamp appeared next to the second occurence of the corresponding loadname. But some load modules were exceptions to this.
Back to top
View user's profile Send private message
shreevamsi

Active User


Joined: 23 Feb 2006
Posts: 305
Location: Hyderabad,India

PostPosted: Tue May 30, 2006 4:04 pm    Post subject: JCL TO FIND THE DATE OF CREATION OF A LOAD MODULE
Reply with quote

HI.
THIS JCL PRINTS THE DAY OF CREATION OF THE LOAD MODULE

//STEP010 EXEC PGM=AMBLIST
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//LOADLB DD DSN=MY.LOADLIB.DIR,DISP=SHR
//SYSIN DD *
LISTIDR DDN=LOADLB,MEMBER=xxxxxx
//* Other options:

HOPE THIS WILL HELP YOU THRU

~Vamsi Krishna Ramaraju
Back to top
View user's profile Send private message
antonrino.b

New User


Joined: 10 Jan 2006
Posts: 76
Location: Germany

PostPosted: Tue May 30, 2006 5:02 pm    Post subject:
Reply with quote

Hey, Thanks Vamsi..

It gives the creation date.

But the timestamp which AMBLIST service gives as output differs with that in the load module by some seconds.
Back to top
View user's profile Send private message
antonrino.b

New User


Joined: 10 Jan 2006
Posts: 76
Location: Germany

PostPosted: Tue May 30, 2006 5:51 pm    Post subject:
Reply with quote

I have only one option left with, to get the creation date.

I will use the AMBLIST service to get the creation date of the load module. and extract only the year, month, date, hour, minutes part from that and form a string of integers and search for that in the corresponding loadlib.

And, I should also take care of the situation where timestamp being embedded in the load module as yy/mm/dd hh:mm:ss...

Thanks vamsi and kapil..

Please let me know if you come across any another easier(direct) method than this.
Back to top
View user's profile Send private message
antonrino.b

New User


Joined: 10 Jan 2006
Posts: 76
Location: Germany

PostPosted: Wed May 31, 2006 11:30 am    Post subject:
Reply with quote

Hi,

I tried to use the above service using REXX. But it is abending. I couldnt find where did I go wrong. Can someone help me?

I have saved the instreamdata in the sequential dataset anton.sysin.data.

This is the REXX routine I used:

Code:
/* REXX  */

loaddsn = 'anton.sample.load'
indata = 'anton.sysin.data'                                                           
amblist_dsn='anton.amblist.output'           

"alloc file(sysprint) da('"amblist_dsn"') shr reuse"
"alloc file(loadlb) da('"loaddsn"') shr reuse"       
"alloc file(sysin) da('"indata"') shr reuse"         
"ispexec select pgm(amblist)"     
 
"free file(sysprint)"                               
"free file(loadlb)"                                 
"free file(sysin)"                                   


I am getting the following abend message:

Code:
IRX0250E System abend code 013, reason code 00000096.                     
IRX0255E Abend in host command ispexec or address environment routine TSO.


Thanks,
Antu
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Thu Jun 01, 2006 6:59 am    Post subject:
Reply with quote

Hi Antu,

Just a few comments on what you're trying to do. You may have already thought of this, but here goes anyway:

The loads that you're scanning may be using functions to get a timestamp for other reasons. There's also a "when compiled" function in COBOL. These may account for the multiple timestamps (t/s) you encounter.

If I'm not mistaken, the "create date" is really the "last compile date". Is that what you're looking for?
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Fetching data from JHS as per the cur... arunsoods All Other Mainframe Topics 4 Wed Nov 22, 2017 1:54 pm
No new posts Date in where clause - Windows Karthikeyan Subbarayan DB2 9 Wed Nov 15, 2017 9:07 pm
No new posts Table(Unicode(Graphic) table) loading... muralikrishnan_new DB2 0 Thu Oct 05, 2017 5:10 pm
No new posts Compare yesterday's date to the one o... migusd SYNCSORT 11 Fri Sep 22, 2017 11:35 pm
No new posts Validate the Date girishb2 DFSORT/ICETOOL 9 Tue Sep 19, 2017 1:12 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us