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.
Login or Sign Up
- Log in with