Для отображения персонализированного контента и рекламных сообщений, а также хранения личных настроек на локальном компьютере веб-сайт www.vdgb.ru используют технологию cookie и аналогичные. Продолжив использование наших веб-сайтов, Вы даете согласие на обработку персональных данных, выражаете согласие с Политикой конфиденциальности www.vdgb.ru и применением этих технологий.

ПРОДАЖА И ВНЕДРЕНИЕ 1С

по всей России

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

Проконсультироваться
со специалистом 1С

Консультироваться

Код 1C v 8.х
 СледующийДень = ТекущаяДата() + 60 * 60 * 24;
      
ДобавитьМесяц(Дата(2005, 1, 31), 1);
ДобавитьМесяц(Дата(2005, 2, 28), -1);
КонецМесяца(ДобавитьМесяц(Дата(2005, 2, 28), -1));
Функция ПолучитьДень(ИсходнаяДата, КоличествоПрибавляемыхДней)

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

Запрос.УстановитьПараметр("ИсходнаяДата", ИсходнаяДата);
Запрос.УстановитьПараметр("Количество", КоличествоПрибавляемыхДней);
ВозвратЗапрос.Выполнить().Выгрузить()[0].Дата;
КонецФункции

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


Информация взята с сайта http://helpf.pro


Заказать обратный звонок

Позвонить
Отправлено! В самое ближайшее время наш менеджер свяжется с Вами.