Got it working on Hercules VM/370. Wouldn’t work as written using EXECIO statement’s to read/write to disk. So I changed it to use LINEIN/LINEOUT statement’s. I don’t believe these were valid statement’s when I wrote this 29 years ago on 3/31/94. It makes a calendar of the current month…by default. And flags the current day with an asterisk. You can also add MM YYYY for other months.
