Page 1 of 1

how to get Timestamp on load through REXX.

PostPosted: Fri Aug 17, 2012 10:57 am
by Sohail_s
Hi All,

I have a requirement to get the Timestamp from a load Module.

I got it with the AMBLIST REXX command.

ADDRESS TSO ,
"ALLOC FI(LOAD) DSORG(PO) SHR DSNAME"'('"'"inpds4"("newstr')'"'"')'
ADDRESS TSO ,
"ALLOC FI(SYSIN) NEW SPA(1,1) TR REUSE "
ADDRESS TSO ,
"ALLOC FI(SYSPRINT) NEW SPA(1,1) CYL REUSE"
DROP CTRL.
CTRL.1 = " LISTLOAD DDN=LOAD,MEMBER="newstr",OUTPUT=XREF "
CTRL.0 = 1
ADDRESS TSO,
"EXECIO * DISKW SYSIN (FINIS STEM CTRL."
ADDRESS LINKMVS "AMBLIST"

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Sysprint collected from AMBLIST is as below.

000026 ***THE FOLLOWING ARE THE UNFORMATTED PDSE DIRECTORY ENTRY SECTIONS (PMAR AND PMARL)
000027 PMAR 001E0209 C2C00C12 00000000 1EB80000 00000000 00000000 00000000 0000
000028 PMARL 00520040 00000000 00070000 1EB80000 10000000 11A80000 54980000 01B40000
000029 01400000 00240000 011C0000 00070000 02F40001 00000000 1EB80000 00000000
000030 00002012 180F0182 447FC4F2 F8F4F0F2 F4C3
000031 0THIS PROGRAM OBJECT WAS ORIGINALLY PRODUCED BY 5695PMB01 AT LEVEL 01.12 ON 06/28/2012 AT 18:24:47
000032 0-----------------------------------------------------------------------------------------------------------------------------------------------

From the SYSPRINT i collected the TS on Line no 31. i found that actual TS (20120628182446040200) in the LOAD is one scond more than i got with AMBLIST.
I believe the TS which i got is the TS of Object module and not a Load module. So AMBLIST is used to get the object module TS? if so is there any utility to get the Load module TS.

Also the SYSPRINT is not same for all LOAD modules, in few i didn't found the TS at all.

Is there any other utility to get the TS from LOAD. your help will be much appreciated.

Thanks

Re: how to get Timestamp on load through REXX.

PostPosted: Fri Aug 17, 2012 11:42 am
by steve-myers
There is no time of day as an object deck attribute. Many compilers insert the time of day as text into the binary text, but this is not recognized by AMBLIST.

The load module time of day used by AMBLIST was not stored in the load module IDR data until some time in the 1990s when the Binder effectively replaced the Linkage Editor. Load modules created before this change, as well as load modules created by the old Linkage Editor (yes, it's still available!) do not have the time of day they were linked in the load module.