106
ОбъектСотрудник.Наименование =
ФизическоеЛицо.Наименование;
ОбъектСотрудник.ФизическоеЛицо = ФизическоеЛицо;
ОбъектСотрудник.Должность = Должность;
ОбъектСотрудник.ВидЗанятости = ВидЗанятости;
ОбъектСотрудник.ГрафикРаботы = ГрафикРаботы;
ОбъектСотрудник.ДатаПринятия = Дата;
ОбъектСотрудник.Записать();
КонецЕсли;
КонецПроцедуры
Процедура ОбработкаУдаленияПроведения(Отказ)
Сотрудник =
Справочники.Сотрудники.НайтиПоНаименованию(ФизическоеЛицо.
Наименование);
Если Сотрудник.ДатаУвольнения = Дата(1,1,1) Тогда
ОбъектСотрудник = Сотрудник.ПолучитьОбъект();
ОбъектСотрудник.Удалить();
Иначе
Сообщить("Данный сотрудник уволен,отмена проведения
невозможна!");
КонецЕсли; АААААААААААААААААААААААААААААААА
КонецПроцедуры
&НаКлиенте
Процедура ПодразделениеПриИзменении(Элемент)
ПодразделениеПриИзмененииНаСервере();
КонецПроцедуры
&НаСервере
Процедура ПодразделениеПриИзмененииНаСервере()
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ЗаработнаяПлатаСрезПоследних.Сумма
|ИЗ
| РегистрСведений.ЗаработнаяПлата.СрезПоследних КАК
ЗаработнаяПлатаСрезПоследних
|ГДЕ
| ЗаработнаяПлатаСрезПоследних.Должность = &Должность";
Запрос.УстановитьПараметр("Должность", Объект.Должность);
РезультатЗапроса = Запрос.Выполнить().Выгрузить();
Если РезультатЗапроса.Количество()<>0 Тогда
Если Объект.ВидЗанятости =
Перечисления.ВидЗанятости.ОсновноеМестоРаботы Тогда
Объект.Оклад = РезультатЗапроса[0].Сумма;
Иначе
Объект.Оклад = РезультатЗапроса[0].Сумма/2;
КонецЕсли;
107
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ВидЗанятостиПриИзменении(Элемент)
ПодразделениеПриИзмененииНаСервере();
КонецПроцедуры
Процедура ОбработкаПроведения(Отказ, Режим)
Если Сотрудник.Должность <> Должность Тогда
Отказ = Истина;
Сообщить("Данный сотрудник не работает по специальности:
" + Должность); АААААААААААААААААААААААААААААААА
КонецЕсли;
Если НЕ Отказ Тогда
ОбъектСотрудник = Сотрудник.ПолучитьОбъект();
ОбъектСотрудник.ДатаУвольнения = Дата;
ОбъектСотрудник.Записать();
Движения.СведенияОСотрудниках.Записывать = Истина;
Движение = Движения.СведенияОСотрудниках.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Сотрудники = Сотрудник;
Движение.Должность = Должность;
Движение.ВидЗанятости = ВидЗанятости;
Движение.Зарплата = Оклад;
КонецЕсли; АААААААААААААААААААААААААААААААА
КонецПроцедуры
Процедура ОбработкаУдаленияПроведения(Отказ)
ОбъектСотрудник = Сотрудник.ПолучитьОбъект();
ОбъектСотрудник.ДатаУвольнения = Дата(1,1,1);
ОбъектСотрудник.Записать();
КонецПроцедуры
&НаКлиенте АААААААААААААААААААААААААААААААА
Процедура СотрудникПриИзменении(Элемент)
СотрудникПриИзмененииНаСервере();
КонецПроцедуры
&НаСервере
Процедура СотрудникПриИзмененииНаСервере()
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ЗаработнаяПлатаСрезПоследних.Сумма
|ИЗ
| РегистрСведений.ЗаработнаяПлата.СрезПоследних(&Дата,
Должность = &Должность) КАК ЗаработнаяПлатаСрезПоследних";
Запрос.УстановитьПараметр("Дата", объект.Дата);
Запрос.УстановитьПараметр("Должность",Объект.Должность);
108
Цена = Запрос.Выполнить().Выгрузить();
Если Цена.Количество()<>0 Тогда
Объект.Оклад = Цена[0].Сумма;
КонецЕсли;
Объект.Должность = Объект.Сотрудник.Должность;
Объект.ВидЗанятости = Объект.Сотрудник.ВидЗанятости;
КонецПроцедуры
Процедура ОбработкаПроведения(Отказ, Режим)
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| НачисленияСотрудникамОбороты.Регистратор
|ИЗ
| АААААААААААААААААААААААААААААААА
РегистрНакопления.НачисленияСотрудникам.Обороты(, ,
Регистратор, ) КАК НачисленияСотрудникамОбороты
|ГДЕ
|
МЕСЯЦ(НачисленияСотрудникамОбороты.Регистратор.Дата) =
&Месяц
| И
ГОД(НачисленияСотрудникамОбороты.Регистратор.Дата) =
&Год";
Запрос.УстановитьПараметр("Месяц", Месяц(Дата));
Запрос.УстановитьПараметр("Год", Год(Дата));
РезультатЗапроса = Запрос.Выполнить().Выгрузить();
Если РезультатЗапроса.Количество()<>0 Тогда
Отказ = Истина;
Сообщить("В этом месяце заработная плата уже
начислялалась!");
КонецЕсли;
Если не Отказ Тогда
Движения.НачисленияСотрудникам.Записывать = Истина;
Запрос = Новый Запрос;
Запрос.Текст ="ВЫБРАТЬ
| НачислениеЗарплатыСотрудники.НДФЛ,
| НачислениеЗарплатыСотрудники.Результат,
| НачислениеЗарплатыСотрудники.Начисление * 0.22 КАК
ПФР,
109
Приложение 2
Индивидуальный стиль от Темпо Плюс
1
“Сколько же времени мы с вами порой уделяем, чтобы оставаться
неповторимыми и стильными! Не только на улице, на работе или на прогулке, но
даже в собственном доме. И возникает вполне резонный вопрос: где купить
действительно качественную одежду, трикотаж, аксессуары, белье для мужчин,
женщин и детей, чтобы не переплачивать, но в то же время быть уверенными в
собственном выборе? Если вы тоже задаетесь данным вопросом, у нас есть
правильный ответ – в Темпо Плюс.
Темпо Плюс – это 20 лет опыта работы с ведущими итальянскими
брендами: Amarea, Jolidon, Sielei, Navigare, Nottingham, VingiRicami и другими.
Если хотите получить качественную продукцию и не переплачивать – самое
время обратиться к нам!
Именно здесь вашему вниманию предоставляется по-настоящему
широкий ассортимент:
· Домашние костюмы, халаты, пижамы, нижнее белье;
· Майки и футболки;
· Купальники, пляжные аксессуары;
· Домашний текстиль и многое другое.
Только первоклассная продукция для женщин, мужчин и детей.
Сертифицированное качество, эксклюзивный дизайн, привлекательные цены для
покупателей – все это точно не оставит вас равнодушными. А благодаря удобной
системе фильтров на сайте вы сможете в считанные минуты найти именно то,
что вам нужно. Никаких больше походов по магазинам и назойливых
консультантов. Делать покупки в Темпо Плюс удобно и комфортно. Плюс мы
готовы отправить ваш заказа в любую точку России, чтобы избавить вас от
лишних хлопот.
Мы не просто предоставляем большой выбор, но и делаем это со всем
профессионализмом:
· Качественные оригинальные фотографии моделей;
1
http://www.tempo-plus.ru/, Ваш индивидуальный стиль от Темпо Плюс!
110
· Детальное описание и характеристики;
· Квалифицированная помощь в выборе размера;
· Реальные отзывы наших покупателей.
И еще одно! Мы проработали удобную схему работы для оптовых
клиентов, благодаря которой сотрудничество с Темпо Плюс становится еще
выгоднее и привлекательнее”.
111
Приложение 3
Взаимодействие системы с окружающей средой описывается в
терминах
112
Приложение 4