Имя: Пароль:
1C
1С v8
Расчет среднегодовой стоимости имущества в БГУ по подразделениям
0 Hellen_p
 
14.02.13
09:20
Подскажите, пожалуйста, возможно ли в отчете БГУ "Расчет среднегодовой стоимости имущества" сделать группировку по подразделениям? Пробовала добавить в СКД, но плохо знаю этот механизм, поэтому ничего не получилось.
1 zak555
 
14.02.13
09:23
Покажи, что пробовала
2 alek_aab
 
14.02.13
09:27
(0) а подразделение откуда дергать будешь, из МОЛ?
3 Hellen_p
 
15.02.13
07:11
Не поняла, как здесь прикрепить файл, поэтому скопировала код.

ВЫБРАТЬ
   ДАТАВРЕМЯ(2009, 1, 1) КАК ПериодСреза
ПОМЕСТИТЬ ВТ_ДатыСрезов
;

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

СГРУППИРОВАТЬ ПО
   ЕПСБУОстатки.Учреждение,
   ЕПСБУОстатки.Баланс,
   ЕПСБУОстатки.Счет,
   ЕПСБУОстатки.КБК,
   ЕПСБУОстатки.КВД,
   ЕПСБУОстатки.СуммаОстаток,
   ВЫРАЗИТЬ(ЕПСБУОстатки.Субконто2 КАК Справочник.ОсновныеСредства),
   ВЫРАЗИТЬ(ЕПСБУОстатки.Субконто3 КАК Справочник.Подразделения)

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

ВЫБРАТЬ
   ЕПСБУОбороты.Учреждение,
   ЕПСБУОбороты.Баланс,
   ЕПСБУОбороты.Счет,
   ЕПСБУОбороты.КБК,
   ЕПСБУОбороты.КВД,
   ВЫРАЗИТЬ(ЕПСБУОбороты.Субконто2 КАК Справочник.ОсновныеСредства),
   ВЫРАЗИТЬ(ЕПСБУОбороты.Субконто3 КАК Справочник.Подразделения),
   ЕПСБУОбороты.СуммаОборот,
   ЕПСБУОбороты.Период
ИЗ
   РегистрБухгалтерии.ЕПСБУ.Обороты(&ПериодНачало, &ПериодКонец, Запись, Счет В ИЕРАРХИИ (&СчетаБаланс), , , , ) КАК ЕПСБУОбороты

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

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   ВТ_ДатыСрезов.ПериодСреза КАК Период,
   ВТ_ОстаткиОборотыОстатки.Учреждение КАК Учреждение,
   ВТ_ОстаткиОборотыОстатки.Баланс КАК Баланс,
   ВТ_ОстаткиОборотыОстатки.Подразделение КАК Подразделение,
   ВТ_ОстаткиОборотыОстатки.Счет КАК Счет,
   ВТ_ОстаткиОборотыОстатки.КБК КАК КБК,
   ВТ_ОстаткиОборотыОстатки.КВД КАК КВД,
   ВТ_ОстаткиОборотыОстатки.ОС КАК ОС,
   СУММА(ВТ_ОстаткиОборотыОстатки.Сумма) КАК Сумма
ПОМЕСТИТЬ ВТ_Остатки
ИЗ
   ВТ_ДатыСрезов КАК ВТ_ДатыСрезов
       ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ОстаткиОборотыОстатки КАК ВТ_ОстаткиОборотыОстатки
       ПО ВТ_ДатыСрезов.ПериодСреза > ВТ_ОстаткиОборотыОстатки.Период

СГРУППИРОВАТЬ ПО
   ВТ_ДатыСрезов.ПериодСреза,
   ВТ_ОстаткиОборотыОстатки.Учреждение,
   ВТ_ОстаткиОборотыОстатки.Баланс,
   ВТ_ОстаткиОборотыОстатки.Подразделение,
   ВТ_ОстаткиОборотыОстатки.Счет,
   ВТ_ОстаткиОборотыОстатки.КБК,
   ВТ_ОстаткиОборотыОстатки.КВД,
   ВТ_ОстаткиОборотыОстатки.ОС

ИМЕЮЩИЕ
   СУММА(ВТ_ОстаткиОборотыОстатки.Сумма) <> 0
;

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

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

ВЫБРАТЬ
   ЕПСБУОбороты.КБК,
   ЕПСБУОбороты.КВД,
   ВЫРАЗИТЬ(ЕПСБУОбороты.Субконто3 КАК Справочник.ЦМО).Подразделение,
   ВЫРАЗИТЬ(ЕПСБУОбороты.Субконто2 КАК Справочник.ОсновныеСредства),
   -ЕПСБУОбороты.СуммаОборот,
   ЕПСБУОбороты.Период
ИЗ
   РегистрБухгалтерии.ЕПСБУ.Обороты(&ПериодНачало, &ПериодКонец, Запись, Счет В ИЕРАРХИИ (&СчетаАморт), , , , ) КАК ЕПСБУОбороты
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   ВТ_ДатыСрезов.ПериодСреза КАК Период,
   ВТ_ОстаткиОборотыАмортизация.КБК КАК КБК,
   ВТ_ОстаткиОборотыАмортизация.КВД КАК КВД,
   ВТ_ОстаткиОборотыАмортизация.Подразделение,
   ВТ_ОстаткиОборотыАмортизация.ОС КАК ОС,
   СУММА(ВТ_ОстаткиОборотыАмортизация.Сумма) КАК Сумма
ПОМЕСТИТЬ ВТ_Амортизация
ИЗ
   ВТ_ДатыСрезов КАК ВТ_ДатыСрезов
       ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ОстаткиОборотыАмортизация КАК ВТ_ОстаткиОборотыАмортизация
       ПО ВТ_ДатыСрезов.ПериодСреза > ВТ_ОстаткиОборотыАмортизация.Период

СГРУППИРОВАТЬ ПО
   ВТ_ДатыСрезов.ПериодСреза,
   ВТ_ОстаткиОборотыАмортизация.КБК,
   ВТ_ОстаткиОборотыАмортизация.КВД,
   ВТ_ОстаткиОборотыАмортизация.Подразделение,
   ВТ_ОстаткиОборотыАмортизация.ОС

ИМЕЮЩИЕ
   СУММА(ВТ_ОстаткиОборотыАмортизация.Сумма) <> 0
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
   ВТ_Остатки.Период КАК Период,
   МАКСИМУМ(СтавкиНалогаНаИмущество.Период) КАК ПериодСрез,
   ВТ_Остатки.Учреждение КАК Учреждение,
   ВТ_Остатки.Подразделение КАК Подразделение,
   ВТ_Остатки.ОС КАК ОС,
   ИнвентарныеНомераОС.Ссылка КАК ИнвентарныйНомер
ПОМЕСТИТЬ ВТ_ПериодыСрезовСтавокНИ
ИЗ
   ВТ_Остатки КАК ВТ_Остатки
       ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.ИнвентарныеНомераОС КАК ИнвентарныеНомераОС
       ПО ВТ_Остатки.Учреждение = ИнвентарныеНомераОС.Владелец
           И ВТ_Остатки.ОС = ИнвентарныеНомераОС.ОС
       ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.СтавкиНалогаНаИмущество КАК СтавкиНалогаНаИмущество
       ПО ВТ_Остатки.Период > СтавкиНалогаНаИмущество.Период
           И ВТ_Остатки.Учреждение = СтавкиНалогаНаИмущество.Учреждение
           И ВТ_Остатки.ОС = СтавкиНалогаНаИмущество.ОС
           И (ИнвентарныеНомераОС.Ссылка = СтавкиНалогаНаИмущество.ИнвНомер)

СГРУППИРОВАТЬ ПО
   ВТ_Остатки.Период,
   ВТ_Остатки.Учреждение,
   ВТ_Остатки.Подразделение,
   ВТ_Остатки.ОС,
   ИнвентарныеНомераОС.Ссылка
;

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

СГРУППИРОВАТЬ ПО
   ВТ_Остатки.Период,
   ВТ_Остатки.Учреждение,
   ВТ_Остатки.Баланс,
   ВТ_Остатки.Подразделение,
   ВТ_Остатки.Счет,
   ВТ_Остатки.КБК,
   ВТ_Остатки.КВД,
   ВТ_Остатки.ОС,
   ОсновныеСредства.ИнвентарныйНомер,
   ЕСТЬNULL(СтавкиНалогаНаИмущество.НалоговаяСтавка, 0)