Возврат ВыборкаДетальныеЗаписи;        

КонецФункции

Процедура ЗаполнитьНабор(Набор, Выборка)

       Пока Выборка. Следующий() Цикл

               Стр = Набор. Добавить();

               ЗаполнитьЗначенияСвойств(Стр, Выборка);

       КонецЦикла;

КонецПроцедуры

Процедура РасчитатьНабор(Набор, ТЧ)

       Набор. Записать();

       ТЗ = ТЧ. Выгрузить();

       ТЗ. Свернуть("ВидРасчета");

       ТЗ. Колонки. Добавить("Приоритет");

       Для каждого Стр из ТЗ Цикл

               Если Стр. ВидРасчета = ПланыВидовРасчета. ДополнительныеНачисления. Премия Тогда

                       Стр. Приоритет = 2;

               Иначе

                       Стр. Приоритет = 1;

               КонецЕсли;

       КонецЦикла;

       ТЗ. Сортировать("Приоритет");

       Для каждого Стр из ТЗ Цикл

               Если Стр. ВидРасчета = ПланыВидовРасчета. ОсновныеНачисления. Оклад Тогда

                       

НЕ нашли? Не то? Что вы ищете?

                       Запрос = Новый Запрос;

                       Запрос. Текст =

                       "ВЫБРАТЬ

                       |        ОНДанныеГрафика. НомерСтроки,

                       |        ОНДанныеГрафика. Размер * ЕСТЬNULL(ОНДанныеГрафика. ЗначениеФактическийПериодДействия, 0) КАК Результат,

                       |        ОНДанныеГрафика. Сотрудник,

                       |        ОНДанныеГрафика. Бригада,

                       |        ОНДанныеГрафика. Размер

                       |ИЗ

                       |        РегистрРасчета. ОН. ДанныеГрафика(

                       |                        Регистратор = &Ссылка

                       |                                И ВидРасчета = &Оклад) КАК ОНДанныеГрафика";

                       

                       Запрос. УстановитьПараметр("Оклад", ПланыВидовРасчета. ОсновныеНачисления. Оклад);

                       Запрос. УстановитьПараметр("Ссылка", Ссылка);

                       

                       РезультатЗапроса = Запрос. Выполнить();

                       

                       ВыборкаДетальныеЗаписи = РезультатЗапроса. Выбрать();

                       

                       Пока ВыборкаДетальныеЗаписи. Следующий() Цикл

                               Набор[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Размер = ВыборкаДетальныеЗаписи. Размер;

                               ТЧ[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Размер = ВыборкаДетальныеЗаписи. Размер;

                               

                               Набор[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Результат = ВыборкаДетальныеЗаписи. Результат;

                               ТЧ[ВыборкаДетальныеЗаписи. НомерСтроки - 1].Результат = ВыборкаДетальныеЗаписи. Результат;

                       КонецЦикла;

               ИначеЕсли Стр. ВидРасчета = ПланыВидовРасчета. ДополнительныеНачисления. Надбавка Тогда

               

                       Запрос = Новый Запрос;

                       Запрос. Текст =

                       "ВЫБРАТЬ

                       |        ДН. НомерСтроки,

                       |        ДН. Бригада,

                       |        ДН. Сотрудник,

                       |        ДН. Размер,

                       |        ДН. Процент

                       |ПОМЕСТИТЬ ВТ

                       |ИЗ

                       |        РегистрРасчета. ДН КАК ДН

                       |ГДЕ

                       |        ДН. Регистратор = &Регистратор

                       |        И ДН. ВидРасчета = &Надбавка

                       |;

                       |

                       |////////////////////////////////////////////////////////////////////////////////

                       |ВЫБРАТЬ

                       |        ЕСТЬNULL(ПродажиОбороты. СуммаОборот, 0) КАК Размер,

                       |        ВТ. НомерСтроки,

                       |        ВТ. Бригада,

                       |        ВТ. Сотрудник,

                       |        ВТ. Процент КАК Процент,

                       |        ЕСТЬNULL(ПродажиОбороты. СуммаОборот, 0) * ВТ. Процент / 100 КАК Результат

                       |ИЗ

                       |        ВТ КАК ВТ

                       |                ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления. Продажи. Обороты(

                       |                                &НачКвартала,

                       |                                &КонКвартала,

                       |                                ,

                       |                                Бригада В

                       |                                        (ВЫБРАТЬ

                       |                                                ВТ. Бригада

Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9