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

Отсрочка для клиента в 1С УТ

Автор roofless, 21 июн 2014, 13:21

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

roofless

Здравствуйте! Есть необходимость в печатную форму вывести срок, до какого необходимо провести оплату. Проблема возникла в подсчете сдвига срока.

Есть запрос:

Запрос = Новый Запрос("ВЫБРАТЬ
                         |   РеализацияТоваровУслуг.Ссылка КАК Ссылка,
                         |   РеализацияТоваровУслуг.Номер КАК Номер,
                         |   РеализацияТоваровУслуг.Дата КАК Дата,
                    .......
                         |   РеализацияТоваровУслуг.Менеджер.Наименование КАК ОтпускПроизвел,
                         |   РеализацияТоваровУслуг.Грузополучатель,
                         |   РеализацияТоваровУслуг.АдресДоставки,
                         |   РеализацияТоваровУслуг.Соглашение,
          | РеализацияТоваровУслуг.Соглашение.ЭтапыГрафикаОплаты.(Сдвиг) КАК СдвигОплаты

                         |ИЗ
                         |   Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
                         |ГДЕ
                         |   РеализацияТоваровУслуг.Ссылка В(&МассивДокументов)
                         |   И РеализацияТоваровУслуг.Проведен
                         |
                         |УПОРЯДОЧИТЬ ПО
                         |   Ссылка
                         |;
                         |
                         |////////////////////////////////////////////////////////////////////////////////
                         |ВЫБРАТЬ
                         |   ВложенныйЗапрос.Ссылка КАК Ссылка,

..............

Сдвиг - тип число. Затем этот сдвиг нужно прибавить к дате:

ОбластьМакетаПретензии.Параметры.ОплатитьДо = Формат(ДанныеПечати.Дата + ДанныеПечати.(СдвигОплаты*86400 + 86400, "ДФ='дд ММММ гггг'");

То есть, тк я обрабатываю табличную часть, то невозможно преобразовать СдвигОплаты к числу. Как  мне это сделать?

P.S. Новичек, только начал разбираться. Пусть вас не злит мой тупой вопрос :fdbsdfbsd:

Besart

Цитата: roofless от 21 июн 2014, 13:21ОбластьМакетаПретензии.Параметры.ОплатитьДо = Формат(ДанныеПечати.Дата + ДанныеПечати.(СдвигОплаты*86400 + 86400, "ДФ='дд ММММ гггг'");
ОбластьМакетаПретензии.Параметры.ОплатитьДо = Формат(ДанныеПечати.Дата + ДанныеПечати.СдвигОплаты*86400, "ДФ='дд ММММ гггг'");

Похожие темы (5)

Рейтинг@Mail.ru

Поиск