ПРЕМІЯ СУМОЮ

ВР ПреміяСум_2 є самовитесняющімся Включений до групи ВР ВсеНачісленія_2 Є провідним по відношенню до ВР НДФЛ_2, ВБанк_2 і Премія 1234 2 (розд 77) Витісняє ВР ПреміяКоеф_2

процедура ПровестіРасчет () / / Процедура модуля ВР ПреміяСум_2

/ / Процедура виконується при проведенні розрахунку з ВР ПреміяСум_2

/ / Має наступний алгоритм:

/ / За значенням реквізиту ЖЗ сторокаДок в документі-батьку шукається запис,

/ / Породила розрахунок, в цьому записі читається значення реквізиту Сума,

/ / Яке і є шуканої величиною премії ДокументПолучитьСтрокуПоНомеру (строкаДок) результат = ДокументСумма

КонецПроцедури / / ПровестіРасчет

7102 ПРЕМІЯ 1234

. ВР Премія1234_2 є самовитесняющімся Включений до групи ВР ВсеНачісленія_2 Є провідним по відношенню до ВР НДФЛ_2, ВБанк_2 і залежним від ВР Оклад_2, ПреміяКоеф_2, ПреміяСум_2 (Розд 77)

процедура ПровестіРасчет () / / Процедура модуля ВР Премія 1234_2 перем ЖЗ, нтп, КТП, прем 1234

/ / Процедура виконується при проведенні розрахунку з ВР Премія1234_2

/ / Обчислюється за такою формулою:

/ / Премія 12342 = (Оклад_2 + ПреміяКоеф_2 + ПреміяСум_2) * К5, де

/ / К5 постійний для всіх співробітників коефіцієнт

/ / Коефіцієнт К5 береться зі списку періодичних констант ЖЗ = СоздатьОбект (ЖурналРасчетовЗарплата_2)

нтп = жзНачалоТекущегоПеріода () КТП = жзКонецТекущегоПеріода () прем 1234 = 0

жзВибратьПеріодПоОбекту (Обєкт, нтп) поки жзПолучітьЗапісь () = 1 цикл

якщо (жзВідРасч = ВідРасчетаОклад_2) або (жзВідРасч = ВідРасчетаПреміяКоеф_2) або (жзВідРасч = ВідРасчетаПреміяСум_2) тоді

прем 1234 = прем 1234 + жзрезультат

КонецЕсли конецЦікла / / Поки

результат = прем1234 * КонстантаК5Получіть (КТП) КонецПроцедури / / ПровестіРасчет

Значення числової константи К5, яка повинна бути періодичною, після її додавання в конфігурацію визначимо, запустивши наступну процедуру:

процедура Виконати () / / Повязана з кнопкою Пуск обробки Проба КонстантаК5Установіть (ТекущаяДата (), 05)

КонецПроцедури / / Виконати

Джерело: Бартеньев О В 1С: Підприємство: програмування для всіх Базові обєкти та розрахунки на одній дискеті М: Діалог-МІФІ, 2005 464 с

Схожі статті:


Сподобалася стаття? Ви можете залишити відгук або підписатися на RSS , щоб автоматично отримувати інформацію про нові статтях.

Коментарів поки що немає.

Ваш отзыв

Поділ на параграфи відбувається автоматично, адреса електронної пошти ніколи не буде опублікований, допустимий HTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

*

*