Source position: ovcdate.pas line 111
procedure StDateToDMY(
Julian: TStDate;
var Day: Integer;
var Month: Integer;
var Year: Integer
);