Функция ЗапросСписокРабочихМест(РабочееМесто = "",Здание = "",Отдел = "",ИПАдрес = "",Сотрудник = "")
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| РабочиеМеста.Ссылка,
| РабочиеМеста.Здание,
| РабочиеМеста.Отдел,
| СведенияОРабочихМестахСрезПоследних.ИПАдрес,
| СведенияОРабочихМестахСрезПоследних.Сотрудник
|ИЗ
| Справочник.РабочиеМеста КАК РабочиеМеста
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СведенияОРабочихМестах.СрезПоследних(&дата, ) КАК СведенияОРабочихМестахСрезПоследних
| ПО (СведенияОРабочихМестахСрезПоследних.РабочееМесто = РабочиеМеста.Ссылка)
|ГДЕ
| РабочиеМеста.Наименование ПОДОБНО &РабочееМесто
| И РабочиеМеста.Здание.Наименование ПОДОБНО &Здание
| И РабочиеМеста.Отдел.Наименование ПОДОБНО &Отдел
| И СведенияОРабочихМестахСрезПоследних.ИПАдрес ПОДОБНО &ИПАдрес
| И СведенияОРабочихМестахСрезПоследних.Сотрудник.Наименование ПОДОБНО &Сотрудник";
Запрос.УстановитьПараметр("Сотрудник","%"+Сотрудник+"%");
Запрос.УстановитьПараметр("ИПАдрес","%"+ИПАдрес+"%");
Запрос.УстановитьПараметр("Отдел","%"+Отдел+"%");
Запрос.УстановитьПараметр("Здание","%"+Здание+"%");
Запрос.УстановитьПараметр("РабочееМесто", "%"+РабочееМесто+"%");
Запрос.УстановитьПараметр("дата", ТекущаяДата());
Возврат Запрос.Выполнить().Выгрузить();
КонецФункции
Процедура КоманднаяПанель2Добавить(Кнопка)
Справочники.РабочиеМеста.ПолучитьФормуНовогоЭлемента().Открыть();
КонецПроцедуры
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
//Сообщить(ИмяСобытия+" "+Параметр+" "+Источник);
Если ИмяСобытия = "ОбновитьРабочиеМеста" Тогда
ТабличноеПоле2 = ЗапросСписокРабочихМест();
ЭлементыФормы.ТабличноеПоле2.СоздатьКолонки();
КонецЕсли;
КонецПроцедуры
! | Правила, п. 12,13 |