Как установить курсор на добавленную строку после обработки штрихкодов?

В этой теме 1 ответ, 2 участника, последнее обновление 26 минут назад сделано Odin — Одинэсник.

Просмотр 1 ветки ответов

Автор

Сообщения

26 августа 2026 в 10:13 #38458
Odineski
Участник
&НаСервере
Процедура ПослеОбработкиШтрихкодов(РезультатОбработкиШтрихкода,КэшированныеЗначения) Экспорт

Если РезультатОбработкиШтрихкода.ТребуетсяОбработкаШтрихкода Тогда

Если ТипЗнч(РезультатОбработкиШтрихкода.ИсходныеДанные) = Тип(«Структура») Тогда
ДанныеШтрихкодов = Новый Массив;
ДанныеШтрихкодов.Добавить(РезультатОбработкиШтрихкода.ИсходныеДанные);
Иначе
ДанныеШтрихкодов = РезультатОбработкиШтрихкода.ИсходныеДанные;
КонецЕсли;

ВидыПродукцииИС = Новый Массив(ОбщегоНазначенияИСМПКлиентСерверПовтИсп.УчитываемыеВидыМаркируемойПродукции());

Если ПолучитьФункциональнуюОпцию(«ВестиСведенияДляДекларацийПоАлкогольнойПродукции») Тогда
ВидыПродукцииИС.Добавить(Перечисления.ВидыПродукцииИС.Алкогольная);
КонецЕсли;

ПараметрыЗаполнения = ИнтеграцияИС.ПараметрыЗаполненияТабличнойЧастиТовары(ВидыПродукцииИС);

ПараметрыЗаполнения.ПересчитатьКоличествоЕдиниц = Истина;
ПараметрыЗаполнения.МаркируемаяПродукцияВТЧ = Истина;

//ШтрихкодированиеИС
ДанныеДляОбработки = Неопределено;
ШтрихкодированиеИСПереопределяемый.ПодготовитьДанныеДляОбработкиШтрихкодов(
ЭтотОбъект, ДанныеШтрихкодов, ПараметрыЗаполнения, ДанныеДляОбработки);

//ШтрихкодированиеИС
ШтрихкодированиеИСПереопределяемый.ОбработатьШтрихкоды(
ЭтотОбъект, ДанныеДляОбработки, КэшированныеЗначения);

// Если это не алкогольная продукция, и номенклатура по штрихкоду найдена — добавим ее
Если ДанныеДляОбработки.МассивСтрокСАкцизнымиМарками.Количество() = 0
И ДанныеДляОбработки.ТекущаяСтрока <> Неопределено Тогда

ТекущаяСтрока = Объект.Товары.НайтиПоИдентификатору(ДанныеДляОбработки.ТекущаяСтрока);

Если НЕ ЗначениеЗаполнено(ТекущаяСтрока.СтавкаНДС) Тогда
РезультатОбработкиШтрихкода.ДобавленныеСтроки.Добавить(ТекущаяСтрока);
Иначе
РезультатОбработкиШтрихкода.ИзмененныеСтроки.Добавить(ТекущаяСтрока);
КонецЕсли;

КонецЕсли;

КонецЕсли;

ОбработатьСтрокиТЧ(
РезультатОбработкиШтрихкода.ДобавленныеСтроки,
РезультатОбработкиШтрихкода.ИзмененныеСтроки,
КэшированныеЗначения);

ОбновитьИтоги(ЭтотОбъект);
КонецПроцедуры

26 августа 2026 в 10:14 #38459

Участник

В вашем коде процедуры ПослеОбработкиШтрихкодов происходит обработка результатов сканирования штрихкодов, добавление или изменение строк табличной части, и обновление итогов.

Если ваша задача — после добавления строки (например, после добавления строки в табличную часть Объект.Товары) установить курсор на эту добавленную строку в форме, то нужно сделать это на клиенте, в модуле формы.

В серверном коде (как у вас) нельзя напрямую управлять курсором формы, так как серверная часть не имеет доступа к интерфейсу.

Что делать:

1. В процедуре ПослеОбработкиШтрихкодов на сервере вы формируете и добавляете строки в табличную часть (через РезультатОбработкиШтрихкода.ДобавленныеСтроки).

2. После вызова этой процедуры на клиенте (в модуле формы) нужно получить ссылку на добавленную строку и установить курсор на неё.

—

Пример установки курсора на добавленную строку в модуле формы (клиент):

// Предположим, что после вызова серверной процедуры у вас есть массив добавленных строк
// Например, РезультатОбработкиШтрихкода.ДобавленныеСтроки

Если РезультатОбработкиШтрихкода.ДобавленныеСтроки.Количество() > 0 Тогда
    // Получаем последнюю добавленную строку
    ПоследняяСтрока = РезультатОбработкиШтрихкода.ДобавленныеСтроки[РезультатОбработкиШтрихкода.ДобавленныеСтроки.Количество() - 1];
    
    // Находим индекс этой строки в табличной части
    ИндексСтроки = ЭлементыФормы.Товары.Объект.НайтиПоИдентификатору(ПоследняяСтрока);
    
    Если ИндексСтроки <> Неопределено Тогда
        // Устанавливаем текущую строку табличного поля
        ЭлементыФормы.Товары.ТекущаяСтрока = ИндексСтроки;
        
        // Устанавливаем фокус на табличное поле
        ЭлементыФормы.Товары.УстановитьФокус();
        
        // Опционально: начать редактирование ячейки (например, первый столбец)
        ЭлементыФормы.Товары.РедактироватьЯчейку(ИндексСтроки, 0);
    КонецЕсли;
КонецЕсли;

// Предположим, что после вызова серверной процедуры у вас есть массив добавленных строк

// Например, РезультатОбработкиШтрихкода.ДобавленныеСтроки

Если РезультатОбработкиШтрихкода.ДобавленныеСтроки.Количество() > 0 Тогда

// Получаем последнюю добавленную строку

ПоследняяСтрока = РезультатОбработкиШтрихкода.ДобавленныеСтроки[РезультатОбработкиШтрихкода.ДобавленныеСтроки.Количество() - 1];

// Находим индекс этой строки в табличной части

ИндексСтроки = ЭлементыФормы.Товары.Объект.НайтиПоИдентификатору(ПоследняяСтрока);

Если ИндексСтроки <> Неопределено Тогда

// Устанавливаем текущую строку табличного поля

ЭлементыФормы.Товары.ТекущаяСтрока = ИндексСтроки;

// Устанавливаем фокус на табличное поле

ЭлементыФормы.Товары.УстановитьФокус();

// Опционально: начать редактирование ячейки (например, первый столбец)

ЭлементыФормы.Товары.РедактироватьЯчейку(ИндексСтроки, 0);

КонецЕсли;

—

Ключевые моменты:

— Серверный код только формирует и записывает данные.
— Управление курсором и фокусом — задача клиентского модуля формы.
— Для поиска строки по идентификатору используйте метод НайтиПоИдентификатору.
— Установка текущей строки и фокуса делается через свойства и методы табличного поля формы.

—

Если у вас нет прямого доступа к массиву добавленных строк на клиенте, то можно передавать идентификатор добавленной строки из серверной процедуры в клиентскую через параметры вызова или через структуру результата.

—

Если нужно, могу помочь с примером вызова серверной процедуры из формы и обработкой результата для установки курсора.

Автор

Сообщения

Просмотр 1 ветки ответов

Для ответа в этой теме необходимо авторизоваться.

Вы пропустили

Новый курс «Администратор 1С v4.1»

Автономный сервер 1С — публикация ИБ

Установка PostgreSQL 17 для 1С на Windows server 2022

Как запустить «Сервер 1С» на Ubuntu 24.04 LTS ?