tify"> Інакше
ПроцентОплачено=ОбщийМодуль.ПолучитьПроцент(ТекСтрокаВыработка.ЗонаОбслуживания.ПроцентОплачен, Дата);
ПроцентНеОплачено=ОбщийМодуль.ПолучитьПроцент(ТекСтрокаВыработка.ЗонаОбслуживания.ПроцентНеОплачен, Дата);
Якщо НЕ ТекСтрокаВиработка.ВідАкта.НеЗавісітОтОплати Тоді
Двіженіе.СуммаАкта=Ціна * ТекСтрокаВиработка.Часи;
Двіженіе.СуммаВЗарплату=(((Цена*ТекСтрокаВыработка.Часы)-ТекСтрокаВыработка.Оплачено)*ПроцентНеОплачено)+(ТекСтрокаВыработка.Оплачено*ПроцентОплачено);
Двіженіе1.СуммаАкта=Ціна * ТекСтрокаВиработка.Часи;
Двіженіе1.СуммаВЗарплату=(((Цена*ТекСтрокаВыработка.Часы)-ТекСтрокаВыработка.Оплачено)*ПроцентНеОплачено)+(ТекСтрокаВыработка.Оплачено*ПроцентОплачено);
Інакше
Двіженіе.СуммаВЗарплату=Ціна * ТекСтрокаВиработка.Часи * ПроцентОплачено;
Двіженіе1.СуммаВЗарплату=Ціна * ТекСтрокаВиработка.Часи * ПроцентОплачено;
КонецЕсли;
КонецЕсли;
КонецЦікла;
КонецПроцедури
Додаток 11
Код форми обробки «звіт« Зарплата за місяць »»
amp; НаКліенте
Процедура СформіроватьОтчет (Команда)
СформіроватьОтчетНаСервере ();
КонецПроцедури
amp; НаСервере
Процедура СформіроватьОтчетНаСервере ()
СуммаВЗарплату=0;
Звіт=Новий ТаблічнийДокумент;
ТабДокумент=Новий ТаблічнийДокумент;
Макет=ПолучітьОбщійМакет ( ЗарплатаЗаМесяц );
Шапка=Макет.ПолучітьОбласть ( Шапка );
Рядок=Макет.ПолучітьОбласть ( Рядок );
Підсумки=Макет.ПолучітьОбласть ( Підсумки );
ТабДокумент.Вивесті (Шапка);
ВсегоЧаси=0;
ВсегоСуммаАкта=0;
ВсегоСуммаВЗарплату=0;
ВиборкаДетальниеЗапісі=Справочнки.ЗП_ВидыАктов.Выбрать(,,,laquo;НомерВОтчетеraquo;);
Поки ВиборкаДетальниеЗапісі.Следующій () Цикл
Список=ВибратьАкти (Рядок, Підсумки, ВиборкаДетальниеЗапісі.Ссилка);
Спроба
ТабДокумент.Вивесті (Список [0] .Значеніе);
ТабДокумент.Вивесті (Список [1] ??.Значеніе);
Виняток
КонецПопиткі;
КонецЦікла;
Ітогі.Параметри.Наіменованіе= Разом raquo ;;
Ітогі.Параметри.ВсегоГодинник=ВсегоЧаси;
Ітогі.Параметри.ВсегоСуммаАкта=ВсегоСуммаАкта;
ітогі.Параметри.ВсегоСуммаВЗарплату=ВсегоСуммаВЗарплату;
ТабДокумент.Вивесті (Підсумки);
СуммаВЗарплату=СуммаВЗарплату + ВсегоСуммаВЗарплату;
Шапка=Макет.ПолучітьОбласть ( Шапка2 );
Рядок=Макет.ПолучітьОбласть ( рядок2 );
Підсумки=Макет.ПолучітьОбласть ( Ітогі2 );
ТабДокумент.Вивесті (Шапка);
Відбір=Новий Структура ( Заміщений raquo ;, Брехня);
СуммаІтог=0;
Сертифікати=РегистрыСведений.ЗП_СертификатыСотрудника.СрезПоследних(Объект.КонецПериода,Отбор);
Для кожного СтрокаСертіфікати З Сертифікати Цикл
Строка.Параметры.Заполнить(СтрокаСертификаты);
Строка.Параметри.Сумма=СтрокаСертіфікати.ВідСертіфіката.СуммаНадбавкі;
СуммаІтог=СуммаІтог + СтрокаСертіфікати.ВідСертіфіката.СуммаНадбавкі;
ТабДокумент.Вивесті (Рядок);
КонецЦікла;
Ітогі.Параметри.ВсегоСумма=СуммаІтог;
ТабДокумент.Вивесті (Підсумки);
//Додаємо доплати сумою
Шапка=Макет.ПолучітьОбласть ( Шапка3 );
Рядок=Макет.ПолучітьОбласть ( Строка3 );
ТабДокумент.Вивесті (Шапка);
Доплати=РегистрыНакопления.ЗП_ДоплатыСуммой.Выбрать(НачалоДня(Объект.НачалоПериода),КонецДня(Объект.КонецПериода));
Поки Доплати.Следующій () Цикл
Строка.Параметри.Доплата=Доплати.Доплата;
Строка.Параметри.Сумма=Доплати.Сумма;
СуммаВЗарплату=СуммаВЗарплату + Доплати.С...
