Re: how to handle date comparison

Is your field on the file in YYYYMMDD format? I would think you could use
CURRENT-DATE and store in ws-curr-date 9(8), then just check ws-curr-date
= YYYYMMDD field on file. Dates on our files show with separator's in
Query etc... but the separator's are not actually part of the DATA.



Jeff Buening
Sr. Developer
P: 419.586.8599
| F: 419.586.8997


Celina Insurance Group
800.552.5181 | 1 Insurance Square, Celina, Ohio 45822
www.celinainsurance.com


................................................................................
...................................................

The information contained in this message (including any attachments) is
confidential and may be privileged.
Unauthorized disclosure, copying, or use of this information is prohibited and
may be unlawful.
If you are not the intended recipient, please delete this message and notify
the sender.



From: "Stone, Joel" <Joel.Stone@xxxxxxxxxx>
To: "'COBOL Programming on the IBM i (AS/400 and iSeries)'"
<cobol400-l@xxxxxxxxxxxx>
Date: 08/09/2016 03:09 PM
Subject: [COBOL400-L] how to handle date comparison
Sent by: "COBOL400-L" <cobol400-l-bounces@xxxxxxxxxxxx>



In COBOL, what is a good method of comparing a data field date to the
current date?

It seems that ALL data fields must be declared to appear with a separator
character.

And it sees that the CURRENT-DATE function cannot return a date separator.

Is it mandatory to break apart the current date, and string it back
together with a separator?


Surely there must be an easier way to write something like:


If Cust-add-date = ws-curr-date

Where Cust-add-date is type "L" format *MDY


Without breaking apart and rebuilding the current date?

Thanks