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
 

 

Find the Compile time stamp of a COBOL load module
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Aug 27, 2007 5:42 pm    Post subject: Find the Compile time stamp of a COBOL load module
Reply with quote

Is there any way to find the Compile time stamp of a COBOL load module?

Cheers,
Neo icon_razz.gif
Back to top
View user's profile Send private message

feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Aug 27, 2007 5:54 pm    Post subject:
Reply with quote

I know we can do it in COBOL using the "WHEN-COMPILED" registry. But for me calling the COBOL from REXX and getting the result passed from COBOL to load again will be a tedious process cos I may need to find compile time stamp of atleast 200 modules in a single run of REXX.

So is there any way to find this without using the COBOL "WHEN-COMPILED" registry.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Mon Aug 27, 2007 6:09 pm    Post subject: Reply to: Compile time of COBOL load
Reply with quote

This website has a example of AMBLIST output. Looks to me like it will give you the date and time that the load module was created.
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Mon Aug 27, 2007 6:11 pm    Post subject:
Reply with quote

feellikeneo wrote:
I know we can do it in COBOL using the "WHEN-COMPILED" registry. But for me calling the COBOL from REXX and getting the result passed from COBOL to load again will be a tedious process cos I may need to find compile time stamp of atleast 200 modules in a single run of REXX.

So is there any way to find this without using the COBOL "WHEN-COMPILED" registry.


There is a date & time in the load modules, I think it is the linkedit date & time but it is clearly readable if you browse the modules. I am sure AMBLIST shows it and I think there are programs on the CBT tapes that extract it.
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Aug 27, 2007 6:15 pm    Post subject:
Reply with quote

Hi Craq,

Can you explain more with some examples.

I can find it if I browse through the load. But how can we find this via a program say REXX.

I am not aware of "AMBLIST" that you refer to. Explain with an example please.

Thanks,
Neo
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Mon Aug 27, 2007 7:10 pm    Post subject:
Reply with quote

feellikeneo wrote:
Hi Craq,

Can you explain more with some examples.

I can find it if I browse through the load. But how can we find this via a program say REXX.

I am not aware of "AMBLIST" that you refer to. Explain with an example please.

Thanks,
Neo


I don't know rexx so I can't help you with that. AMBLIST is an IBM utility, if you search this forum you will find more information about it.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Aug 27, 2007 7:30 pm    Post subject:
Reply with quote

chapter 15 of this manual IEA2V150 or GA22-7589-07 /OS V1R6.0 MVS Diagnosis: Tools and Service Aids.

or go to IBM Server Library Server and search for GA22-7589 to obtain the z/OS version that you are running. AMBLIST has not changed much, so the first link should get you going.
Back to top
View user's profile Send private message
jz1b0c

Active User


Joined: 25 Jan 2004
Posts: 160
Location: Toronto, Canada

PostPosted: Tue Aug 28, 2007 2:39 am    Post subject:
Reply with quote

Hi,

I am not sure if this helps you..

//AMBLIST1 JOB (8550,030A,20,30),'AMBLIST JOB',
// CLASS=A,MSGCLASS=T,NOTIFY=&SYSUID
//*
//AS10 EXEC PGM=AMBLIST
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR
//MYLOAD DD DSN=JZ1B0C.LOADLIB,DISP=SHR
//SYSIN DD *
LISTIDR DDN=MYLOAD,MEMBER=JZMEMBR
/*
//*

I got the date the program is compiled...


This is how the output
===

THIS LOAD MODULE WAS PRODUCED BY LINKAGE EDITOR 5695PMB01
AT LEVEL 01.08 ON DAY 239 OF YEAR 2007 AT 16:12:17
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Thu Aug 30, 2007 2:15 pm    Post subject:
Reply with quote

Hi Dude,
Your following code worked perfectly,

Code:
/AMBLIST1 JOB (8550,030A,20,30),'AMBLIST JOB',
// CLASS=A,MSGCLASS=T,NOTIFY=&SYSUID
//*
//AS10 EXEC PGM=AMBLIST
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR
//MYLOAD DD DSN=JZ1B0C.LOADLIB,DISP=SHR
//SYSIN DD *
LISTIDR DDN=MYLOAD,MEMBER=JZMEMBR
/*
//*


But I wold appreciate if anyone can help me to do this is a more simple way. As I mentioned earlier I have almost 200 modules for whom I have to identify the compile time stamp. So going by this JCL way will be so tedious.

Can anybody help me to this same operation of AMBLIST using REXX.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Aug 30, 2007 2:31 pm    Post subject:
Reply with quote

feellikeneo,

had you spent 2 minutes going thru the manual you would have found that
Quote:

If you omit the MEMBER= parameter, AMBLIST will print all modules in the data set.
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Thu Aug 30, 2007 2:36 pm    Post subject:
Reply with quote

Hi Dick,

Yes. That would give me all modules in the data set..

But in my case, my dataset will contain 1000's of load modules and I have to pick some 200 modules. These 200 modules will be obtained from a REXX program (based on some criteria).

Thanks dude..
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Thu Aug 30, 2007 2:38 pm    Post subject:
Reply with quote

I just found some webpage related to this.

http://home.flash.net/~mzelden/mvsutil.html

I am going through this and keep you ppl posted if I strike something related to my requirement.
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Fri Aug 31, 2007 5:59 pm    Post subject:
Reply with quote

The above link that i gave contains some materials on CLIST.
I do not know how to interpret that.

Can anybody pls help

Cheers,
Neo
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Aug 31, 2007 6:11 pm    Post subject:
Reply with quote

feellikeneo,

why don't you explain what the criteria is, or on what the criteria will be based, to determine which module you wish to extract the compile time info.

you started this thread with a bland question, then rejected any offers by continually rephrasing your requirements. Learn to ask questions intelligently. by this time most viewers of this thread are just waiting to see what new inanity you will come up with next.
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Sep 03, 2007 3:47 pm    Post subject: Reply to: Find the Compile time stamp of a COBOL load module
Reply with quote

sorry for not being clear..

I have 3 DSN containing the load modules. These three DSN does have some modules in common. Actually one DSN will be LOAD library, one DBRM lib and one more will be list of modules obtained from a SYSIBM table.

I will run a rexx macro to identify what are all the modules which is common in all the three DSN. Among the common one's I have to find the compile timestamp of those modules.

Hope I am clear now. Please let me know if u have any more questions

Sorry dbz...
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Mon Sep 03, 2007 4:28 pm    Post subject:
Reply with quote

Geez..... icon_rolleyes.gif
In the time you have spent trying to find an automatic REXX method, a quick pass of AMBLIST and sort would have given your answer (last Tuesday)...... icon_confused.gif
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Sep 03, 2007 5:03 pm    Post subject:
Reply with quote

good idea dude..
but i need some professional approach.. AMBLIST and SORT will obviously give results.. But my idea was to avoid the usage of JCL here..
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Mon Sep 03, 2007 5:12 pm    Post subject:
Reply with quote

Sometimes, the fastest solution comes from the crudest approach.... icon_smile.gif
Back to top
View user's profile Send private message
feellikeneo

New User


Joined: 19 Mar 2007
Posts: 73
Location: Chennai

PostPosted: Mon Sep 03, 2007 5:21 pm    Post subject:
Reply with quote

William Thompson wrote:
Sometimes, the fastest solution comes from the crudest approach.... icon_smile.gif

mm... let me just go with the usage of JCL. If I strike somewhere in future the usage of AMBLIST via REXX i shall post it here..

Thanks a lot guys... The AMBLIST thro JCL was a great stuff..

Thanks IBMMANIFRAMES.COM
Back to top
View user's profile Send private message
TG Murphy

Active User


Joined: 23 Mar 2007
Posts: 149
Location: Ottawa Canada

PostPosted: Tue Sep 04, 2007 11:39 pm    Post subject:
Reply with quote

This is not terribly helpful but I wrote a Rexx program a few years back that extracts the compile/date from the load module itself. Input to this utility is a load library and it will do all the modules in the library - or just a subset (ie. just those modules that start with ABC).

Works with BMS mapsets as well.

Useful utility.

The only problem with my solution is that it was reverse-engineered. I eyeballed the load module and figured out where to look. So - best I can say is that it works for our modules but perhaps not yours...

However - perhaps useful for you to know it can be done...
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 -> COBOL Programming All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to find the first monday of the w... abdulrafi COBOL Programming 10 Fri Nov 25, 2016 3:24 pm
This topic is locked: you cannot edit posts or make replies. Get a job submitted itself every time... arunsoods JCL & VSAM 3 Tue Nov 22, 2016 4:05 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Check System time(Minute) Using TIME1... balaji81_k DFSORT/ICETOOL 5 Fri Nov 11, 2016 10:53 am
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm


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