1C Бухгалтерия 7.7. Отчет по материалам, средняя цена.
18.10.2005
16:48
#1
"Подскажите пожалуйста. В отчете необходимо увидеть материалы на конкретном складе в кол-ве и в сумме. Понятно, что суммового учета на 10 нет. Как вывести еще сумму (среднюю).
Процедура Сформировать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьРазделительУчета(РазделительУчета);
Ит.ИспользоватьСубконто(ВидыСубконто.Материалы,, 1);
Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения, ВыбСубконто1, 2);
Ит.ВключатьСубсчета(1);
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Ит.ВыполнитьЗапрос(НачДата, КонДата, "10.1, 10.2, 10.3, 10.4, 10.5, 10.6, 10.8, 10.9,10.10",,,3,,"СК");
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Таб.ВывестиСекцию("Счет");
Ит.ВыбратьСубконто();
Пока Ит.ПолучитьСубконто() = 1 Цикл
ТекМатериал = Ит.Субконто(ВидыСубконто.Материалы);
Код = ТекМатериал.Код;
Сумма=Ит.СНД(); // понятно что здесь сумма =0
Таб.ВывестиСекцию("Субконто1");
КонецЦикла;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать","""");
КонецПроцедуры
//}}БУХГАЛТЕРСКИЙ ЗАПРОС
Процедура ПриОткрытии()
//{{ИНИЦИАЛИЗАЦИЯ БУХГАЛТЕРСКОГО ЗАПРОСА(Сформировать)
НачДата = НачалоПериодаБИ();
КонДата = КонецПериодаБИ();
//{{ИНИЦИАЛИЗАЦИЯ БУХГАЛТЕРСКОГО ЗАПРОСА
КонецПроцедуры"
Процедура Сформировать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
Ит = СоздатьОбъект("БухгалтерскиеИтоги");
Ит.ИспользоватьРазделительУчета(РазделительУчета);
Ит.ИспользоватьСубконто(ВидыСубконто.Материалы,, 1);
Ит.ИспользоватьСубконто(ВидыСубконто.МестаХранения, ВыбСубконто1, 2);
Ит.ВключатьСубсчета(1);
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Ит.ВыполнитьЗапрос(НачДата, КонДата, "10.1, 10.2, 10.3, 10.4, 10.5, 10.6, 10.8, 10.9,10.10",,,3,,"СК");
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Таб.ВывестиСекцию("Счет");
Ит.ВыбратьСубконто();
Пока Ит.ПолучитьСубконто() = 1 Цикл
ТекМатериал = Ит.Субконто(ВидыСубконто.Материалы);
Код = ТекМатериал.Код;
Сумма=Ит.СНД(); // понятно что здесь сумма =0
Таб.ВывестиСекцию("Субконто1");
КонецЦикла;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать","""");
КонецПроцедуры
//}}БУХГАЛТЕРСКИЙ ЗАПРОС
Процедура ПриОткрытии()
//{{ИНИЦИАЛИЗАЦИЯ БУХГАЛТЕРСКОГО ЗАПРОСА(Сформировать)
НачДата = НачалоПериодаБИ();
КонДата = КонецПериодаБИ();
//{{ИНИЦИАЛИЗАЦИЯ БУХГАЛТЕРСКОГО ЗАПРОСА
КонецПроцедуры"
18.10.2005
19:08
#2
"Подскажите пожалуйста. В отчете необходимо увидеть материалы на конкретном складе в кол-ве и в сумме. Понятно, что суммового учета на 10 нет..."
Похоже Вы изобретаете "велосипед".
На можно найти внешниий отчет "Универсальный материальный отчет" (название приблизительное), который может решить Ваши проблемы.
Похоже Вы изобретаете "велосипед".
На можно найти внешниий отчет "Универсальный материальный отчет" (название приблизительное), который может решить Ваши проблемы.
20.10.2005
07:07
#3
А 1С-овцам слабо поставить в плане счетов на субконото "МестаХранения" флажок "Учет по сумме"?
Эта проблема уже выеденная! Никому ничего не надо. Спор ведется на протяжении нескольких лет.
Страдает 10-й, 41-й, 43 и другие счета.
Слав те, Господи, по 41.2 наконец-то дошло, всё нормально сделали.
Эта проблема уже выеденная! Никому ничего не надо. Спор ведется на протяжении нескольких лет.
Страдает 10-й, 41-й, 43 и другие счета.
Слав те, Господи, по 41.2 наконец-то дошло, всё нормально сделали.
Читают тему
(гостей: 1)