Всем привет, Помогите пожалуйста с отчетом, не могу разобраться.
1С:Бухгалтерия государственного учреждения
8.3.14
Казахстан
Бухучет
Aнализ&Управление
Программист
Стажер
Всем привет, Помогите пожалуйста с отчетом, не могу разобраться.
ВЫБРАТЬ
ЗаявкаНаРегистрациюГПСделки.Дата КАК Дата,
ЗаявкаНаРегистрациюГПСделки.Номер КАК НомерЗаявки,
ЗаявкаНаРегистрациюГПСделки.Контрагент КАК Контрагент,
ЗаявкаНаРегистрациюГПСделки.ДоговорКонтрагента КАК ДоговорКонтрагента,
ЗаявкаНаРегистрациюГПСделки.Контрагент.БИН КАК КонтрагентБИН,
ЗаявкаНаРегистрациюГПСделки.НомерЗаказа КАК НомерЗаказа,
ЗаявкаНаРегистрациюГПСделки.ОписаниеРасходаПлатежногоДокумента КАК ОписаниеРасходаПлатежногоДокумента,
ЗаявкаНаРегистрациюГПСделки.СуммаДокумента КАК СуммаЗаявки,
ЗаявкаНаРегистрациюГПСделки.Ссылка КАК Ссылка,
ЗаявкаНаРегистрациюГПСделки.Организация КАК Организация,
ЗаявкаНаРегистрациюГПСделки.ФКР.Код КАК ФКРКод,
ЗаявкаНаРегистрациюГПСделки.Специфика КАК Специфика,
ЗаявкаНаРегистрациюГПСделки.ИсточникФинансирования КАК ИсточникФинансирования,
ЗаявкаНаРегистрациюГПСделки.КодПлатныхУслуг КАК КодПлатныхУслуг
ПОМЕСТИТЬ ВТ_Заявки
ИЗ
Документ.ЗаявкаНаРегистрациюГПСделки КАК ЗаявкаНаРегистрациюГПСделки
ГДЕ
ЗаявкаНаРегистрациюГПСделки.Организация = &Организация
И ЗаявкаНаРегистрациюГПСделки.ПометкаУдаления <> ИСТИНА
И ЗаявкаНаРегистрациюГПСделки.Проведен = ИСТИНА
И ЗаявкаНаРегистрациюГПСделки.Дата МЕЖДУ &ДатаНач И &ДатаКон
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
СчетКОплате.СуммаДокумента КАК СуммаСчетКОплате,
СчетКОплате.ДатаОплаты КАК ДатаОплаты,
ВременнаяТаблица.Ссылка КАК Ссылка,
СчетКОплате.Номер КАК НомерСчетКОплате,
СчетКОплате.Организация КАК Организация,
СчетКОплате.ФКР КАК ФКР,
СчетКОплате.Специфика КАК Специфика
ПОМЕСТИТЬ ВТ_СчетКОплате
ИЗ
ВТ_Заявки КАК ВременнаяТаблица
ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетКОплате КАК СчетКОплате
ПО (СчетКОплате.ДокументОснование = ВременнаяТаблица.Ссылка)
ГДЕ
СчетКОплате.Организация = &Организация
И СчетКОплате.ПометкаУдаления <> ИСТИНА
И СчетКОплате.Проведен = ИСТИНА
И СчетКОплате.ДатаОплаты МЕЖДУ &ДатаНач И &ДатаКон
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
ВТ_Заявки.Дата КАК Дата,
ВТ_Заявки.НомерЗаявки КАК НомерЗаявки,
ВТ_Заявки.Контрагент КАК Контрагент,
ВТ_Заявки.ДоговорКонтрагента КАК ДоговорКонтрагента,
ВТ_Заявки.КонтрагентБИН КАК КонтрагентБИН,
ВТ_Заявки.НомерЗаказа КАК НомерЗаказа,
ВТ_Заявки.ОписаниеРасходаПлатежногоДокумента КАК ОписаниеРасходаПлатежногоДокумента,
ВТ_Заявки.СуммаЗаявки КАК СуммаЗаявки,
ВТ_Заявки.Ссылка КАК Ссылка,
ВТ_Заявки.Организация КАК Организация,
ВТ_Заявки.ФКРКод КАК Программа,
ВТ_Заявки.Специфика КАК Специфика,
ВТ_Заявки.ИсточникФинансирования КАК ИсточникФинансирования,
ВТ_Заявки.КодПлатныхУслуг КАК КодПлатныхУслуг,
ЕСТЬNULL(ВТ_СчетКОплате.НомерСчетКОплате, 0) КАК НомерСчетКОплате,
ЕСТЬNULL(ВТ_СчетКОплате.ДатаОплаты, 0) КАК ДатаОплаты,
ЕСТЬNULL(ВТ_СчетКОплате.СуммаСчетКОплате, 0) КАК СуммаСчетКОплате,
ВТ_Заявки.СуммаЗаявки - ЕСТЬNULL(ВТ_СчетКОплате.СуммаСчетКОплате, 0) КАК ОстатокЗаявки
ПОМЕСТИТЬ ВТ_Детали
ИЗ
ВТ_Заявки КАК ВТ_Заявки
ЛЕВОЕ СОЕДИНЕНИЕ ВТ_СчетКОплате КАК ВТ_СчетКОплате
ПО ВТ_Заявки.Ссылка = ВТ_СчетКОплате.Ссылка
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
ВТ_Детали.Программа КАК Программа,
ВТ_Детали.Специфика КАК Специфика,
СУММА(ВТ_Детали.СуммаЗаявки) КАК ИтогоПоСпецифике
ПОМЕСТИТЬ ВТ_ИтогиСпецифика
ИЗ
ВТ_Детали КАК ВТ_Детали
СГРУППИРОВАТЬ ПО
ВТ_Детали.Программа,
ВТ_Детали.Специфика
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
ВТ_Детали.Программа КАК Программа,
СУММА(ВТ_Детали.СуммаЗаявки) КАК ИтогоПоПрограмме
ПОМЕСТИТЬ ВТ_ИтогиПрограмма
ИЗ
ВТ_Детали КАК ВТ_Детали
СГРУППИРОВАТЬ ПО
ВТ_Детали.Программа
;
//////////////////////////////////////////////////////////// ////////////////////
ВЫБРАТЬ
ВТ_Детали.Программа КАК Программа,
ВТ_Детали.Специфика КАК Специфика,
ВТ_Детали.Дата КАК Дата,
ВТ_Детали.НомерЗаявки КАК НомерЗаявки,
ВТ_Детали.ДоговорКонтрагента КАК ДоговорКонтрагента,
ВТ_Детали.КонтрагентБИН КАК КонтрагентБИН,
ВТ_Детали.Контрагент КАК Контрагент,
ВТ_Детали.НомерЗаказа КАК НомерЗаказа,
ВТ_Детали.ОписаниеРасходаПлатежногоДокумента КАК ОписаниеРасходаПлатежногоДокумента,
ВТ_Детали.СуммаЗаявки КАК СуммаЗаявки,
ВТ_Детали.Ссылка КАК Ссылка,
ВТ_Детали.Организация КАК Организация,
ВТ_Детали.ИсточникФинансирования КАК ИсточникФинансирования,
ВТ_Детали.КодПлатныхУслуг КАК КодПлатныхУслуг,
ВТ_Детали.НомерСчетКОплате КАК НомерСчетКОплате,
ВТ_Детали.ДатаОплаты КАК ДатаОплаты,
ВТ_Детали.СуммаСчетКОплате КАК СуммаСчетКОплате,
ВТ_Детали.ОстатокЗаявки КАК ОстатокЗаявки,
ВТ_ИтогиСпецифика.ИтогоПоСпецифике КАК ИтогоПоСпецифике,
ВТ_ИтогиПрограмма.ИтогоПоПрограмме КАК ИтогоПоПрограмме
ИЗ
ВТ_Детали КАК ВТ_Детали
ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ИтогиСпецифика КАК ВТ_ИтогиСпецифика
ПО ВТ_Детали.Программа = ВТ_ИтогиСпецифика.Программа
И ВТ_Детали.Специфика = ВТ_ИтогиСпецифика.Специфика
ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ИтогиПрограмма КАК ВТ_ИтогиПрограмма
ПО ВТ_Детали.Программа = ВТ_ИтогиПрограмма.Программа
УПОРЯДОЧИТЬ ПО ВТ_Детали.Программа, ВТ_Детали.Специфика, ВТ_Детали.Дата
ИТОГИ по
ИтогоПоСпецифике,
ИтогоПоПрограмме
ВыборкаПрограмма = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаПрограмма.Следующий() Цикл
ОбластьПрограммы.Параметры.Программа = ВыборкаПрограмма.Программа;
ТабличныйДокумент.Вывести(ОбластьПрограммы);
ВыборкаСпецифика = ВыборкаПрограмма.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаСпецифика.Следующий() Цикл
ОбластьСпецифика.Параметры.Специфика = ВыборкаСпецифика.Специфика;
ТабличныйДокумент.Вывести(ОбластьСпецифика);
ВыборкаЗаявка = ВыборкаСпецифика.Выбрать();
Пока ВыборкаЗаявка.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Дата = ВыборкаЗаявка.Дата;
ОбластьДетальныхЗаписей.Параметры.НомерЗаявки = ВыборкаЗаявка.НомерЗаявки;
ОбластьДетальныхЗаписей.Параметры.ДоговорКонтрагента = ВыборкаЗаявка.ДоговорКонтрагента;
ОбластьДетальныхЗаписей.Параметры.КонтрагентБИН = ВыборкаЗаявка.КонтрагентБИН;
ОбластьДетальныхЗаписей.Параметры.Контрагент = ВыборкаЗаявка.Контрагент;
ОбластьДетальныхЗаписей.Параметры.НомерЗаказа = ВыборкаЗаявка.НомерЗаказа;
ОбластьДетальныхЗаписей.Параметры.ОписаниеРасходаПлатежногоДокумента = ВыборкаЗаявка.ОписаниеРасходаПлатежногоДокумента;
ОбластьДетальныхЗаписей.Параметры.СуммаЗаявки = ВыборкаЗаявка.СуммаЗаявки;
ОбластьДетальныхЗаписей.Параметры.НомерСчетКОплате = ВыборкаЗаявка.НомерСчетКОплате;
ОбластьДетальныхЗаписей.Параметры.ДатаОплаты = ВыборкаЗаявка.ДатаОплаты;
ОбластьДетальныхЗаписей.Параметры.СуммаСчетКОплате = ВыборкаЗаявка.СуммаСчетКОплате;
ОбластьДетальныхЗаписей.Параметры.ОстатокЗаявки = ВыборкаЗаявка.ОстатокЗаявки;
ТабличныйДокумент.Вывести(ОбластьДетальныхЗаписей);
КонецЦикла;
ОбластьИтогСпецифика.Параметры.Специфика = ВыборкаСпецифика.Специфика;
ОбластьИтогСпецифика.Параметры.ИтогоПоСпецифике = ВыборкаСпецифика.ИтогоПоСпецифике;
ТабличныйДокумент.Вывести(ОбластьИтогСпецифика);
КонецЦикла;
ОбластьИтогПрограмма.Параметры.Программа = ВыборкаПрограмма.Программа;
ОбластьИтогПрограмма.Параметры.ИтогоПоПрограмме = ВыборкаПрограмма.ИтогоПоПрограмме;
ТабличныйДокумент.Вывести(ОбластьИтогПрограмма);
КонецЦикла;
ПоказатьПрикрепленные файлы:


Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот