public void РасчетРазницПоАмортизации(/*СтруктураШапкиДокумента, Актив, Объект, ТаблицаАмортизации, ТабЗатрат, ТаблицаАмортизацииБУ*/)
{
//ТаблицаАмортизации.Колонки.Добавить("СуммаПР", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(15,2)));
//ТаблицаАмортизации.Колонки.Добавить("СуммаБУ", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(15,2)));
//ТаблицаАмортизации.Колонки.Добавить("СуммаВР", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(15,2)));
if(true/*ТаблицаАмортизации = Неопределено*/)
{
}
if(true/*Актив = "ОС"*/)
{
//Массив = Новый Массив;
//Массив.Добавить(ПланыСчетов.Хозрасчетный.ОсновныеСредства);
//Массив.Добавить(ПланыСчетов.Хозрасчетный.ДоходныеВложенияВ_МЦ);
//СчетУчетаБУ = Массив;
//Массив = Новый Массив;
//Массив.Добавить(ПланыСчетов.Налоговый.ОсновныеСредства);
//Массив.Добавить(ПланыСчетов.Налоговый.ДоходныеВложенияВ_МЦ);
//СчетУчетаНУ = Массив;
//СчетАмортизацииБУ = ПланыСчетов.Хозрасчетный.АмортизацияОсновныхСредств;
//СчетАмортизацииНУ = ПланыСчетов.Налоговый.АмортизацияОсновныхСредств;
}
if(true/*НЕ ЗначениеЗаполнено(Объект)*/)
{
//ОбъектЕсть = Ложь;
}
//мНачДата = НачалоМесяца(СтруктураШапкиДокумента.Дата);
//мКонДата = КонецМесяца (СтруктураШапкиДокумента.Дата);
if(true/*ТабЗатрат = Неопределено*/)
{
//ТаблицаЗатрат = Новый ТаблицаЗначений;
//ТаблицаЗатрат.Колонки.Добавить("ОбъектУчета");
//ТаблицаЗатрат.Колонки.Добавить("Сумма");
}
//ТаблицаЗатрат.Колонки.Добавить("СуммаНУ");
//ТаблицаЗатрат.Колонки.Добавить("Счет02");
//мКэшСчетов = Новый Соответствие;
//ТаблицаЗатрат.Свернуть("ОбъектУчета,Счет02","Сумма,СуммаНУ");
//Запрос = Новый Запрос;
if(true/*Актив = "ОС"*/)
{
//Запрос.УстановитьПараметр("ВидСубконто",ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ОсновныеСредства);
/*Запрос.Текст = "ВЫБРАТЬ
| НалоговыйОстатки.Субконто1 КАК Субконто1,
| 0 КАК Сумма01БУ,
| СУММА(НалоговыйОстатки.СуммаОстатокДт) КАК Сумма01НУ,
| 0 КАК Сумма01ПР,
| 0 КАК Сумма02,
| 0 КАК Сумма01ПРпоРБ
|ИЗ
| РегистрБухгалтерии.Налоговый.Остатки(
| &КонДата,
| Счет В ИЕРАРХИИ (&Счет01НУ)
| И (НЕ Счет = &Счет0109НУ),
| &ВидСубконто,
| Организация = &Организация
| И ВидУчета = &ВидУчетаНУ) КАК НалоговыйОстатки
|
|СГРУППИРОВАТЬ ПО
| НалоговыйОстатки.Субконто1
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ПараметрыАмортизацииОСБухгалтерскийУчетСрезПоследних.ОсновноеСредство,
| ПараметрыАмортизацииОСБухгалтерскийУчетСрезПоследних.СтоимостьДляВычисленияАмортизации,
| 0,
| 0,
| 0,
| 0
|ИЗ
| РегистрСведений.ПараметрыАмортизацииОСБухгалтерскийУчет.СрезПоследних(&НачДата, Организация = &Организация) КАК ПараметрыАмортизацииОСБухгалтерскийУчетСрезПоследних
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ПараметрыАмортизацииОСНалоговыйУчетСрезПоследних.ОсновноеСредство,
| 0,
| 0,
| ПараметрыАмортизацииОСНалоговыйУчетСрезПоследних.ПРДляВычисленияАмортизации,
| 0,
| 0
|ИЗ
| РегистрСведений.ПараметрыАмортизацииОСНалоговыйУчет.СрезПоследних(&НачДата, Организация = &Организация) КАК ПараметрыАмортизацииОСНалоговыйУчетСрезПоследних
| ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
| ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних.ОсновноеСредство КАК ОсновноеСредство,
| ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних.АмортизацияДо2002 КАК АмортизацияДо2002
| ИЗ
| РегистрСведений.ПервоначальныеСведенияОСНалоговыйУчет.СрезПоследних(&НачДата, Организация = &Организация) КАК ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних) КАК ПРдо2002года
| ПО ПараметрыАмортизацииОСНалоговыйУчетСрезПоследних.ОсновноеСредство = ПРдо2002года.ОсновноеСредство
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| НалоговыйОбороты.Субконто1,
| 0,
| 0,
| 0,
| СУММА(НалоговыйОбороты.СуммаОборотКт),
| 0
|ИЗ
| РегистрБухгалтерии.Налоговый.Обороты(&НачДата, &КонДата, , Счет В ИЕРАРХИИ (&Счет02НУ), &ВидСубконто, Организация = &Организация, , ) КАК НалоговыйОбороты
|
|СГРУППИРОВАТЬ ПО
| НалоговыйОбороты.Субконто1
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| НалоговыйОстатки.Субконто1,
| 0,
| 0,
| 0,
| 0,
| СУММА(НалоговыйОстатки.СуммаОстатокДт - ПРдо2002года.АмортизацияДо2002)
|ИЗ
| РегистрБухгалтерии.Налоговый.Остатки(
| &НачДата,
| Счет В ИЕРАРХИИ (&Счет01НУ)
| И (НЕ Счет = &Счет0109НУ),
| &ВидСубконто,
| Организация = &Организация
| И ВидУчета = &ВидУчетаПр) КАК НалоговыйОстатки
| ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
| ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних.ОсновноеСредство КАК ОсновноеСредство,
| ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних.АмортизацияДо2002 КАК АмортизацияДо2002
| ИЗ
| РегистрСведений.ПервоначальныеСведенияОСНалоговыйУчет.СрезПоследних(&НачДата, Организация = &Организация) КАК ПервоначальныеСведенияОСНалоговыйУчетСрезПоследних) КАК ПРдо2002года
| ПО НалоговыйОстатки.Субконто1 = ПРдо2002года.ОсновноеСредство
|
|СГРУППИРОВАТЬ ПО
| НалоговыйОстатки.Субконто1";*/
}
if(true/*ОбъектЕсть*/)
{
//Запрос.Текст = СтрЗаменить(Запрос.Текст, "Организация = &Организация","Организация = &Организация И Субконто1 В (&Объект)");
//Запрос.Текст = СтрЗаменить(Запрос.Текст, "Организация = &Организация И Субконто1 В (&Объект)) КАК ПервоначальныеСведенияОС", "Организация = &Организация И ОсновноеСредство В (&Объект)) КАК ПервоначальныеСведенияОС");
//Запрос.Текст = СтрЗаменить(Запрос.Текст, "Организация = &Организация И Субконто1 В (&Объект)) КАК ПараметрыАмортизацииОС", "Организация = &Организация И ОсновноеСредство В (&Объект)) КАК ПараметрыАмортизацииОС");
}
//Запрос.УстановитьПараметр("НачДата", мНачДата);
if(true/*ОбъектЕсть*/)
{
//мКонДата = Новый Граница(СтруктураШапкиДокумента.Дата, ВидГраницы.Исключая);
}
//Запрос.УстановитьПараметр("КонДата", мКонДата);
//Запрос.УстановитьПараметр("Организация", СтруктураШапкиДокумента.Организация);
//Запрос.УстановитьПараметр("ВидУчетаНУ", Перечисления.ВидыУчетаПоПБУ18.НУ);
//Запрос.УстановитьПараметр("ВидУчетаПР", Перечисления.ВидыУчетаПоПБУ18.ПР);
//Запрос.УстановитьПараметр("Счет01НУ", СчетУчетаНУ);
//Запрос.УстановитьПараметр("Счет0109НУ", ПланыСчетов.Налоговый.ВыбытиеОС);
//Запрос.УстановитьПараметр("Счет01БУ", СчетУчетаБУ);
//Запрос.УстановитьПараметр("Счет0109БУ", ПланыСчетов.Хозрасчетный.ВыбытиеОС);
//Запрос.УстановитьПараметр("Счет02НУ", СчетАмортизацииНУ);
//Запрос.УстановитьПараметр("Объект", Объект);
//РезультатЗапроса = Запрос.Выполнить();
//ТаблицаОС = РезультатЗапроса.Выгрузить();
//ТаблицаОС.Свернуть("Субконто1", "Сумма01БУ, Сумма01НУ, Сумма01ПР, Сумма01ПРпоРБ, Сумма02");
//мКэшСчетов = Новый Соответствие;
}