[fpc-pascal]date handling routines

[BigMatt19 at aol.com]

Hey guys,
   Wondering if there was already a unit available that could tell me the day of week a certain date was.  An example perhaps would be:

function GetDayOfWeek(date:datetimerecord):integer;

where result would be 1-7 (depending on the date).

If not, then I will just write my own, but why reinvent the wheel, eh?

   - Matt