Eliminate bits 0-7 with a ICM R?.B'1000',=X'00'? Eliminate bits 60-63 and convert to seconds by dividing by 1,024.000,000? Adjust for local time by adding or subtracting 3600 seconds per hour? Combine last 2 steps by dividing by 604,800?
On Sat, Apr 19, 2025 at 4:01 PM Paul Gilmartin < 0000042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote: > On Thu, 17 Apr 2025 07:52:04 -0400, Joseph Reichman wrote: > > > >Would anyone know if there is a way to get the day of week from any of > the date macros STCKCONV > > > Don't bother with CKCONV. > > Divide bits 8-59 od ETOD by 1000000 to get seconds. > Divide by 86400 to get days. > Divide by 7 > Use the remainder as an index to a table of day names. > > CVTLSO and CVTLDTO (which CKCONV doesnt handle) > and Epoch Index are left as an exercise fir the student. > > -- > gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
