Ошибка при печати акта на списание в требование-накладной

[dimaadidas]

Добрый день. При печати в требование-накладной акта на списание или требование - накладной М-11 сообщает ошибку с которой не получается разобраться, так как программирую в 1с недавно. наведите на правильный выход, а то не понимаю, где искать проблему. Есть предположение, что нужно что-то править в учетной политике. Конфигурация Бухгалтерия для беларуси 8.2

Код Выделить Развернуть

ОбщийМодуль.БухгалтерскийУчет(2917)}: Ошибка при вызове метода контекста (Выполнить): {(8, 2)}: Неверные параметры "РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто"
<<?>>РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
ПроводкиДокумента = Запрос.Выполнить().Выгрузить();
по причине:
{(8, 2)}: Неверные параметры "РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто"
<<?>>РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(

Вот сам модуль на который ругается

Код Выделить Развернуть


Функция ПолучитьСуммуСписанияАктивов(ТекДокумент) Экспорт

УчетнаяПолитикаНеЗадана = Ложь;
мУчетнаяПолитика = ОбщегоНазначения.ПолучитьПараметрыУчетнойПолитики(ТекДокумент.Дата, УчетнаяПолитикаНеЗадана, ТекДокумент.Организация, "Бух");
мВалютаРегламентированногоУчета  = Константы.ВалютаРегламентированногоУчета.Получить();
мУчетПоСредней = Ложь;
Если  мУчетнаяПолитика.Количество()>0 И мУчетнаяПолитика["СпособОценкиМПЗ"]= Перечисления.СпособыОценки.ПоСредней  Тогда
мУчетПоСредней = Истина;
КонецЕсли;

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

Запрос = Новый Запрос;
Запрос.Текст = ТекстЗапроса;
Запрос.УстановитьПараметр("ДатаНач", ТекДокумент.Дата);
Запрос.УстановитьПараметр("ДатаКон", ТекДокумент.Дата);
Запрос.УстановитьПараметр("Регистратор", ТекДокумент.Ссылка);
Запрос.УстановитьПараметр("СчетГТД", ПланыСчетов.Хозрасчетный.ГТД);

ПроводкиДокумента = Запрос.Выполнить().Выгрузить();
Для Каждого ПроводкаДокумента Из ПроводкиДокумента Цикл
Если ТипЗнч(ПроводкаДокумента.СубконтоКт1) = Тип("СправочникСсылка.Номенклатура") Тогда
Строка = ТаблицаСуммСписания.Добавить();
Строка.Номенклатура = ПроводкаДокумента.СубконтоКт1;
Если ТипЗнч(ПроводкаДокумента.СубконтоКт2) = Тип("СправочникСсылка.Партии") Тогда
Строка.Партия       = ПроводкаДокумента.СубконтоКт2;
ИначеЕсли ТипЗнч(ПроводкаДокумента.СубконтоКт3) = Тип("СправочникСсылка.Партии") Тогда
Строка.Партия       = ПроводкаДокумента.СубконтоКт3;
КонецЕсли;
Строка.Количество   = ПроводкаДокумента.КоличествоКт;
Строка.Сумма        = ПроводкаДокумента.Сумма;
КонецЕсли;
Если ТипЗнч(ПроводкаДокумента.СубконтоКт2) = Тип("СправочникСсылка.Номенклатура") Тогда
Строка = ТаблицаСуммСписания.Добавить();
Строка.Номенклатура = ПроводкаДокумента.СубконтоКт2;
Строка.Количество   = ПроводкаДокумента.КоличествоКт;
Строка.Сумма        = ПроводкаДокумента.Сумма;
КонецЕсли;

КонецЦикла;

Если мУчетПоСредней ТОгда
ТаблицаСуммСписания.Свернуть("Номенклатура","Количество,Сумма");
Иначе
ТаблицаСуммСписания.Свернуть("Номенклатура, Партия","Количество,Сумма");
КонецЕсли;

КонецЕсли;

Возврат  ТаблицаСуммСписания;



КонецФункции



[Dethmontt]

код очень очень похож на не типовой!
Запрос в конструкторе открывается?
Зачем задавать параметры "ДатаНач" и "ДатаКон" если ты жестко отбираешь по регистратору???????????

[Dethmontt]

Зачем инициализировать переменную и заполнять ее если ты ее потом затираешь???
       

Код Выделить Развернуть

ПроводкиДокумента = Новый ТаблицаЗначений;
        ПроводкиДокумента.Колонки.Добавить("Номенклатура");
        ПроводкиДокумента.Колонки.Добавить("Количество");
        ПроводкиДокумента.Колонки.Добавить("Сумма");


Код Выделить Развернуть

ПроводкиДокумента = Запрос.Выполнить().Выгрузить();


[Dethmontt]

Попробуй зайти в параметры виртуальной таблицы и удалить параметры ДатаНач и ДатаКон

[dimaadidas]

код очень очень похож на не типовой!
Запрос в конструкторе открывается?
Зачем задавать параметры "ДатаНач" и "ДатаКон" если ты жестко отбираешь по регистратору???????????

нет не открывается, сообщает ту же ошибку . Да код немного отличается от типовой.

Добавлено: 03 окт 2012, 23:20

Я заменил в запросе

Код Выделить Развернуть

РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
            |            &ДатаНач,
            |            &ДатаКон,
            |            Регистратор = &Регистратор
            |                И (НЕ СчетКт = &СчетГТД),
            |            ,
            |            ) КАК ХозрасчетныйДвиженияССубконто

на вот это

Код Выделить Развернуть

РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(&ДатаНач, &ДатаКон, Регистратор = &Регистратор И (НЕ СчетКт = &СчетГТД)) КАК ХозрасчетныйДвиженияССубконто

Запрос стал открываться и формируется печатная форма, но в ней поле сумма пустое, так должно быть?

[Dethmontt]

МНЕ ТОЧНО не известно как должно быть =)))
И это можно удалить:

 

Код Выделить Развернуть

      ПроводкиДокумента = Новый ТаблицаЗначений;
        ПроводкиДокумента.Колонки.Добавить("Номенклатура");
        ПроводкиДокумента.Колонки.Добавить("Количество");
        ПроводкиДокумента.Колонки.Добавить("Сумма");