Автоматизированная система сервисного центра

  КонецЕсли;

   Если(ТекСтрока.Бренд=Перечисления.Название_бренда.Kaiser или ТекСтрока.Бренд=Перечисления.Название_бренда.LG или

ТекСтрока.Бренд=Перечисления.Название_бренда.Vitek или ТекСтрока.Бренд=Перечисления.Название_бренда.West   

или ТекСтрока.Бренд=Перечисления.Название_бренда.Zanussi)и ( ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Менеджер) Тогда

     ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Гончаренко_С_К;

 

КонецЕсли;

         

 

 

  КонецЦикла;

 

КонецПроцедуры

 

Процедура ИзделиеПриИзменении(Элемент)

Для каждого ТекСтрока  Из Работа Цикл

Если(ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Инженер) и 

(Изделие=Перечисления.Вид_изделия.Кондиционер  или Изделие=Перечисления.Вид_изделия.Холодильник

или Изделие=Перечисления.Вид_изделия.Телевизор) Тогда

 ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Петренко_А_С;         

 КонецЕсли; 

 Если(ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Инженер)  и 

(Изделие=Перечисления.Вид_изделия.Мобильный_телефон  или Изделие=Перечисления.Вид_изделия.Пылесос

или Изделие=Перечисления.Вид_изделия.СВЧ ) Тогда

 ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Ваномас_Г_П;         

 КонецЕсли; 

  Если(ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Инженер)  и 

(Изделие=Перечисления.Вид_изделия.Стиральная_машина  или Изделие=Перечисления.Вид_изделия.Утюг   

или Изделие=Перечисления.Вид_изделия.Чайник ) Тогда

 ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Юрасов_В_Н; 

 КонецЕсли; 

  Если(ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Инженер)  и 

(Изделие=Перечисления.Вид_изделия.Фен  ) Тогда

 ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Шиповалов_Н_Т;

 КонецЕсли; 

    Если(ТекСтрока.Вид_сотрудника=Перечисления.Вид_сотрудника.Инженер)  и 

(Изделие=Перечисления.Вид_изделия.Утюг ) Тогда

 ТекСтрока.ФИО_сотрудника=Перечисления.Сотрудники.Круглов_В_С; 

 

КонецЕсли; 

  КонецЦикла;

 

КонецПроцедуры

Процедура Кнопка1Нажатие(Элемент)

 

Запрос = Новый Запрос; 

Запрос = Новый Запрос;

  Запрос.Текст ="ВЫБРАТЬ

  | Работа2.Дата КАК Дата,

  |Работа2.Номер,

  | Работа2.Клиент КАК Клиент,

  | Работа2.Изделие           

  |ИЗ

  | Документ.Работа КАК Работа2

  |

  |СГРУППИРОВАТЬ ПО

  | Работа2.Дата,

  | Работа2.Номер,

  | Работа2.Клиент,

  | Работа2.Изделие

  |УПОРЯДОЧИТЬ ПО

              | Клиент

              |АВТОУПОРЯДОЧИВАНИЕ";              

Результат = Запрос.Выполнить();

ТабличноеПоле1 = Результат.Выгрузить();

    ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки(); 

//ЭлементыФормы.ДокументСписок.СоздатьКолонки();

КонецПроцедуры

 

 

Процедура Переключатель1ПриИзменении(Элемент)

Если Переключатель1=0 Тогда

Запрос = Новый Запрос; 

Запрос = Новый Запрос;

  Запрос.Текст ="ВЫБРАТЬ

  | Работа2.Дата КАК Дата,

  |Работа2.Номер,

  | Работа2.Клиент КАК Клиент,

  | Работа2.Изделие           

  |ИЗ

  | Документ.Работа КАК Работа2

  |

  |СГРУППИРОВАТЬ ПО

  | Работа2.Дата,

  | Работа2.Номер,

  | Работа2.Клиент,

  | Работа2.Изделие

  |УПОРЯДОЧИТЬ ПО

              | Клиент

              |АВТОУПОРЯДОЧИВАНИЕ";              

Результат = Запрос.Выполнить();

ТабличноеПоле1 = Результат.Выгрузить();

    ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки(); 

//ЭлементыФормы.ДокументСписок.СоздатьКолонки();

 

 ИначеЕсли Переключатель1=1 Тогда

 Запрос = Новый Запрос;

  Запрос.Текст ="ВЫБРАТЬ

  | Работа2.Дата КАК Дата,

  |Работа2.Номер,

  | Работа2.Клиент КАК Клиент,

  | Работа2.Изделие           

  |ИЗ

  | Документ.Работа КАК Работа2

  |

  |СГРУППИРОВАТЬ ПО

  | Работа2.Дата,

  | Работа2.Номер,

  | Работа2.Клиент,

  | Работа2.Изделие

  |

  |УПОРЯДОЧИТЬ ПО

  | Клиент УБЫВ

  |АВТОУПОРЯДОЧИВАНИЕ";

  Результат = Запрос.Выполнить();

ТабличноеПоле1 = Результат.Выгрузить();

    ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки(); 

//ЭлементыФормы.ДокументСписок.СоздатьКолонки();

 

КонецЕсли;

 

 

КонецПроцедуры

 

 

Процедура Поиск()

ОчиститьПоля();

ПолеВвода1=ЭлементыФормы.ПолеВвода1.Значение;

Запрос = Новый Запрос;

  Запрос.Текст ="ВЫБРАТЬ

| Работа2.Дата КАК Дата,

  |Работа2.Номер,

  | Работа2.Клиент КАК Клиент,

  | Работа2.Изделие

|ИЗ

| Документ.Работа КАК Работа2

|ГДЕ  Работа2.Клиент.Наименование ПОДОБНО ""%" +ПолеВвода1 + "%""";

  Результат = Запрос.Выполнить();

ТабличноеПоле1 = Результат.Выгрузить();

    ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки(); 

КонецПроцедуры

 

   Процедура ОчиститьПоля()

ТекстЗапроса = "";

ТабличноеПоле1.Очистить();   

КонецПроцедуры

 

Процедура ОчиститьНажатие(Элемент)

ОчиститьПоля();

КонецПроцедуры

 

Процедура ПоискНажатие(Элемент)

   Поиск();

КонецПроцедуры

 

Процедура ПолеВвода1ОкончаниеВводаТекста(Элемент, Текст, Значение, СтандартнаяОбработка)

 Поиск();

КонецПроцедуры

 

Процедура Кнопка1Нажатие(Элемент)

 

Запрос = Новый Запрос; 

Запрос.Текст = ТекстЗапроса;               

Результат = Запрос.Выполнить();

ТабличноеПоле1 = Результат.Выгрузить();

    ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки(); 

КонецПроцедуры

 

Процедура ПриОткрытии()   

КонструкторЗапроса = Новый  КонструкторЗапроса;

    КонструкторЗапроса.ОткрытьМодально();

ТекстЗапроса = КонструкторЗапроса.Текст;  

КонецПроцедуры

                  

Процедура ОчиститьПоля()

ТекстЗапроса = "";

ТабличноеПоле1.Очистить();   

КонецПроцедуры

 

Процедура Кнопка2Нажатие(Элемент)

ОчиститьПоля();

КонструкторЗапроса = Новый  КонструкторЗапроса;

КонструкторЗапроса.ОткрытьМодально();

ТекстЗапроса = КонструкторЗапроса.Текст;   

КонецПроцедуры

 

 

Процедура Кнопка3Нажатие(Элемент)   

      ОчиститьПоля();

КонецПроцедуры