7
vde69
30.03.15
✎
10:05
|
Процедура СформироватьПолныеДвиженияДокумента (Заголовок, Отказ) Экспорт
// определяем по каким регистрам движения у нас будут
ТаблицаПроведения = ПроведениеДокументов.СоздатьТаблицуПроведения();
Документы.Рентабельность.ЗаполнитьТаблицуПроведения(ТаблицаПроведения, ПометкаУдаления, Проведен, Отказ);
// подготовим пакет запроса в соответствие с тем какие регистры мы определили,
// после подготовки пакета его можно чуть допилить
Запрос = ПроведениеДокументов.ПодготовитьЗапросДляПроведения(ЭтотОбъект, ТаблицаПроведения, Заголовок, Отказ);
// выполнение пакета и заполнения таблиц проведения
// после можно что-то подкоректировать руками
Параметры = Новый Структура("УдалитьВсеДвижения");
ПроведениеДокументов.ПодготовитьТаблицуПроведения (ЭтотОбъект, Запрос, ТаблицаПроведения, Параметры, Заголовок, Отказ);
// выполняем движения по регистрам
ПроведениеДокументов.ПроведениеПоРегистрам(ЭтотОбъект, ТаблицаПроведения, Заголовок, Отказ, Истина);
КонецПроцедуры
|
|