Source position: ovcdate.pas line 154
function DaysInMonth(
Month: Integer;
Year: Integer;
Epoch: Integer
):Integer;