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