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