If you use Integer Dates it may save some time to know that Jan 1 2018 has an integer date of 152307. I write a column every other Tuesday beginning with Jan 2 2018 so I wrote a quickie to print out these dates for this year (attached).: It helps with invoicing. It is not a thing of beauty but it helps get the job done.
Attachment:
invoice01.cbl
Description: Binary data