115
КонецПроцедуры
&НаКлиенте
Процедура ИтогКол_днейПриИзменении1()
// Вставить содержимое обработчика.
Объект.Среднедневной_фактический_заработок=
Объект.расчет_больничного1.Итог("Начислено")/Объект.ИтогКол
_дней;
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;
КонецПроцедуры
&НаКлиенте
Процедура Пособие_за_оставшиеся_дниПриИзменении()
// Вставить содержимое обработчика.
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;
КонецПроцедуры
&НаКлиенте
Процедура Сумма_пособия_к_выплатеПриИзменении()
// Вставить содержимое обработчика.
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;
КонецПроцедуры
&НаКлиенте
Процедура Кол_дней_болезниПриИзменении()
// Вставить содержимое обработчика.
116
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;
Объект.Кол_дней_болезни =
(Объект.Период_нетрудоспособности_ПО-
Объект.Период_нетрудоспособности_С)/86400;
Если Объект.Кол_дней_болезни <12 Тогда
Объект._80_= Объект.Кол_дней_болезни
Иначе
Объект._80_= 12
Конецесли;
Объект._100_=Объект.Кол_дней_болезни -Объект._80_
КонецПроцедуры
&НаКлиенте
Процедура Период_нетрудоспособности_ПОПриИзменении()
// Вставить содержимое обработчика.
Объект.Кол_дней_болезни =
(Объект.Период_нетрудоспособности_ПО-
Объект.Период_нетрудоспособности_С)/86400;
Если Объект.Кол_дней_болезни <12 Тогда
Объект._80_= Объект.Кол_дней_болезни
Иначе
Объект._80_= 12
Конецесли;
Объект._100_=Объект.Кол_дней_болезни -Объект._80_
КонецПроцедуры
&НаКлиенте
Процедура _80_ПриИзменении()
// Вставить содержимое обработчика.
Объект.Кол_дней_болезни =
(Объект.Период_нетрудоспособности_ПО-
Объект.Период_нетрудоспособности_С)/86400;
Если Объект.Кол_дней_болезни <12 Тогда
Объект._80_= Объект.Кол_дней_болезни
Иначе
Объект._80_= 12
Конецесли;
Объект._100_=Объект.Кол_дней_болезни -Объект._80_
КонецПроцедуры
117
&НаКлиенте
Процедура _100_ПриИзменении(Элемент)
// Вставить содержимое обработчика.
Объект._100_=Объект.Кол_дней_болезни -Объект._80_
КонецПроцедуры
Документ Табель учета рабочего времени
&НаКлиенте
Процедура НачисленноРазовый_кфПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
Оклад.РассчитатьОклад(Стр);
КонецПроцедуры
&НаКлиенте
Процедура НачисленноОкладПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
За_отработанное_время.РассчитатьЗа_отработанное_время(С
тр);
КонецПроцедуры
&НаКлиенте
Процедура НачисленноРабочие_дни_месяцаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
За_отработанное_время.РассчитатьЗа_отработанное_время(С
тр);
КонецПроцедуры
&НаКлиенте
Процедура
НачисленноКол_отработанных_днейПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
За_отработанное_время.РассчитатьЗа_отработанное_время(С
тр);
КонецПроцедуры
&НаКлиенте
Процедура
НачисленноЗа_отработанное_времяПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
Премия.РассчитатьПремия(Стр);
Всего.РассчитатьВсего(Стр);
КонецПроцедуры
&НаКлиенте
Процедура НачисленноПремияПриИзменении(Элемент)
118
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
Премия.РассчитатьПремия(Стр);
Всего.РассчитатьВсего(Стр);
КонецПроцедуры
&НаКлиенте
Процедура НачисленноДоплата_1ПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
Всего.РассчитатьВсего(Стр);
КонецПроцедуры
&НаКлиенте
Процедура НачисленноДоплата_2ПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр= Элементы.Начисленно.ТекущиеДанные;
Всего.РассчитатьВсего(Стр);
КонецПроцедуры
Документ Расчет_отпуска
&НаКлиенте
Процедура Расчет_отпускаНачисленоПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр = Элементы.Расчет_отпуска_1.ТекущиеДанные;
Стр.Сумма = Стр.Начислено * Стр.кф;
КонецПроцедуры
&НаКлиенте
Процедура Расчет_отпускакфПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр = Элементы.Расчет_отпуска_1.ТекущиеДанные;
Стр.Сумма = Стр.Начислено * Стр.кф;
КонецПроцедуры
&НаКлиенте
Процедура Отработанные_количество_месяцевПриИзменении1()
// Вставить содержимое обработчика.
Объект.Среднедневная_ЗП=
Объект.Расчет_отпуска_1.Итог("Сумма")/
Объект.Отработанные_количество_месяцев /(297/10);
Объект.Сумма_отпуска= Объект.Среднедневная_ЗП*
Объект.Кол_дней;
КонецПроцедуры
&НаКлиенте
Процедура Среднедневная_ЗППриИзменении1()
// Вставить содержимое обработчика.
Объект.Сумма_отпуска= Объект.Среднедневная_ЗП*
Объект.Кол_дней;
119
Объект.Сумма_отпуска= Объект.Среднедневная_ЗП*
Объект.Кол_дней;
КонецПроцедуры
&НаКлиенте
Процедура Кол_днейПриИзменении1()
// Вставить содержимое обработчика.
Объект.Сумма_отпуска= Объект.Среднедневная_ЗП*
Объект.Кол_дней;
Объект.Кол_дней = (Объект.Дни_отпуска_по-
Объект.Дни_отпуска_с)/86400;
КонецПроцедуры
&НаКлиенте
Процедура Дни_отпуска_поПриИзменении()
// Вставить содержимое обработчика.
Объект.Кол_дней = (Объект.Дни_отпуска_по-
Объект.Дни_отпуска_с)/86400;
КонецПроцедуры
Документ Начисление_зарплаты
&НаКлиенте
Процедура Начисление1По_окладуПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней *
Стр1.Дни_рабочие;
Стр1.Премия = Стр1.По_окладу * Стр1.Процент_премии/100;
Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+ Стр1.Надбавка;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1Процент_премииПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.Премия = Стр1.По_окладу * Стр1.Процент_премии/100;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней
*Стр1.Дни_рабочие;
Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+ Стр1.Надбавка;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1ПремияПриИзменении(Элемент)
120
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+ Стр1.Надбавка;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней
*Стр1.Дни_рабочие;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1НадбавкаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1= Элементы. Начисление1.ТекущиеДанные;
Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+ Стр1.Надбавка;
Стр1.По_окладу = Стр1.Оклад/ Стр1.Раб_дней
*Стр1.Дни_рабочие;
КонецПроцедуры
&НаКлиенте
Процедура УдержаноПФПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма = Стр2.ПФ+Стр2.ПН+Стр2.Удерж_прочие;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
//
Стр2.ПФ=Стр1.Сумма+Стр3.Тек_отпуск*Константы.СтавкаПФ.Получ
ить()/100;
КонецПроцедуры
&НаКлиенте
Процедура УдержаноПНПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма = Стр2.ПФ+Стр2.ПН+Стр2.Удерж_прочие;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
121
КонецПроцедуры
&НаКлиенте
Процедура УдержаноУдерж_прочиеПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма = Стр2.ПФ+Стр2.ПН+Стр2.Удерж_прочие;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
КонецПроцедуры
&НаКлиенте
Процедура Начисление2Берем_отпПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3= Элементы.Начисление2.ТекущиеДанные;
Стр3.Сумма = Стр3.Берем_отп+Стр3.БЛ+Стр3.Тек_отпуск;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
КонецПроцедуры
&НаКлиенте
Процедура Начисление2БЛПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр3.Сумма = Стр3.Берем_отп+Стр3.БЛ+Стр3.Тек_отпуск;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
КонецПроцедуры
&НаКлиенте
Процедура Начисление2Тек_отпускПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр3.Сумма = Стр3.Берем_отп+Стр3.БЛ+Стр3.Тек_отпуск;
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
КонецПроцедуры
&НаКлиенте
Процедура УдержаноСуммаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
122
Стр2 = Элементы.Удержано.ТекущиеДанные;
//Стр1.Премия = Стр1.По_окладу *
Стр1.Процент_премии/100;
// Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней
*Стр1.Дни_рабочие;
// Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+
Стр1.Надбавка;
// Стр2.Сумма = Стр2.ПФ+Стр2.ПН+Стр2.Удерж_прочие;
// Стр3.Сумма = Стр3.Берем_отп+Стр3.БЛ+Стр3.Тек_отпуск;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1окладПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней *
Стр1.Дни_рабочие;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1Дни_рабочиеПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней *
Стр1.Дни_рабочие;
КонецПроцедуры
&НаКлиенте
Процедура Начисление1Раб_днейПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр1 = Элементы. Начисление1.ТекущиеДанные;
Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней *
Стр1.Дни_рабочие;
КонецПроцедуры
&НаКлиенте
Процедура Начисление2СуммаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
//Стр1.Премия = Стр1.По_окладу *
Стр1.Процент_премии/100;
//Стр1.По_окладу = Стр1.оклад/ Стр1.Раб_дней
*Стр1.Дни_рабочие;
123
//Стр1.Сумма = Стр1.По_окладу + Стр1.Премия+
Стр1.Надбавка;
//Стр2.Сумма = Стр2.ПФ+Стр2.ПН+Стр2.Удерж_прочие;
//Стр3.Сумма = Стр3.Берем_отп+Стр3.БЛ+Стр3.Тек_отпуск;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
// Суммаквыплате.Расчитатьсумму(стр);
КонецПроцедуры
&НаКлиенте
Процедура Начисление1СуммаПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма -
Стр2.Сумма ;
//
Стр2.ПФ=Стр1.Сумма+Стр3.Тек_отпуск*Объект.Константы.СтавкаП
Ф.Получить()/100;
//СпрСотрудники =
Справочники.Количество_детей_и_др_иждивенцев; // или 2
вариант
//СпрСотрудники =
Справочники["Количество_детей_и_др_иждивенцев"];
КонецПроцедуры
&НаКлиенте
Прцедура УдержаноСумма_к_выплатеПриИзменении(Элемент)
// Вставить содержимое обработчика.
Стр3 = Элементы.Начисление2.ТекущиеДанные;
Стр1 = Элементы.Начисление1.ТекущиеДанные;
Стр2 = Элементы.Удержано.ТекущиеДанные;
Стр2.Сумма_к_выплате = Стр1.Сумма + Стр3.Сумма
- Стр2.Сумма ;
КонецПроцедуры