0
program345
04.04.15
✎
10:15
|
Доброго дня!
Код:
&НаСервереБезКонтекста
Процедура ОКНаСервере(Период)
Запрос = Новый Запрос("ВЫБРАТЬ
| ПоступлениеТоваровИУслуг.Ссылка
|ИЗ
| Документ.ПоступлениеТоваровИУслуг КАК ПоступлениеТоваровИУслуг
|ГДЕ
| ПоступлениеТоваровИУслуг.Дата МЕЖДУ &ПериодНачало И &ПериодКонец");
Запрос.УстановитьПараметр("ПериодНачало",Период.ДатаНачала);
Запрос.УстановитьПараметр("ПериодКонец",Период.ДатаОкончания);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
КопияДок = Выборка.Ссылка.Скопировать();
КопияДок.Дата = ТекущаяДата();
КопияДок.Записать();
Сообщить(Строка(КопияДок.Ссылка) + " записан!");
КонецЦикла;
КонецПроцедуры
|
|