Как прибавить к дате день, месяц?

 СледующийДень = ТекущаяДата() + 60 * 60 * 24;

ДобавитьМесяц(Дата(2005, 1, 31), 1);

ДобавитьМесяц(Дата(2005, 2, 28), -1); 

КонецМесяца(ДобавитьМесяц(Дата(2005, 2, 28), -1));

Функция ПолучитьДень(ИсходнаяДата, КоличествоПрибавляемыхДней)

	

	Запрос = НовыйЗапрос("

	|ВЫБРАТЬ 

	|ДОБАВИТЬКДАТЕ(&ИсходнаяДата, ДЕНЬ, &Количество) как Дата";



	Запрос.УстановитьПараметр("ИсходнаяДата", ИсходнаяДата); 

	Запрос.УстановитьПараметр("Количество", КоличествоПрибавляемыхДней); 

	ВозвратЗапрос.Выполнить().Выгрузить()[0].Дата; 

КонецФункции 



ДатаРождения = Дата(1975, 7, 31),;

ДеньРожденияБудущегоГода = ДобавитьМесяц((ДобавитьМесяц(НачалоДня(ТекущаяДата()), -(Год(ДатаРождения) - 1) * 12)), (Год(ТекущаяДата()) * 12));