Имя: Пароль:
1C
1С v8
БГУ Журнал номер 1 Получить остатки
0 lesstat
 
28.09.12
10:36
Добры день, бухгалтера хотят видеть в БГУ 1.0 на 8.2 журнал операций №1 как в бухгалтерии БУ в 7, нашел внешнюю печатку поставил но там нет остатков. Как в запрос прикрутить еще и остатки? С БГУ не знаком вообще и не знаю откуда ноги растут вот код запроса

ВЫБРАТЬ РАЗРЕШЕННЫЕ
   ЕПСБУДвиженияССубконто.Период,
   ЕПСБУДвиженияССубконто.Регистратор,
   ЕПСБУДвиженияССубконто.НомерСтроки,
   ЕПСБУДвиженияССубконто.СчетДт,
   ВЫРАЗИТЬ(ЕПСБУДвиженияССубконто.СубконтоДт1 КАК Справочник.КОСГУ) КАК КОСГУДт,
   ЕПСБУДвиженияССубконто.СубконтоДт1,
   ЕПСБУДвиженияССубконто.ВидСубконтоДт1,
   ЕПСБУДвиженияССубконто.СубконтоДт2,
   ЕПСБУДвиженияССубконто.ВидСубконтоДт2,
   ЕПСБУДвиженияССубконто.СубконтоДт3,
   ЕПСБУДвиженияССубконто.ВидСубконтоДт3,
   ЕПСБУДвиженияССубконто.СубконтоДт4,
   ЕПСБУДвиженияССубконто.ВидСубконтоДт4,
   ЕПСБУДвиженияССубконто.СчетКт,
   ВЫРАЗИТЬ(ЕПСБУДвиженияССубконто.СубконтоКт1 КАК Справочник.КОСГУ) КАК КОСГУКт,
   ЕПСБУДвиженияССубконто.СубконтоКт1,
   ЕПСБУДвиженияССубконто.ВидСубконтоКт1,
   ЕПСБУДвиженияССубконто.СубконтоКт2,
   ЕПСБУДвиженияССубконто.ВидСубконтоКт2,
   ЕПСБУДвиженияССубконто.СубконтоКт3,
   ЕПСБУДвиженияССубконто.ВидСубконтоКт3,
   ЕПСБУДвиженияССубконто.СубконтоКт4,
   ЕПСБУДвиженияССубконто.ВидСубконтоКт4,
   ЕПСБУДвиженияССубконто.КВД,
   ЕПСБУДвиженияССубконто.КБКДт,
   ЕПСБУДвиженияССубконто.КБККт,
   ЕПСБУДвиженияССубконто.Сумма,
   ЕПСБУДвиженияССубконто.Содержание,
   ВЫБОР
       КОГДА ЕПСБУДвиженияССубконто.НомерЖурнала В ИЕРАРХИИ (&НомерЖурнала)
           ТОГДА ИСТИНА
       ИНАЧЕ ЛОЖЬ
   КОНЕЦ КАК ОборотДляГлавнойКниги,
   ВЫБОР
       КОГДА ВыпискаИзЛицевогоСчетаДокументыДвижений.Ссылка ЕСТЬ NULL
           ТОГДА ВЫБОР
                   КОГДА АвансПодотчетномуЛицуДокументыРасходов.Ссылка ЕСТЬ NULL
                       ТОГДА ВЫБОР
                               КОГДА НД_ЛистККСтрокиДокумента.Ссылка ЕСТЬ NULL
                                   ТОГДА ЕПСБУДвиженияССубконто.Регистратор
                               ИНАЧЕ ВЫБОР
                                       КОГДА &НомерЖурнала = &ЖурналНомер1
                                           ТОГДА НД_ЛистККСтрокиДокумента.Ссылка
                                       ИНАЧЕ ЕПСБУДвиженияССубконто.Регистратор
                                   КОНЕЦ
                           КОНЕЦ
                   ИНАЧЕ "Авансовый отчет № " + АвансПодотчетномуЛицуДокументыРасходов.НомерАО
               КОНЕЦ
       ИНАЧЕ ВыпискаИзЛицевогоСчетаДокументыДвижений.Ссылка
   КОНЕЦ КАК Документ,
   ЕПСБУДвиженияССубконто.ВалютаДт,
   ЕПСБУДвиженияССубконто.ВалютаКт,
   ЕПСБУДвиженияССубконто.Баланс,
   ЕПСБУДвиженияССубконто.Учреждение
ПОМЕСТИТЬ ВремДвиженияССубконто
ИЗ
   РегистрБухгалтерии.ЕПСБУ.ДвиженияССубконто(
           НАЧАЛОПЕРИОДА(&НачалоПериода, ДЕНЬ),
           КОНЕЦПЕРИОДА(&КонецПериода, ДЕНЬ),
           Активность
               И Счет.Забалансовый = ЛОЖЬ
               И Счет.НомерЖурнала В ИЕРАРХИИ (&НомерЖурнала) {(Учреждение).*, (Баланс).*, (КВД)},
           ,
           ) КАК ЕПСБУДвиженияССубконто
       ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ РАЗЛИЧНЫЕ
           НД_ЛистККСтрокиДокумента.ДокументКО КАК ДокументКО,
           НД_ЛистККСтрокиДокумента.Ссылка КАК Ссылка
       ИЗ
           Документ.НД_ЛистКК.СтрокиДокумента КАК НД_ЛистККСтрокиДокумента) КАК НД_ЛистККСтрокиДокумента
       ПО ЕПСБУДвиженияССубконто.Регистратор = НД_ЛистККСтрокиДокумента.ДокументКО
       ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ РАЗЛИЧНЫЕ
           ВыпискаИзЛицевогоСчетаДокументыДвижений.ИсполняющийДокумент КАК ИсполняющийДокумент,
           ВыпискаИзЛицевогоСчетаДокументыДвижений.Ссылка КАК Ссылка
       ИЗ
           Документ.ВыпискаИзЛицевогоСчета.ДокументыДвижений КАК ВыпискаИзЛицевогоСчетаДокументыДвижений) КАК ВыпискаИзЛицевогоСчетаДокументыДвижений
       ПО ЕПСБУДвиженияССубконто.Регистратор = ВыпискаИзЛицевогоСчетаДокументыДвижений.ИсполняющийДокумент
       ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ РАЗЛИЧНЫЕ
           АвансПодотчетномуЛицуДокументыРасходов.Документ КАК Документ,
           АвансПодотчетномуЛицуДокументыРасходов.Ссылка КАК Ссылка,
           АвансПодотчетномуЛицуДокументыРасходов.Ссылка.НомерПервичногоДокумента КАК НомерАО
       ИЗ
           Документ.АвансПодотчетномуЛицу.ДокументыРасходов КАК АвансПодотчетномуЛицуДокументыРасходов) КАК АвансПодотчетномуЛицуДокументыРасходов
       ПО ЕПСБУДвиженияССубконто.Регистратор = АвансПодотчетномуЛицуДокументыРасходов.Документ,
   РегистрБухгалтерии.ЕПСБУ.Остатки КАК ЕПСБУОстатки
{ГДЕ
   ЕПСБУДвиженияССубконто.Учреждение.*,
   ЕПСБУДвиженияССубконто.КВД.* КАК КФО,
   ЕПСБУДвиженияССубконто.КБКДт.* КАК КПСДт,
   ЕПСБУДвиженияССубконто.КБККт.* КАК КПСКт,
   ЕПСБУДвиженияССубконто.ВалютаДт.*,
   ЕПСБУДвиженияССубконто.ВалютаКт.*,
   ЕПСБУДвиженияССубконто.Баланс.* КАК ИФО}
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   ВремДвиженияССубконто.Период КАК Период,
   ВремДвиженияССубконто.Регистратор КАК Регистратор,
   ВремДвиженияССубконто.Документ КАК Документ,
   ВремДвиженияССубконто.НомерСтроки КАК НомерСтроки,
   ВремДвиженияССубконто.Содержание КАК Содержание,
   ВремДвиженияССубконто.КБКДт КАК КБКДт,
   ВремДвиженияССубконто.КБККт КАК КБККт,
   ВремДвиженияССубконто.СчетДт КАК СчетДт,
   ВремДвиженияССубконто.СчетКт КАК СчетКт,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт1 = ЗНАЧЕНИЕ(ПланВидовХарактеристик.ВидыСубконтоБюджет.КОСГУ)
           ТОГДА ВремДвиженияССубконто.СубконтоДт1
       ИНАЧЕ ЗНАЧЕНИЕ(Справочник.КОСГУ.ПустаяСсылка)
   КОНЕЦ КАК КОСГУДт,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт1 = ЗНАЧЕНИЕ(ПланВидовХарактеристик.ВидыСубконтоБюджет.КОСГУ)
           ТОГДА ВремДвиженияССубконто.СубконтоКт1
       ИНАЧЕ ЗНАЧЕНИЕ(Справочник.КОСГУ.ПустаяСсылка)
   КОНЕЦ КАК КОСГУКт,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт1 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоДт1
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт2 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоДт2
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт3 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоДт3
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт4 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоДт4
   КОНЕЦ КАК Показатель,
   ВремДвиженияССубконто.Сумма,
   ВремДвиженияССубконто.ОборотДляГлавнойКниги,
   ВремДвиженияССубконто.Сумма КАК СуммаРазвернутая,
   ВремДвиженияССубконто.СчетДт КАК Счет,
   ВремДвиженияССубконто.КБКДт КАК КБК,
   ВремДвиженияССубконто.КВД КАК КВДДт,
   ВремДвиженияССубконто.КВД КАК КВДКт,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт1 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоДт1
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт2 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоДт2
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт3 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоДт3
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт4 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоДт4
   КОНЕЦ КАК Разделитель
ПОМЕСТИТЬ ПредвОбороты
ИЗ
   ВремДвиженияССубконто КАК ВремДвиженияССубконто
ГДЕ
   ВремДвиженияССубконто.СчетДт.НомерЖурнала В ИЕРАРХИИ(&НомерЖурнала)
   И (ВремДвиженияССубконто.СчетКт = ЗНАЧЕНИЕ(ПланСчетов.ЕПСБУ.ПустаяСсылка)
           ИЛИ (НЕ ВремДвиженияССубконто.СчетКт.НомерЖурнала В ИЕРАРХИИ (&НомерЖурнала)))

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
   ВремДвиженияССубконто.Период,
   ВремДвиженияССубконто.Регистратор,
   ВремДвиженияССубконто.Документ,
   ВремДвиженияССубконто.НомерСтроки,
   ВремДвиженияССубконто.Содержание,
   ВремДвиженияССубконто.КБКДт,
   ВремДвиженияССубконто.КБККт,
   ВремДвиженияССубконто.СчетДт,
   ВремДвиженияССубконто.СчетКт,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоДт1 = ЗНАЧЕНИЕ(ПланВидовХарактеристик.ВидыСубконтоБюджет.КОСГУ)
           ТОГДА ВремДвиженияССубконто.СубконтоДт1
       ИНАЧЕ ЗНАЧЕНИЕ(Справочник.КОСГУ.ПустаяСсылка)
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт1 = ЗНАЧЕНИЕ(ПланВидовХарактеристик.ВидыСубконтоБюджет.КОСГУ)
           ТОГДА ВремДвиженияССубконто.СубконтоКт1
       ИНАЧЕ ЗНАЧЕНИЕ(Справочник.КОСГУ.ПустаяСсылка)
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт1 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоКт1
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт2 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоКт2
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт3 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоКт3
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт4 = &ВидСубконтоПоказатель
           ТОГДА ВремДвиженияССубконто.СубконтоКт4
   КОНЕЦ,
   ВремДвиженияССубконто.Сумма,
   ВремДвиженияССубконто.ОборотДляГлавнойКниги,
   -ВремДвиженияССубконто.Сумма,
   ВремДвиженияССубконто.СчетКт,
   ВремДвиженияССубконто.КБККт,
   ВремДвиженияССубконто.КВД,
   ВремДвиженияССубконто.КВД,
   ВЫБОР
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт1 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоКт1
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт2 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоКт2
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт3 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоКт3
       КОГДА ВремДвиженияССубконто.ВидСубконтоКт4 = &ВидСубконтоРазделитель
           ТОГДА ВремДвиженияССубконто.СубконтоКт4
   КОНЕЦ
ИЗ
   ВремДвиженияССубконто КАК ВремДвиженияССубконто
ГДЕ
   ВремДвиженияССубконто.СчетКт.НомерЖурнала В ИЕРАРХИИ(&НомерЖурнала)
;

////////////////////////////////////////////////////////////////////////////////
УНИЧТОЖИТЬ ВремДвиженияССубконто
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   ПредвОбороты.Период,
   ПредвОбороты.Регистратор,
   ПредвОбороты.Документ КАК Документ,
   МИНИМУМ(ПредвОбороты.НомерСтроки) КАК НомерСтроки,
   ВЫБОР
       КОГДА &СворачиватьОднотипныеПроводки
           ТОГДА ""
       ИНАЧЕ ПредвОбороты.Содержание
   КОНЕЦ КАК Содержание,
   МАКСИМУМ(ПредвОбороты.Содержание) КАК СодержаниеДляСвертки,
   ПредвОбороты.КБКДт,
   ПредвОбороты.КБККт,
   ПредвОбороты.СчетДт,
   ПредвОбороты.СчетКт,
   ПредвОбороты.Показатель,
   СУММА(ПредвОбороты.Сумма) КАК Сумма,
   ПредвОбороты.ОборотДляГлавнойКниги,
   СУММА(ПредвОбороты.СуммаРазвернутая) КАК СуммаРазвернутая,
   ПредвОбороты.Счет,
   ПредвОбороты.КБК,
   МИНИМУМ(ПредвОбороты.Содержание) КАК СодержаниеМинимум,
   КорректныеКорреспонденцииСчетов.Комментарий КАК ТиповоеСодержание,
   ПредвОбороты.КВДДт,
   ПредвОбороты.КВДКт,
   ПредвОбороты.КОСГУДт,
   ПредвОбороты.КОСГУКт,
   ПредвОбороты.Разделитель
ПОМЕСТИТЬ Обороты
ИЗ
   ПредвОбороты КАК ПредвОбороты
       ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КорректныеКорреспонденцииСчетов КАК КорректныеКорреспонденцииСчетов
       ПО ПредвОбороты.СчетДт = КорректныеКорреспонденцииСчетов.СчетДт
           И ПредвОбороты.СчетКт = КорректныеКорреспонденцииСчетов.СчетКт
{ГДЕ
   ПредвОбороты.ОборотДляГлавнойКниги}

СГРУППИРОВАТЬ ПО
   ПредвОбороты.Период,
   ПредвОбороты.Регистратор,
   ПредвОбороты.Документ,
   ПредвОбороты.СчетДт,
   ПредвОбороты.СчетКт,
   ПредвОбороты.ОборотДляГлавнойКниги,
   ПредвОбороты.Счет,
   ПредвОбороты.КОСГУДт,
   ПредвОбороты.КОСГУКт,
   ПредвОбороты.Показатель,
   КорректныеКорреспонденцииСчетов.Комментарий,
   ПредвОбороты.КБКДт,
   ПредвОбороты.КБККт,
   ПредвОбороты.КБК,
   ПредвОбороты.КВДДт,
   ПредвОбороты.КВДКт,
   ПредвОбороты.Разделитель,
   ВЫБОР
       КОГДА &СворачиватьОднотипныеПроводки
           ТОГДА ""
       ИНАЧЕ ПредвОбороты.Содержание
   КОНЕЦ
;

////////////////////////////////////////////////////////////////////////////////
УНИЧТОЖИТЬ ПредвОбороты
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   Обороты.Период КАК Период,
   Обороты.Регистратор КАК Регистратор,
   Обороты.Документ КАК Документ,
   Обороты.Документ.Дата КАК ДокументДата,
   Обороты.Документ.Номер КАК ДокументНомер,
   Обороты.Документ.ДатаПервичногоДокумента КАК ДокументДатаПервичногоДокумента,
   Обороты.Документ.НомерПервичногоДокумента КАК ДокументНомерПервичногоДокумента,
   Обороты.Документ.ВидПервичногоДокумента КАК ДокументВидПервичногоДокумента,
   Обороты.НомерСтроки КАК НомерСтроки,
   Обороты.СодержаниеДляСвертки КАК СодержаниеДляСвертки,
   Обороты.Содержание КАК Содержание,
   ВЫБОР
       КОГДА Обороты.СодержаниеДляСвертки <> Обороты.СодержаниеМинимум
           ТОГДА Обороты.ТиповоеСодержание
       ИНАЧЕ Обороты.СодержаниеДляСвертки
   КОНЕЦ КАК СодержаниеОкончательное,
   Обороты.КБКДт КАК КБКДт,
   Обороты.КБККт КАК КБККт,
   Обороты.СчетДт КАК СчетДт,
   Обороты.СчетКт КАК СчетКт,
   Обороты.Показатель,
   Обороты.Разделитель,
   Обороты.Сумма КАК Сумма,
   Обороты.ОборотДляГлавнойКниги КАК ОборотДляГлавнойКниги,
   Обороты.СуммаРазвернутая КАК СуммаРазвернутая,
   Обороты.Счет КАК Счет,
   Обороты.КБК КАК КБК,
   Обороты.СодержаниеМинимум КАК СодержаниеМинимум,
   Обороты.ТиповоеСодержание КАК ТиповоеСодержание,
   Обороты.КВДДт КАК КВДДт,
   Обороты.КВДКт КАК КВДКт,
   Обороты.КОСГУДт,
   Обороты.КОСГУКт
ПОМЕСТИТЬ Оборот
ИЗ
   Обороты КАК Обороты
;

////////////////////////////////////////////////////////////////////////////////
УНИЧТОЖИТЬ Обороты
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ РАЗРЕШЕННЫЕ
   ЕПСБУОстаткиИОбороты.Счет,
   ЕПСБУОстаткиИОбороты.КБК,
   ВЫРАЗИТЬ(ЕПСБУОстаткиИОбороты.Субконто1 КАК Справочник.КОСГУ) КАК КОСГУ,
   ЕПСБУОстаткиИОбороты.КВД,
   ВЫБОР
       КОГДА &ОстаткиВРазрезеПоказателя = ЛОЖЬ
           ТОГДА NULL
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 1
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто1
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 2
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто2
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 3
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто3
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 4
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто4
   КОНЕЦ КАК Показатель,
   ВЫБОР
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 1
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто1
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 2
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто2
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 3
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто3
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 4
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто4
   КОНЕЦ КАК Разделитель,
   " " КАК Содержание,
   СУММА(ЕПСБУОстаткиИОбороты.СуммаНачальныйОстатокДт) КАК СуммаНачальныйОстатокДт,
   СУММА(ЕПСБУОстаткиИОбороты.СуммаНачальныйОстатокКт) КАК СуммаНачальныйОстатокКт,
   СУММА(ЕПСБУОстаткиИОбороты.СуммаКонечныйОстатокДт) КАК СуммаКонечныйОстатокДт,
   СУММА(ЕПСБУОстаткиИОбороты.СуммаКонечныйОстатокКт) КАК СуммаКонечныйОстатокКт
ПОМЕСТИТЬ ВремОстатки
ИЗ
   РегистрБухгалтерии.ЕПСБУ.ОстаткиИОбороты(
           НАЧАЛОПЕРИОДА(&НачалоПериода, ДЕНЬ),
           КОНЕЦПЕРИОДА(&КонецПериода, ДЕНЬ),
           Период,
           ДвиженияИГраницыПериода,
           Счет.Забалансовый = ЛОЖЬ
               И Счет.НомерЖурнала В ИЕРАРХИИ (&НомерЖурнала),
           ,
           {(Баланс).*, (Учреждение).*, (КВД)}) КАК ЕПСБУОстаткиИОбороты
       {ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
           ЕПСБУВидыСубконто.Ссылка КАК Ссылка,
           ЕПСБУВидыСубконто.НомерСтроки КАК НомерСтроки
       ИЗ
           ПланСчетов.ЕПСБУ.ВидыСубконто КАК ЕПСБУВидыСубконто
       ГДЕ
           ЕПСБУВидыСубконто.ВидСубконто = &ВидСубконтоПоказатель) КАК НомераСубконтоПоказателей
       ПО ЕПСБУОстаткиИОбороты.Счет = НомераСубконтоПоказателей.Ссылка}
       {ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
           ЕПСБУВидыСубконто.Ссылка КАК Ссылка,
           ЕПСБУВидыСубконто.НомерСтроки КАК НомерСтроки
       ИЗ
           ПланСчетов.ЕПСБУ.ВидыСубконто КАК ЕПСБУВидыСубконто
       ГДЕ
           ЕПСБУВидыСубконто.ВидСубконто = &ВидСубконтоРазделитель) КАК НомераСубконтоРазделителей
       ПО ЕПСБУОстаткиИОбороты.Счет = НомераСубконтоРазделителей.Ссылка}
{ГДЕ
   (ВЫБОР
           КОГДА НомераСубконтоРазделителей.НомерСтроки = 1
               ТОГДА ЕПСБУОстаткиИОбороты.Субконто1
           КОГДА НомераСубконтоРазделителей.НомерСтроки = 2
               ТОГДА ЕПСБУОстаткиИОбороты.Субконто2
           КОГДА НомераСубконтоРазделителей.НомерСтроки = 3
               ТОГДА ЕПСБУОстаткиИОбороты.Субконто3
           КОГДА НомераСубконтоРазделителей.НомерСтроки = 4
               ТОГДА ЕПСБУОстаткиИОбороты.Субконто4
       КОНЕЦ).* КАК Разделитель}

СГРУППИРОВАТЬ ПО
   ЕПСБУОстаткиИОбороты.Счет,
   ЕПСБУОстаткиИОбороты.КБК,
   ЕПСБУОстаткиИОбороты.КВД,
   ВЫБОР
       КОГДА &ОстаткиВРазрезеПоказателя = ЛОЖЬ
           ТОГДА NULL
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 1
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто1
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 2
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто2
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 3
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто3
       КОГДА НомераСубконтоПоказателей.НомерСтроки = 4
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто4
   КОНЕЦ,
   ВЫРАЗИТЬ(ЕПСБУОстаткиИОбороты.Субконто1 КАК Справочник.КОСГУ),
   ВЫБОР
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 1
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто1
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 2
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто2
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 3
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто3
       КОГДА НомераСубконтоРазделителей.НомерСтроки = 4
           ТОГДА ЕПСБУОстаткиИОбороты.Субконто4
   КОНЕЦ
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   -1 КАК ДвиженияИлиГраницаПериода,
   NULL КАК Регистратор,
   NULL КАК Документ,
   NULL КАК ДокументДата,
   NULL КАК ДокументНомер,
   NULL КАК ДокументДатаПервичногоДокумента,
   NULL КАК ДокументНомерПервичногоДокумента,
   NULL КАК ДокументВидПервичногоДокумента,
   NULL КАК Период,
   NULL КАК РегистраторНомер,
   NULL КАК НомерСтроки,
   ВремОстатки.Содержание КАК Содержание,
   ВремОстатки.СуммаНачальныйОстатокДт КАК СуммаНачальныйОстатокДт,
   ВремОстатки.СуммаНачальныйОстатокКт КАК СуммаНачальныйОстатокКт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокДт <> 0
           ТОГДА ВремОстатки.КБК
   КОНЕЦ КАК КБКДт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокДт <> 0
           ТОГДА ВремОстатки.КВД
   КОНЕЦ КАК КВДДт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокДт <> 0
           ТОГДА ВремОстатки.Счет
   КОНЕЦ КАК СчетДт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокДт <> 0
           ТОГДА ВремОстатки.КОСГУ
   КОНЕЦ КАК КОСГУДт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокКт <> 0
           ТОГДА ВремОстатки.КБК
   КОНЕЦ КАК КБККт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокКт <> 0
           ТОГДА ВремОстатки.КВД
   КОНЕЦ КАК КВДКт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокКт <> 0
           ТОГДА ВремОстатки.Счет
   КОНЕЦ КАК СчетКт,
   ВЫБОР
       КОГДА ВремОстатки.СуммаНачальныйОстатокКт <> 0
           ТОГДА ВремОстатки.КОСГУ
   КОНЕЦ КАК КОСГУКт,
   NULL КАК Сумма,
   NULL КАК СуммаРазвернутая,
   NULL КАК ОборотДляГлавнойКниги,
   NULL КАК СуммаКонечныйОстатокДт,
   NULL КАК СуммаКонечныйОстатокКт,
   ВремОстатки.Счет КАК Счет,
   ВремОстатки.КБК КАК КБК,
   ВремОстатки.КОСГУ КАК КОСГУ,
   ВремОстатки.Показатель КАК Показатель,
   ВремОстатки.Разделитель
ПОМЕСТИТЬ ОбъединенныйЗапрос
{ВЫБРАТЬ
   Регистратор,
   Показатель,
   Период,
   РегистраторНомер,
   НомерСтроки,
   СуммаНачальныйОстатокДт,
   СуммаНачальныйОстатокКт,
   КБКДт,
   КВДДт,
   СчетДт,
   КОСГУДт,
   КБККт,
   КВДКт,
   СчетКт,
   КОСГУКт,
   Содержание,
   Сумма,
   СуммаКонечныйОстатокДт,
   СуммаКонечныйОстатокКт,
   Счет,
   КБК,
   КОСГУ,
   ДокументДата,
   ДокументНомер,
   ДокументВидПервичногоДокумента,
   ДокументНомерПервичногоДокумента,
   ДокументДатаПервичногоДокумента}
ИЗ
   ВремОстатки КАК ВремОстатки
ГДЕ
   (ВремОстатки.СуммаНачальныйОстатокДт <> 0
           ИЛИ ВремОстатки.СуммаНачальныйОстатокКт <> 0)
   И &ВыводитьОстатки = ИСТИНА

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
   0,
   Оборот.Регистратор,
   Оборот.Документ,
   Оборот.ДокументДата,
   Оборот.ДокументНомер,
   Оборот.ДокументДатаПервичногоДокумента,
   Оборот.ДокументНомерПервичногоДокумента,
   Оборот.ДокументВидПервичногоДокумента,
   Оборот.Период,
   Оборот.Регистратор.Номер,
   Оборот.НомерСтроки,
   Оборот.СодержаниеОкончательное,
   NULL,
   NULL,
   Оборот.КБКДт,
   Оборот.КВДДт,
   Оборот.СчетДт,
   Оборот.КОСГУДт,
   Оборот.КБККт,
   Оборот.КВДКт,
   Оборот.СчетКт,
   Оборот.КОСГУКт,
   Оборот.Сумма,
   Оборот.СуммаРазвернутая,
   Оборот.ОборотДляГлавнойКниги,
   NULL,
   NULL,
   Оборот.Счет,
   Оборот.КБК,
   NULL,
   Оборот.Показатель,
   Оборот.Разделитель
ИЗ
   Оборот КАК Оборот

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
   1,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   NULL,
   ВремОстатки.Содержание,
   NULL,
   NULL,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокДт <> 0
           ТОГДА ВремОстатки.КБК
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокДт <> 0
           ТОГДА ВремОстатки.КВД
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокДт <> 0
           ТОГДА ВремОстатки.Счет
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокДт <> 0
           ТОГДА ВремОстатки.КОСГУ
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокКт <> 0
           ТОГДА ВремОстатки.КБК
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокКт <> 0
           ТОГДА ВремОстатки.КВД
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокКт <> 0
           ТОГДА ВремОстатки.Счет
   КОНЕЦ,
   ВЫБОР
       КОГДА ВремОстатки.СуммаКонечныйОстатокКт <> 0
           ТОГДА ВремОстатки.КОСГУ
   КОНЕЦ,
   NULL,
   NULL,
   NULL,
   ВремОстатки.СуммаКонечныйОстатокДт,
   ВремОстатки.СуммаКонечныйОстатокКт,
   ВремОстатки.Счет,
   ВремОстатки.КБК,
   ВремОстатки.КОСГУ,
   ВремОстатки.Показатель,
   ВремОстатки.Разделитель
ИЗ
   ВремОстатки КАК ВремОстатки
ГДЕ
   (ВремОстатки.СуммаКонечныйОстатокДт <> 0
           ИЛИ ВремОстатки.СуммаКонечныйОстатокКт <> 0)
   И &ВыводитьОстатки = ИСТИНА
;

////////////////////////////////////////////////////////////////////////////////
УНИЧТОЖИТЬ Оборот
;

////////////////////////////////////////////////////////////////////////////////
УНИЧТОЖИТЬ ВремОстатки
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   НАЧАЛОПЕРИОДА(ОбъединенныйЗапрос.ДокументДата, ДЕНЬ) КАК ДокументДата,
   ОбъединенныйЗапрос.ДокументНомер КАК ДокументНомер,
   ОбъединенныйЗапрос.Период КАК Период,
   ОбъединенныйЗапрос.СчетДт КАК СчетДт,
   ОбъединенныйЗапрос.СчетКт КАК СчетКт,
   СУММА(ОбъединенныйЗапрос.Сумма) КАК Сумма,
   ОбъединенныйЗапрос.Счет,
   ОбъединенныйЗапрос.Документ
{ВЫБРАТЬ
   ДокументДата,
   ДокументНомер,
   Период,
   СчетДт.*,
   СчетКт.*,
   Сумма}
ИЗ
   ОбъединенныйЗапрос КАК ОбъединенныйЗапрос

СГРУППИРОВАТЬ ПО
   ОбъединенныйЗапрос.Период,
   ОбъединенныйЗапрос.СчетДт,
   ОбъединенныйЗапрос.СчетКт,
   ОбъединенныйЗапрос.ДокументНомер,
   ОбъединенныйЗапрос.Счет,
   НАЧАЛОПЕРИОДА(ОбъединенныйЗапрос.ДокументДата, ДЕНЬ),
   ОбъединенныйЗапрос.Документ

УПОРЯДОЧИТЬ ПО
   ДокументДата,
   ДокументНомер

видно что суммы беруться с регистра бухгалтерии ЕПСБУДвиженияССубконто
там же есть такой же регистр ЕПСБУДвиженияССубконто только по остаткам, так вот как связать эти регистры чтобы вытащить еще и остатки?
1 Хрущёв
 
28.09.12
12:15
а в чём принципиальное отличие отчета в 8 от 7? Может просто в БГУ его настроить как надо?
2 lesstat
 
28.09.12
14:34
(1) а где стандартный отчет находится в БГУ в 8-ке? и как называется?
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший