Source position: gndate.pas line 149
procedure IncDateTime(
const DT1: TplDateTimeRec;
var DT2: TplDateTimeRec;
Days: Integer;
Secs: LongInt
);