| И Регистратор = &Ссылка) КАК ДополнительныеНачисленияБазаОсновныеНачисления";
Измерения = Новый Массив;
Измерения. Добавить("Сотрудник");
Измерения. Добавить("Подразделение");
Запрос. УстановитьПараметр("Измерения", Измерения);
Запрос. УстановитьПараметр("Премия", ПланыВидовРасчета. ДополнительныеНачисления. Премия);
Запрос. УстановитьПараметр("Ссылка", Ссылка);
РезультатЗапроса = Запрос. Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса. Выбрать();
Пока ВыборкаДетальныеЗаписи. Следующий() Цикл
Набор[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Размер = ВыборкаДетальныеЗаписи. Размер;
ТЧ[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Размер = ВыборкаДетальныеЗаписи. Размер;
Набор[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Результат = ВыборкаДетальныеЗаписи. Результат;
ТЧ[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Результат = ВыборкаДетальныеЗаписи. Результат;
КонецЦикла;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Процедура ОбработкаПроведения(Отказ, Режим)
// регистр ОсновныеНачисления
Движения. ОсновныеНачисления. Записывать = Истина;
Выборка = СвормироватьВыборкуОсн();
ЗаполнитьНабор(Движения. ОсновныеНачисления, Выборка);
// регистр ДополнительныеНачисления
Движения. ДополнительныеНачисления. Записывать = Истина;
Выборка = СвормироватьВыборкуДоп();
ЗаполнитьНабор(Движения. ДополнительныеНачисления, Выборка);
КонецПроцедуры
Модуль формы:
&НаСервере
Процедура РасчитатьНаСервере()
Док = РеквизитФормыВЗначение("Объект");
Док. Расчитать();
ЗначениеВДанныеФормы(Док, Объект)
КонецПроцедуры
&НаКлиенте
Процедура Расчитать(Команда)
РасчитатьНаСервере();
КонецПроцедуры
&НаСервере
Процедура ЗаполнитьНаСервере()
Запрос = Новый Запрос;
Запрос. Текст =
"ВЫБРАТЬ
| НачальнаяСтавкаСрезПоследних. Период,
| НачальнаяСтавкаСрезПоследних. Сотрудник,
| НачальнаяСтавкаСрезПоследних. Сумма,
| НачальнаяСтавкаСрезПоследних. Подразделение
|ПОМЕСТИТЬ ВТ_Ставки
|ИЗ
| РегистрСведений. НачальнаяСтавка. СрезПоследних(&КонецПредМес, ) КАК НачальнаяСтавкаСрезПоследних
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| НачальнаяСтавка. Период,
| НачальнаяСтавка. Сотрудник,
| НачальнаяСтавка. Сумма,
| НачальнаяСтавка. Подразделение
|ИЗ
| РегистрСведений. НачальнаяСтавка КАК НачальнаяСтавка
|ГДЕ
| НачальнаяСтавка. Период МЕЖДУ &КонецПредМес И &КонецТекМес
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
| ВТ_Ставки. Сотрудник,
| ВТ_Ставки. Сумма,
| ВТ_Ставки. Подразделение,
| ВТ_Ставки. Период КАК Начало,
| ЕСТЬNULL(ДОБАВИТЬКДАТЕ(ВТ_Ставки1.Период, ДЕНЬ, -1), &КонецТекМес) КАК Конец
|ПОМЕСТИТЬ ВТ_Периоды
|ИЗ
| ВТ_Ставки КАК ВТ_Ставки
| ЛЕВОЕ СОЕДИНЕНИЕ ВТ_Ставки КАК ВТ_Ставки1
| ПО ВТ_Ставки. Период < ВТ_Ставки1.Период
| И ВТ_Ставки. Сотрудник = ВТ_Ставки1.Сотрудник
| И ВТ_Ставки. Подразделение = ВТ_Ставки1.Подразделение
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
| ВТ_Периоды. Сотрудник КАК Сотрудник,
| МИНИМУМ(ВТ_Периоды. Сумма) КАК Сумма,
| ВТ_Периоды. Подразделение КАК Подразделение,
| ВТ_Периоды. Начало КАК Начало,
| МИНИМУМ(ВТ_Периоды. Конец) КАК Конец
|ПОМЕСТИТЬ ВТ_ПериодыСгрупп
|ИЗ
| ВТ_Периоды КАК ВТ_Периоды
|
|СГРУППИРОВАТЬ ПО
| ВТ_Периоды. Подразделение,
| ВТ_Периоды. Сотрудник,
| ВТ_Периоды. Начало
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 |
