Каталог решений - Кнопка Выбранные ранее сотрудники

1С:Предприятие 8.2 (8.2.13.219) Конфигурация Зарплата и Управление Персоналом, редакция 2.5 (2.5.37.1)

Проблема: при заполнении нескольких документов «ТабельУчетаРабочегоВремениОрганизации» (у нас заполняют по участкам) иногда попадаются ранее выбранные сотрудники (да, при подборе выводится сообщение, но сотрудник попадает в список отбора)

Решение: добавлена кнопка в Справочник.СотрудникиОрганизации.ФормаСписка

Процедура ДействияФормыОтметитьВыбранных(Кнопка)//***************************************
    //Процедура СправочникСписокПриПолученииДанных(Элемент, ОформленияСтрок) = изменить цвет выбранного =
    //Оформление.ЦветТекста = ЦветаСтиля.ЦветПодобранногоЭлемента; На Оформление.ЦветТекста = ЦветаСтиля.ТекстИнформационнойНадписи;
    //Важно: документ сначала надо записать (без проведения)
    Попытка
        Запрос = Новый Запрос;
        Запрос.Текст = "ВЫБРАТЬ РАЗЛИЧНЫЕ
        | ТабельЗаПериод.Сотрудник
        |ИЗ
        | Документ.ТабельУчетаРабочегоВремениОрганизации.ОтработанноеВремяВЦеломЗаПериод КАК ТабельЗаПериод
        |ГДЕ
        | ТабельЗаПериод.Ссылка.Проведен = ИСТИНА
        | И ТабельЗаПериод.Ссылка.ПериодРегистрации = &ДатаНачалаОтбора
        | И ТабельЗаПериод.Ссылка.Организация = &ВыбОрганизация
        |
        |ОБЪЕДИНИТЬ ВСЕ
        |
        |ВЫБРАТЬ РАЗЛИЧНЫЕ
        | ТабельОтработанноеВремя.Сотрудник
        |ИЗ
        | Документ.ТабельУчетаРабочегоВремениОрганизации.ОтработанноеВремя КАК  ТабельОтработанноеВремя
        |ГДЕ
        | ТабельОтработанноеВремя.Ссылка.Проведен = ИСТИНА
        | И ТабельОтработанноеВремя.Ссылка.Организация = &ВыбОрганизация
        | И ТабельОтработанноеВремя.Ссылка.ПериодРегистрации = &ДатаНачалаОтбора"; 
        Запрос.УстановитьПараметр("ВыбОрганизация", КлючУникальности.Организация);
        Запрос.УстановитьПараметр("ДатаНачалаОтбора", НачалоМесяца(КлючУникальности.ДатаНачалаПериода));
        Табл = Запрос.Выполнить().Выгрузить();
        мМассивВыбранныхЗначений = Табл.ВыгрузитьКолонку("Сотрудник");
        ЭлементыФормы.СправочникСписок.ОбновитьСтроки();
        ЭлементыФормы.СправочникСписок.Колонки.Аванс.Видимость = Ложь;
        ЭлементыФормы.СправочникСписок.Колонки.ДатаПриема.Видимость = Ложь;
        ЭлементыФормы.СправочникСписок.Колонки.Состояние.Видимость = Ложь;
    Исключение
    КонецПопытки;
КонецПроцедуры //**********************************************************************

Пустячок, а расчетчику приятно

Люди как-то красиво оформляют строки, у меня тяму не хватает на это…. Так что, извиняйте