DenGr
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Привет, всем. Подскажите что делаю неправильно. Нужна процедура заполнения материалами табличной части документа. Отбор производится по складу, где храниться материал. Вот что наваял... Процедура Заполнить() УдалитьСтроки(); ВыбКонПериода = КонецПериодаБИ(); Ит = СоздатьОбъект("БухгалтерскиеИтоги"); Ит.ИспользоватьПланСчетов(ОсновнойПланСчетов()); Ит.ИспользоватьСубконто(ВидыСубконто.Материалы,, 1); Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения,МестоХранения , 2); Ит.ВыполнитьЗапрос(ВыбКонПериода, ВыбКонПериода,Счет,,, 1,, "СК"); Ит.ВыбратьСубконто(1); Пока Ит.ПолучитьСубконто(1) = 1 Цикл Ит.ВыбратьСубконто(2); Пока Ит.ПолучитьСубконто(2) = 1 Цикл Если (Ит.СКД()<>0) и (Ит.СКД(3)<> 0) Тогда; НоваяСтрока(); Материал=Ит.Субконто(ВидыСубконто.Материалы); КоличествоНадлежитОтпустить=Ит.СКД(3); КоличествоОтпущено=Ит.СКД(3); Цена=Ит.СКД()/Ит.СКД(3); Сумма=Ит.СКД(); НДС=Ит.СКД()*0.2; Всего=Сумма+НДС; КонецЕсли; КонецЦикла; КонецЦикла; КонецПроцедуры // Заполнить() Выводит в документ ВСЕ материалы по ВСЕМ местам хранения(((( Что же не так??? Подскажите, очень нужно. Заранее спасибо. Денис. |