S
Stim
Нужно найти оборот между корреспонденциями. Выдается Такая ошибка:
вот сама программа
Идея программы в том, что она находит для каждой позиции номенклатуры коресподенцию счета 43 с 40 или 43 и высчитывает оборот между ними. Подскажите что нетак в этой программе?
Код:
оборотмеждусчетами=Ит.Об(ВыбСчет,Ит.КорСчет,3);
{D:\1C\BUH_SAMIK\EXTFORMS\КОРРСЧЕТ.ERT(27)}: Слишком много параметров передано при вызове функции/процедуры объекта
Код:
Процедура Сформировать()
Счет=СоздатьОбъект("Счет");
Cчет.НайтиПоКоду("43");
ВыбСчет=Счет.ТекущийСчет();
ИТ=СоздатьОбъект("БухгалтерскиеИтоги");
Нмк=СоздатьОбъект("Справочник.Номенклатура");
Ит.ИспользоватьСубконто(ВидыСубконто.Номенклатура,, 1);
Ит.ВыполнитьЗапрос(НачДата, КонДата,,,,3);
Ит.ВыбратьСубконто(ВидыСубконто.Номенклатура);
Пока Ит.ПолучитьСубконто(ВидыСубконто.Номенклатура) = 1 Цикл
ПрочиеПоступления=0;
Ит.ВыбратьСчета();
Пока Ит.ПолучитьСчет() = 1 Цикл
Если Ит.Счет=ВыбСчет Тогда
Д*цензура*овыйОборот=Ит.ДО(3);
Ит.ВыбратьКорСчета();
Пока Ит.ПолучитьКорСчет()=1 Цикл
Если (строка(Ит.КорСчет)="40") или (Строка(Ит.КорСЧет)="43") тогда
оборотмеждусчетами=Ит.Об(ВыбСчет,Ит.КорСчет,3); //тут выдает ошибку
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецЦикла;
КонецПроцедуры