Вход | Регистрация

1С:Предприятие ::

Метки:

Складской учет. Остаток по каждому наименованию с помощью БИ

Я
   GoldMax
 
20.12.03 - 12:07
При работе со справочником товаров очень удобно иметь дополнительное поле, в котором содержится остаток товара на складе. Таким образом всегда при открытии справочника легко узнать текущий остаток.

Данная функция реализована и работает, но с точки зрения программирования 1С реализована ошибочно. Такой подход к решению данной задачи позволил автоматизировать складской учет, но мешает в дальнейшей автоматизации всей бухгалтерии.

Помогите пожалуйста вычислить остаток по каждому наименованию с использованием бухгалтерских итогов.
 
 
   Волшебник
 
1 - 20.12.03 - 13:43
Лучше пользоваться отчетом.

Если очень надо, то надо просто получить итоги по счету "Готовая продукция" (или "Материалы") с разворотом по соответствующему субконто.

Обратите внимание, что главная проблема будет заключаться в том, как избавиться от тормозов.
Рекомендую использовать технологию программного КЭШИРОВАНИЯ, чтобы не рассчитывать каждый раз бухгалтерские итоги. Это можно реализовать, например, с помощью таблицы значений в 7.7.
   GoldMax
 
2 - 20.12.03 - 23:35
Уважаемый Волшебник, расскажите пожалуйста подробнее  о 2 вашем решении данной проблемы.

Отчет по моему в данном случае не подходит, а вот быстро рассчитать итоги и результат быстро отобразить в форме справочника было бы очень кстати.
   Волшебник
 
3 - 20.12.03 - 23:50
Итоги быстрее рассчитать не получится, но можно сократить количество таких расчетов, т.е. не считать повторно одни и те же данные.

У вас есть последние диски ИТС?
   Xelon
 
4 - 21.12.03 - 00:03
Можно в форму вставить кнопку "Рассчитать остатки". И при нажатии рассчитать бух.итоги. А потом через функцию в поле "Остаток" выдавать нужный остаток.

//-------------- текст процедуры расчета БИ ------------

БИ = СоздатьОбъект("БухгалтерскиеИтоги");
БИ.ИспользоватьСубконто(ВидыСубконто.МестаХранения);
БИ.ИспользоватьСубконто(ВидыСубконто.ТМЦ);
БИ.ВыполнитьЗапрос(РабочаяДата(),РабочаяДата(),,,,,,"К");

//-------------- текст функции ПолучитьОстаток() ---------

// здесь должна еще быть проверка на группу и на пустое значение текущего элемента и на признак рассчитанности итогов.
БИ.ВыбратьСчета();
БИ.ПолучитьСчет(,Счет);
БИ.ВыбратьСубконто(1);
БИ.ПолучитьСубконто(1,МестоХранения);
БИ.ВыбратьСубконто(2);
БИ.ПолучитьСубконто(2,ТекущийЭлемент());
Возврат Формат(БИ.СКД("К"),"Ч010.3");
   GoldMax
 
5 - 21.12.03 - 09:39
Последних дисков ИТС нет и скорее всего и не будет. Есть несколько очень старых дисков.
   GoldMax
 
6 - 21.12.03 - 10:07
А может быть есть более быстрый и более удобный способ с использованием других методов?


Список тем форума
Рекламное место пустует   Рекламное место пустует
Компьютер — устройство разработанное для ускорения и автоматизации человеческих ошибок.
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует