Source position: googlepeople.pp line 476
protected procedure TDate.Setday(
AIndex: Integer;
const AValue: Integer
); virtual;