Имеем три колонки КодМодели(1), ВводКода(2),Штрих_код(3)
Нужно организовать переход....
(1) заполняется на основании из справочника
(2) вводиться сканером ( код модели с товара)
(3) вводиться сканером ( код именно этой единицы товара)
Сначала активировать (2) проверить : (1)=(2)
Если это условие верно активировать(3)
По окончании редактирования строки Активировать(2) в следующей строке...
Пока смогла организовать вот так..
Нужно организовать переход....
(1) заполняется на основании из справочника
(2) вводиться сканером ( код модели с товара)
(3) вводиться сканером ( код именно этой единицы товара)
Сначала активировать (2) проверить : (1)=(2)
Если это условие верно активировать(3)
По окончании редактирования строки Активировать(2) в следующей строке...
Пока смогла организовать вот так..
Прикрепленные файлы:
По теме из базы знаний
- Загрузка всех онлайн-чеков с сервиса проверки чеков ФНС (налоговой) – обработка для получения данных о покупках по чекам онлайн-касс с загрузкой в Авансовый отчет
- Поиск по дереву значений рекурсией, методом НайтиСтроки(), с помощью СКД. Вывод результата поиска в отдельную таблицу. Активация строки в дереве значений при выборе в таблице
- Загрузка чеков в 1С из ФНС в документы БП, УНФ, ERP, КА и УТ
- РеСольДо - редактор строк документов
- Удаленная активация и переактивация лицензий 1С
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
А вот и не получается ... Там все для одной колонки. А так чтобы обрабатывались 2 никак.... Мне ж надо сначала ввести во второую, сравнить с первой, пото активировать третью, внести значение и потом активировать опять вторую на следующей строке.... Прошлась по ссылкам. написала и итог. Активирует 2 дает ввести значение, активирует третью и тут же переводит на след строку во вторую колонку. Не могу ввести третье значение.... МОЖЕТ СТАЛКИВАЛСЯ КТО?????
Процедура ОбработкаКода()
ВводКодаМодели=Сокрлп(Штрих_Код);
Если ВводКодаМодели=СокрЛП(КодМодели) тогда
Штрих_Код="";
ВвестиЗначение(Штрих_Код," Введите серийный номер товара","Строка",13);
Иначе
Предупреждение(" Не корректный код модели!!!");
Сигнал();
ШтрихКод="";
ВвестиЗначение(Штрих_Код," Введите корректный код модели","Строка",13);
ОбработкаКода();
КонецЕсли;
КонецПроцедуры
Процедура ПриОкончанииРедактированияСтроки()
Если (НомерСтроки<КоличествоСтрок()) и (Изменен=1) тогда
Если Пров=0 тогда
i=НомерСтроки+1;
АктивизироватьСтроку(i);
Пров=1;
ПослСтрока=i;
Иначе
Если ПослСтрока<>НомерСтроки тогда
Активизировать("Штрих_код",1);
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
ЗА ХОРОШИЕ СОВЕТЫ СПАСИБО!!!!! ОГРОММНОЕ ЧЕЛОВЕЧЕСКОЕ... ВОТ КАК Я СДЕЛАЛА... МОЖЕТ ПОНАДОБИТЬСЯ КОМУ.... И ЕЩЕ!!! ГОСПОДА ЗДЕСЯ ЖИВУЩИЕ НЕ РУГАЙТЕ БЕДНУЮ БЛОНДИНКУ... КАК МОГУ ТАК И ПРОГРАММЛЮ.....
ВводКодаМодели=Сокрлп(Штрих_Код);
Если ВводКодаМодели=СокрЛП(КодМодели) тогда
Штрих_Код="";
ВвестиЗначение(Штрих_Код," Введите серийный номер товара","Строка",13);
Иначе
Предупреждение(" Не корректный код модели!!!");
Сигнал();
ШтрихКод="";
ВвестиЗначение(Штрих_Код," Введите корректный код модели","Строка",13);
ОбработкаКода();
КонецЕсли;
КонецПроцедуры
Процедура ПриОкончанииРедактированияСтроки()
Если (НомерСтроки<КоличествоСтрок()) и (Изменен=1) тогда
Если Пров=0 тогда
i=НомерСтроки+1;
АктивизироватьСтроку(i);
Пров=1;
ПослСтрока=i;
Иначе
Если ПослСтрока<>НомерСтроки тогда
Активизировать("Штрих_код",1);
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
ЗА ХОРОШИЕ СОВЕТЫ СПАСИБО!!!!! ОГРОММНОЕ ЧЕЛОВЕЧЕСКОЕ... ВОТ КАК Я СДЕЛАЛА... МОЖЕТ ПОНАДОБИТЬСЯ КОМУ.... И ЕЩЕ!!! ГОСПОДА ЗДЕСЯ ЖИВУЩИЕ НЕ РУГАЙТЕ БЕДНУЮ БЛОНДИНКУ... КАК МОГУ ТАК И ПРОГРАММЛЮ.....
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот