Shirley NILH R?,X'00FF' would be better. Don't call me Suely. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי נֵ֣צַח יִשְׂרָאֵ֔ל לֹ֥א יְשַׁקֵּ֖ר
________________________________________ From: IBM Mainframe Discussion List on behalf of Mike Schwab Sent: Saturday, April 19, 2025 5:36 PM To: [email protected] Subject: Re: Day of week from a program External Message: Use Caution 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 < [email protected]> 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 [email protected] 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 [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
