[alexandr_f]

Есть отбор в табличном поле.

Процедура РаботникиОрганизацииПриАктивизацииСтроки(Элемент)
    // Вставить содержимое обработчика.
    ТекущаяСтрока = Элемент.ТекущаяСтрока;
    
    Если ТекущаяСтрока = Неопределено Тогда
        мТекущийСотрудник = Неопределено;
        Возврат;
    КонецЕсли;
    
    // запомним текущего сотрудника
    мТекущийСотрудник = ТекущаяСтрока.СотрудникиОрганизаций.ФизЛицо;
    ЭлементыФормы.ВредныеФакторы.ОтборСтрок.ФизическоеЛицо.Использование = Истина; 
    ЭлементыФормы.ВредныеФакторы.ОтборСтрок.ФизическоеЛицо.ВидСравнения = ВидСравнения.Равно; 
    ЭлементыФормы.ВредныеФакторы.ОтборСтрок.ФизическоеЛицо.Значение = мТекущийСотрудник;

Как теперь перебрать только отобранные строки

[sava1]

Так просто перебрать - ДляКаждого

[alexandr_f]

sava1 @ Сегодня, 8:17 ,
Берет Тока первую

[sava1]

Отбор по равно или сложный?

[alexandr_f]

По мотивам . Нашел ответ

Построитель = Новый ПостроительЗапроса;
    Построитель.ИсточникДанных = Новый ОписаниеИсточникаДанных(ЭтотОбъект.ВредныеФакторы); //Здесь отбор если нужно 
Для Каждого ЭлементОтбора из ЭлементыФормы.ВредныеФакторы.ОтборСтрок Цикл
    Попытка
    ЗаполнитьЗначенияСвойств(Построитель.Отбор.Добавить(ЭлементОтбора.Имя), ЭлементОтбора);
Исключение
    Сообщить(ОписаниеОшибки());
КонецПопытки;
    
КонецЦикла; 
  
Запрос = Построитель.Результат.Выгрузить();
    Для Каждого  Строка ИЗ Запрос  Цикл
    //    ЗапросНабор.УстановитьПараметр("ВредныйФактор",Строка.ВредныйФактор);    
    //    ЗапросНабор.УстановитьПараметр("Физлицо",Строка.СотрудникиОрганизаций.ФизЛицо);             
    //    Результат = ЗапросНабор.Выполнить().Выгрузить();
    //    Включено=ЭлементыФормы.РаботникиОрганизации1.ТекущиеДанные.Включить;
    ////ЕСЛИ Результат.количество()>0 Тогда
    //ПОКА Строка.Следующий()   Цикл
        ЗапросНабор.УстановитьПараметр("ВредныйФактор",Строка.ВредныйФактор);    
        ЗапросНабор.УстановитьПараметр("Физлицо",Строка.СотрудникиОрганизаций.ФизЛицо);             
        Результат = ЗапросНабор.Выполнить().Выгрузить();
        ЕСЛИ Результат.количество()>0 Тогда
            
            Сообщить(Строка.ФизическоеЛицо);
            Сообщить(Строка.ВредныйФактор);
            Строка.ДатаПоследнегоМедосмотра  = Результат[0].ДатаМедосмотра;
            Строка.Следующий= ДобавитьМесяц(Строка.ДатаПоследнегоМедосмотра,Строка.ПериодМесяц);
            Если ГОД(ЭтотОбъект.Период)<ГОД(Строка.Следующий ) Тогда
                Строка.Включить= ЛОЖЬ;
            Иначе 
                Строка.Включить= ИСТИНА; 
            КонецЕсли;     
        Иначе 
            Строка.ДатаПоследнегоМедосмотра  = NULL;
            Строка.Включить= ИСТИНА;
        КонецЕсли;     
    КонецЦикла;

!

Правила: 9

Теперь хотя по строка прошел (проверил отладчиком) но изменений в табличном поле нет

Сообщение отредактировал logist - 25.05.16, 10:23

[sava1]

ПроверитьСтроку() у Табличного поля.

Если Отбор простой - выгрузить в ТЗ, пользовать НайтиСтроки(Отбор)

[Vofka]

alexandr_f,

!

Правила: 5

Скажите, почему вы в описании продублировали название темы, если при создании темы в подсказке и ниже поля ввода написано о том, что туда нужно что-то писать только в случае, если нужно дополнить название темы?

[alexandr_f]

Спасибо. Проблема решена через отбор в массив