Как в форму выбора выводить только позиции с положительным количеством ?
Исходник:
// Осуществляет вывод остатков и цены в форме подбора, используется в документе ЧекККМ,
// Вызывается из формы регистрации продаж при ручном подборе.
// Отбор остатков по складу из которого ведется продажа кассиром, цены согласно установленного типа цен в параметрах склада.
Процедура СправочникСписокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
Если Не ДанныеСтроки.Ссылка.ЭтоГруппа Тогда
Остатки = РегистрыНакопления.ТоварыВРознице;
Цены = РегистрыСведений.ЦеныАТТ;
Фильтр = Новый Структура;
Фильтр.Вставить("Номенклатура",ДанныеСтроки.Ссылка);
Фильтр.Вставить("Склад", УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ОсновнойСклад"));
ТабОстатков = Остатки.Остатки(ТекущаяДата(),Фильтр,
"Номенклатура,Склад", "Количество");
ТабЦены = Цены.СрезПоследних(ТекущаяДата(), Фильтр);
Попытка
ОформлениеСтроки.Ячейки.Остаток.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.Остаток.Текст = ТабОстатков[0].Количество;
Исключение
КонецПопытки;
Попытка
ОформлениеСтроки.Ячейки.Цена.ОтображатьТекст = Истина;
ОформлениеСтроки.Ячейки.Цена.Текст = ТабЦены[0].Цена;
Исключение
КонецПопытки;
КонецЕсли;
КонецПроцедуры
! | Правила, п.3,12 |
А как скопировать уже имеющуюся форму "Подбор" из документа "ЧекККМ" ?
Ее функции, перенесенные в "ФормуРегистрацииПродаж", полностью удовлетворили бы мои потребности.
В модуле "Документ ЧекККМ" процедура прописана так:
// Процедура вызывается при нажатии кнопки "Подбор" командной панели
// табличного поля "Товары", вызывает сервисный механизм для
// подбора номеклатуры в табличную часть "Товары".
//
Процедура КоманднаяПанельТоварыДействиеПодбор(Кнопка)
ДействиеПодбор(Товары);
КонецПроцедуры // КоманднаяПанельТоварыДействиеПодбор()
есть там путь: Попробуйте F12 или "перейти к определению" стоя на тексте "ДействиеПодбор" по-идее достаточно только вызов подбора сделать, а обработка уже есть там
Ура! Получилось!
Заменил обработку "Подбор" в модуле "Регистрация розничных продаж" и скопировал сюда же необходимые процедуры, нарисовал кнопку на панели и все заработало.
Я програмизд!
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua