Source position: ovcdate.pas line 148
function DayOfWeekDMY(
Day: Integer;
Month: Integer;
Year: Integer;
Epoch: Integer
):TStDayType;