В конфигурации ТиС 7.7 создаю нов, документ в модуле которого я хочу списать товар со склада, при
том использовав существующие процедуры.
Вот таким образом:
Процедура ПроведениеПоРегистрам() // Удаление движений по регистрам. Для Номер = 1 По Метаданные.Регистр() Цикл ОчиститьДвижения("Регистр."+Метаданные.Регистр(Номер).Идентификатор); КонецЦикла; ТаблицаУслуг = СоздатьОбъект("ТаблицаЗначений"); ТаблицаТМЦ = глПодготовитьТаблицуДокумента(Контекст,1,ТаблицаУслуг); ТаблицаТМЦ.ВыбратьСтроки(); Пока ТаблицаТМЦ.ПолучитьСтроку()=1 Цикл ТаблицаТМЦ.Единица=ТаблицаТМЦ.Номенклатура.ОсновнаяЕдиница; КонецЦикла; ФирмаДляОстатковТМЦ = глФирмаДляОстатковТМЦ(Фирма); СписокПараметров=СоздатьОбъект("СписокЗначений"); СписокПараметров.ДобавитьЗначение(ТекущийДокумент(),"ТекДок"); СписокПараметров.ДобавитьЗначение(Константа.СкладПоУмолчанию, "Склад"); СписокПараметров.ДобавитьЗначение(Константа.ОсновнаяФирма, "Фирма"); СписокПараметров.ДобавитьЗначение(ФирмаДляОстатковТМЦ,"ФирмаДляОстатковТМЦ"); СписокПараметров.ДобавитьЗначение(Заявка.Контрагент, "Контрагент"); СписокПараметров.ДобавитьЗначение(Заявка.Договор, "Договор"); // СписокПараметров.ДобавитьЗначение(КодОперации, "КодОперации"); ВремРегистры = СоздатьОбъект("Регистры"); ВремОстаткиТМЦ = ВремРегистры.ОстаткиТМЦ; глФильтрОстатковТМЦ (Контекст, ТаблицаТМЦ, СписокПараметров, ВремОстаткиТМЦ); Если ИтогиАктуальны()=0 Тогда ВремРегистры.Актуальность(1); ВремРегистры.РассчитатьРегистрыНа(ТекущийДокумент()); КонецЕсли; Если глСписаниеОстатковТМЦ (Контекст,ТаблицаТМЦ,СписокПараметров, ВремОстаткиТМЦ)=0 Тогда Возврат; КонецЕсли; КонецПроцедуры
В результате чего он пишет что не хватает для списания товара (количество 0) хотя по отчету "остатки ТМЦ" на этом скледе лежит больше чем требуется. Не пойму где ошибка :(
Спасибо!











