114
ПРИЛОЖЕНИЕ 5
ЛИСТИНГ
ОбщийМодуль
Процедура РассчитатьОклад (Стр) Экспорт
Стр.Оклад = 500000*Стр.Разовый_кф;
КонецПроцедуры
Процедура РассчитатьЗа_отработанное_время (Стр) Экспорт
Стр.За_отработанное_время = Стр.Оклад
*Стр.Кол_отработанных_дней/ Стр.Рабочие_дни_месяца;
КонецПроцедуры
Процедура РассчитатьПремия (Стр) Экспорт
Стр.Премия_сумма = Стр.За_отработанное_время *Стр.Премия/
100;
КонецПроцедуры
Процедура РассчитатьПо_окладу (Стр) Экспорт
Стр.По_окладу = Стр.оклад/ Стр.Раб_дней * Стр.Дни_рабочие;
КонецПроцедуры
Докумет Расчет_больничного
&НаКлиенте
Процедура Пособие_за_первые_12_кол_днейПриИзменении()
// Вставить содержимое обработчика.
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;
КонецПроцедуры
&НаКлиенте
Процедура Среднедневной_фактический_заработокПриИзменении()
// Вставить содержимое обработчика.
Объект.Пособие_за_оставшиеся_дни = Объект._100_*
Объект.Среднедневной_фактический_заработок ;
Объект.Пособие_за_первые_12_кол_дней=
Объект._80_*Объект.Среднедневной_фактический_заработок * 80
/100 ;
Объект.Сумма_пособия_к_выплате=
Объект.Пособие_за_первые_12_кол_дней+
Объект.Пособие_за_оставшиеся_дни;