Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
29 мар 2024, 04:25

Прибавить к дате день?

Автор Лида1, 22 ноя 2009, 17:05

0 Пользователей и 2 гостей просматривают эту тему.

Лида1

Если существует необходимость прибавить к дате день или даже месяц,до точность даты ведь только до секунды.. как это сделатЬ?

Buh777

Все просто  :D Нужно увелить прошлую дату на то количество секунд чтобы получился новый (следующий) день т.е. 1 сутки= 86400 секунд. как расчитывать:
ЦитироватьСледующийДень = ТекущаяДата() + 60 * 60 * 24;

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

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

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

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

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

Теги:
Рейтинг@Mail.ru

Поиск