Адресация на складах в ТиС
По теме из базы знаний
- Один из простых вариантов реализации адресного хранения в УТ 10.3
- Внедрение адресного склада в логистическом операторе
- Адресная система хранения на складе
- История развития 1С:Торговли, что изменилось в архитектуре учета торговых и складских операций за 15 лет
- Разные хм... неожиданности при работе с УТ 11 и платформой
Ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
Ну, добавь в рег. ОстаткиТМЦ реквизит АдресХр - строка 10 (либо создай новый регистр).
И пиши туда адрес вида Стелаж-Полка (ну, здесь на вкус, цвет и фантазию 12-4, А14-16...)
Добавь в доки движения аналогичный реквизит.
При списании повесь функцию на поле АдресХр, где вычиляются остатки по адресам и вываливаются списком для выбора.
При проведении, опуская всякие проверки остатков, можно уложиться в 1 функцию:
Процедура глДвижениеТМЦ(Конт,Приход=1) Экспорт
Конт.ВыбратьСтроки();
Пока Конт.ПолучитьСтроку()=1 Цикл
Конт.Регистр.ОстаткиШПЗ.Фирма = Конт.Фирма;
Конт.Регистр.ОстаткиШПЗ.Склад = Конт.Склад;
Конт.Регистр.ОстаткиШПЗ.Номенклатура = Конт.Номенклатура;
Конт.Регистр.ОстаткиШПЗ.АдресХр = ВРЕГ(АдресХр);
Конт.Регистр.ОстаткиШПЗ.Количество = Конт.Количество*Конт.Коэффициент;
Если Приход=1 Тогда
Конт.Регистр.ОстаткиШПЗ.ДвижениеПриходВыполнить();
Иначе
Конт.Регистр.ОстаткиШПЗ.ДвижениеРасходВыполнить();
КонецЕсли;
КонецЦикла; // по строкам документа
Ну, и допиши отчет Остатки ТМЦ или Ведомость ТМЦ с учетом адреса.
И пиши туда адрес вида Стелаж-Полка (ну, здесь на вкус, цвет и фантазию 12-4, А14-16...)
Добавь в доки движения аналогичный реквизит.
При списании повесь функцию на поле АдресХр, где вычиляются остатки по адресам и вываливаются списком для выбора.
При проведении, опуская всякие проверки остатков, можно уложиться в 1 функцию:
Процедура глДвижениеТМЦ(Конт,Приход=1) Экспорт
Конт.ВыбратьСтроки();
Пока Конт.ПолучитьСтроку()=1 Цикл
Конт.Регистр.ОстаткиШПЗ.Фирма = Конт.Фирма;
Конт.Регистр.ОстаткиШПЗ.Склад = Конт.Склад;
Конт.Регистр.ОстаткиШПЗ.Номенклатура = Конт.Номенклатура;
Конт.Регистр.ОстаткиШПЗ.АдресХр = ВРЕГ(АдресХр);
Конт.Регистр.ОстаткиШПЗ.Количество = Конт.Количество*Конт.Коэффициент;
Если Приход=1 Тогда
Конт.Регистр.ОстаткиШПЗ.ДвижениеПриходВыполнить();
Иначе
Конт.Регистр.ОстаткиШПЗ.ДвижениеРасходВыполнить();
КонецЕсли;
КонецЦикла; // по строкам документа
Ну, и допиши отчет Остатки ТМЦ или Ведомость ТМЦ с учетом адреса.
Можно еще несколько проще... в карточку товара периодический реквизит и там хранить тот же адрес...
Это как удобно и исходя из специфики...
+ не забудь каку нить обработку по изменению места товара... тоже вещь нужная, чтоб склад вовремя подавал данные на смену места...
Это как удобно и исходя из специфики...
+ не забудь каку нить обработку по изменению места товара... тоже вещь нужная, чтоб склад вовремя подавал данные на смену места...
Могу предложить еще один вариант. Наверное с самыми незначительными и простыми переделками типовой.
Увеличить количество уровней для спр Склад, продумать и завести иерархию складов. (пример Склад1\Ряд2\Полка32, где Полка32 - элемент. Склад1, Ряд2 - группы) При этом возможно делать отчеты как по группе, так и по элементу. Для этого проверить/поменять "условия" в отчетах для складов "=" на "в".
Увеличить количество уровней для спр Склад, продумать и завести иерархию складов. (пример Склад1\Ряд2\Полка32, где Полка32 - элемент. Склад1, Ряд2 - группы) При этом возможно делать отчеты как по группе, так и по элементу. Для этого проверить/поменять "условия" в отчетах для складов "=" на "в".
Вакансии
Аналитик 1С / Бизнес-аналитик
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)