Another option would be to use exploit a third-party product. If you have either CA 1 or TLMS installed as your Tape Management system, both have a set of macros that can do all kinds of date processing (add days, calculate the number of days between 2 dates, subtract days). And on of the things we do with date is to "expand" them; which means turning 2025/001 into "Wednesday, January 1st 2025". So you can get the character form of any date you supply.
Russell Witt Broadcom -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Jousma, David Sent: Friday, April 18, 2025 10:50 AM To: [email protected] Subject: Re: Day of week from a program You are correct, but It appeared to me that Joe was looking to calculate from current time. Dave Jousma Vice President | Director, Technology Engineering From: IBM Mainframe Discussion List <[email protected]> on behalf of Paul Gilmartin <[email protected]> Date: Friday, April 18, 2025 at 11:47 AM To: [email protected] <[email protected]> Subject: Re: Day of week from a program On Fri, 18 Apr 2025 15:39:20 +0000, Jousma, David wrote: >Again, why not query system symbol &LWDAY, instead of trying to >calculate? >https://urldefense.com/v3/__https://www.ibm.com/docs/en/zos/3.1.0?topic >=1-operation__;!!MwwqYLOC6b6whF7V!jjjrXaNBrDWXcSdx7cFjZJ6KViua-LtCTaLj0 >FFh6e8ju61hiinUQe2J-nNMkM9SPgyeZloX_lDLpkxv2c9Gi2OH42t1D-VqqDo$<https:/ >/urldefense.com/v3/__https:/www.ibm.com/docs/en/zos/3.1.0?topic=1-opera >tion__;!!MwwqYLOC6b6whF7V!jjjrXaNBrDWXcSdx7cFjZJ6KViua-LtCTaLj0FFh6e8ju >61hiinUQe2J-nNMkM9SPgyeZloX_lDLpkxv2c9Gi2OH42t1D-VqqDo$> > What if one needs the day of week corresponding to an archival timestamp? -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. ---------------------------------------------------------------------- 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
