Validation of Dates in COBOL

i.see.the.truth · New User Joined: 21 Sep 2007 Posts: 8 Location: CHENNAI

Is there any way in COBOL through which we can validate the input date (without using a DB2 query). For ex- 31.11.2010 is an invalid date. When this date is found at the input I would like to SET a flag to TRUE. The input date is always having the century part.

Thanks & Regards
Soumen

Robert Sample · Posted: Mon Jul 12, 2010 5:27 pm

You can write COBOL code to validate any field any way you want -- you just have to code it.

dbzTHEdinosauer · Posted: Mon Jul 12, 2010 5:30 pm

there are only about a gazzillion algorithms on the internet to accomplish this.

there have been several threads withing the last few months in this forum concerned with this task.

to write you own would involve little code and a couple of tables.

there is only one month - feb - that forces you to accomplish any math.
and then, only when the day > 28.

there are only 5 years within a decade that you have to check for leap years,
(those ending in 0,2,4,6,8).

PeterHolland provided an excellent leap year calculation at the next to last post in this thread

Bill O'Boyle · Posted: Mon Jul 12, 2010 5:37 pm

Search the forum for "CEEDAYS".

Bill

i.see.the.truth · New User Joined: 21 Sep 2007 Posts: 8 Location: CHENNAI

Yes, that solves my problem .... :)

Thanks & Regards
Soumen