Day of Week

[M.Martinez]

Nick, on V3R7 there is a QDAY value. This can be retrieved using the RTVSYSVAL command. The values are *SUN, *MON etc. This is for the current date only. In ILE COBOL there is the statement : ACCEPT WS-DAY FROM DAY-OF-WEEK. For the OPM versions of RPG and COBOL one can use the QWCCVTDT API to get the current day of the week. The ILE API CEEDYWK will get the day of the week for any given day. Bryan Meyers also published a simple little ILE RPG routine that does the same thing. It was published in MC magazine. In essence, depending on your version of OS/400, and the HLL that you use, there are a variety of options on the AS/400 to get the day of the week. If you want some more information, feel free to E-mail me. Good luck.

[M.Martinez]

Now for the corrections .... The OS/400 system value for the current Day of the Week is : QDAYOFWEEK. Bryan Meyer's article was published in News/400, not MC.

[Guest.Visitor]

Nick For non-to-day dates there is an earlier dicussion on this forum about: First writer: Kendall F. Stratton III (kfsthree@agate.net) Topic: What day of week is this??? (1/8) Date: Friday, March 21, 1997 05:35 PM Matti Kujala Ahlstrom Kauttua ltd. HREF="http://www.vn.fi/vn/um/finfo/findeng.html"> Finland