IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Creation date of load module


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
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
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
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
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
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
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
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
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
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Replacing 'YYMMDD' with date, varying... SYNCSORT 3
No new posts Load new table with Old unload - DB2 DB2 6
No new posts Modifying Date Format Using DFSORT DFSORT/ICETOOL 9
No new posts How to load to DB2 with column level ... DB2 6
No new posts Need to convert date format DFSORT/ICETOOL 20
Search our Forums:

Back to Top