По теме из базы знаний
- Быстрый поиск дублей в 1С с четким/нечетким поиском по любому сочетанию реквизитов/реквизитов таб. частей с отбором и быстрой заменой значений в ЛЮБЫХ базах 8.1-8.3 (УТ 10.3, БП 2, ЗУП 2.5, КА 1.1, УТ 11, БП 3, УНФ 1.6/3.0, КА 2, ЗУП 3 и т.д.)
- Обмен между 1С и другими системами в формате YML (OZON, Wildberries, Яндекс Маркет, СберМегаМаркет, Юла, Леруа и др.)
- Автоматическое заполнение статистической формы учета перемещения товаров при ЭКСПОРТЕ (ФТС) в государства ЕАЭС (Беларусь, Казахстан, Армения и Кыргызская Республика)
- Универсальный отчет для сравнения записей регистров накопления между базами по COM-соединению, для обычных форм
- Глобальное меню разработчика для управляемых форм
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) как-то так
тут главная фишка в ПолучитьСписокНужнойНоменклатуры()
СписокНомеклатуры = ПолучитьСписокНужнойНоменклатуры();
ПараметрыОтбора = Новый Структура("Ссылка",СписокНомеклатуры);
ПараметрыФормы = Новый Структура("Отбор",ПараметрыОтбора);
ОткрытьФорму("Справочник.Номенклатура.ФормаВыбора",ПараметрыФормы);
тут главная фишка в ПолучитьСписокНужнойНоменклатуры()
(3) для обычных форм такого не сделать
вернее можно, но через Ж...сначала выбрать, потом проверить входит ли выбранное значение в разрешенный список и если не входит отменить выбор
но это ИМХО сложнее и неудобно для пользователя, нежели открыть форму подбора с наложенным отбором и в ней тот же самый ввод по наименованию или коду сделать
вернее можно, но через Ж...сначала выбрать, потом проверить входит ли выбранное значение в разрешенный список и если не входит отменить выбор
но это ИМХО сложнее и неудобно для пользователя, нежели открыть форму подбора с наложенным отбором и в ней тот же самый ввод по наименованию или коду сделать
(1)
Процедура СтрокаПоискаПриИзменении(Элемент)
Если ПустаяСтрока(СтрокаПоиска) Тогда
Отбор.Ссылка.Использование = Ложь;
Возврат;
КонецЕсли;
Запрос=Новый Запрос;
Запрос.УстановитьПараметр("СтрокаПоиска","%"+СтрЗаменить(СтрокаПоиска," ","%")+"%");
Запрос.Текст="ВЫБРАТЬ
| Контрагенты.Ссылка
|ИЗ
| Справочник.Контрагенты КАК Контрагенты
|ГДЕ
| (Контрагенты.Наименование ПОДОБНО &СтрокаПоиска
| ИЛИ Контрагенты.ИНН ПОДОБНО &СтрокаПоиска
| ИЛИ Контрагенты.УчетныйНомер ПОДОБНО &СтрокаПоиска)";
ТЗ=Запрос.Выполнить().Выгрузить();
СписокКонтрагентов=Новый СписокЗначений;
СписокКонтрагентов.ЗагрузитьЗначения(ТЗ.ВыгрузитьКолонку("Ссылка")) ;
Если СписокКонтрагентов.Количество()<>0 Тогда
Отбор.Ссылка.ВидСравнения = ВидСравнения.ВСписке;
Отбор.Ссылка.Значение = СписокКонтрагентов;
Отбор.Ссылка.Использование = Истина;
КонецЕсли;
КонецПроцедуры
ПоказатьПрикрепленные файлы:

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот