HP3000-L Archives

October 1998, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Stigers, Greg [And]" <[log in to unmask]>
Reply To:
Stigers, Greg [And]
Date:
Fri, 23 Oct 1998 16:25:41 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (12 lines)
I had a lot of help with this from Lars Appel, Jeff Vance, and Tim Ericson,
so they deserve the credit for me being able to put this together. But
except for leap months,
IF HPDATE=![WORD("31 28 31 30 31 30 31 31 30 31 30 31",,HPMONTH)]
will do it, and for catching leap day,
IF !HPDATE = 29 AND !HPMONTH = 2 AND !HPYEAR MOD 4 = 0
will fail on the first element except for 28 days of the year, so either
test, date or month, can go first. Of course, if the first two elements are
true, there's not much point in testing the third. There is more than one
way to put these two together to efficiently test both, depending on what
you want to do if it is the last day of the month.

ATOM RSS1 RSS2