As @Shmuel says, it depends on how the clock is set. Charles
-----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Itschak Mugzach Sent: Tuesday, January 12, 2021 9:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: STCK and epoch time Paul, So if I ignore leap seconds, Can I just divide the number by 409600 and subtruct 1.1.1970-1.1.1900? *| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux and IBM I **| * *|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|* *Skype**: ItschakMugzach **|* *Web**: www.Securiteam.co.il **|* On Tue, Jan 12, 2021 at 7:09 PM Paul Gilmartin < 0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Tue, 12 Jan 2021 16:30:52 +0000, Seymour J Metz wrote: > > >The TOD clock is just a counter; what you get out of it depends on what > you put into it. There is a convention in PoOps, but if you want the > correct time and date it is much easier to use system services than to do > the adjustments yourself. > > > >MVS does not use the same epoch as Eunix. Unix System Services will > adjust the epoch properly. > > > UNIX counts seconds, excluding leap seconds, starting 1970-01-01t00:00:00 > MVS counts microseconds/4096, including leap seconds, starting > 1900-01-01t00:00:10. > > >________________________________________ > >From: ITschak Mugzach > >Sent: Tuesday, January 12, 2021 10:36 AM > > > >How exactly STCK (not STCKE) stores the time? I took the value (8 bytes) > >and converted it to decimal 10 characters. I expect it to be the same as > >the EPOCH time returned by USS time call. However the returned value is > July > >29, 2019 (have a time from yesterday). I know there is a macro to do it, > >but I want to keep the correct epoch time. > > > I'm mystified (unless it's a coding error) by the 6-month error. Show > your code. > > -- gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
