Source position: dateutil.inc line 359
function RecodeMonth(
const AValue: TDateTime;
const AMonth: Word
):TDateTime;