>George;
>
>Does your code take into account Easter according to the Roman and Greek Churches?
>
>There is a relationship between Passover and Easter. The reason we have a Roman and Orthodox Catholic Church is because the Romans and Greeks could not agree upon the relationship of the moon and Passover, which establishes when Easter is observed.
>
Tom,

I'm not sure how to answer without doing some research. The code was written based upon information found in the Book of Common Prayer which is used by the Episcopal Church of the US. The Episcopal Church is part of the worldwide Anglican Communion. We're very close in theology to the Roman Catholic Church. In fact, the only reason we exist as an independent entity was the English Reformation, which was a socio-political event not theological. But I digress. The easiest for me to explain and, hopefully, answer your question, is to tell you the steps involved.

1. Retrieve the "golden number" using the following algorithm.

FUNCTION GoldenNumber
  LPARAMETER tnYear
  
  LOCAL lnresult
  lnresult = tnYear + 1
  lnresult = lnresult % 19
  IF lnresult = 0
    lnresult = 19
  ENDIF
  RETURN lnresult
ENDFUNC

For this year, this returns 6.

2. Obtain the month and day of the Paschal moon from a lookup function contain the 19 possibilities. This year the date of the Paschal moon was 4/18.

3. Easter is the first Sunday following, so the date's adjusted accordingly. Easter was on 4/23/2000.

Does this answer your question?