View previous topic :: View next topic
|
Author |
Message |
antonrino.b
New User
Joined: 10 Jan 2006 Posts: 76 Location: Germany
|
|
|
|
Hi,
How to get the creation date of a load module?
Thanks,
Antu. |
|
Back to top |
|
|
hikaps14
Active User
Joined: 02 Sep 2005 Posts: 189 Location: Noida
|
|
|
|
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 |
|
|
antonrino.b
New User
Joined: 10 Jan 2006 Posts: 76 Location: Germany
|
|
|
|
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 |
|
|
shreevamsi
Active User
Joined: 23 Feb 2006 Posts: 305 Location: Hyderabad,India
|
|
|
|
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 |
|
|
antonrino.b
New User
Joined: 10 Jan 2006 Posts: 76 Location: Germany
|
|
|
|
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 |
|
|
antonrino.b
New User
Joined: 10 Jan 2006 Posts: 76 Location: Germany
|
|
|
|
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 |
|
|
antonrino.b
New User
Joined: 10 Jan 2006 Posts: 76 Location: Germany
|
|
|
|
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 |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
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 |
|
|
|