Зачет аванса Бюджет 624
21.07.2008
21:45
#1
"Бюджетка релиз 624, модуль формы документа ЗачетАвансаВыданного
Процедура ЗаполнитьНаОсновании()
выполняется нормально до вот этой процедуры:
Процедура ДозаполнитьТабЧ()
СпСчетов = СоздатьОбъект("СписокЗначений");
ДопТ = СоздатьОбъект("ТаблицаЗначений");
ДопТ.НоваяКолонка("Счет","Счет");
ДопТ.НоваяКолонка("Сумма","Число");
ТабЧ.ВыбратьСтроки();
Пока ТабЧ.ПолучитьСтроку() = 1 Цикл
ДопТ.НоваяСтрока();
ДопТ.Счет = ТабЧ.СчетАванса;
ДопТ.Сумма = ТабЧ.Сумма;
ДопТ.НоваяСтрока();
ДопТ.Счет = ТабЧ.СчетРасчета;
ДопТ.Сумма = ТабЧ.Сумма;
КонецЦикла;
ДопТ.Свернуть("Счет","Сумма");
ДопТ.Выгрузить(СпСчетов,,,"Счет");
БИт = СоздатьОбъект("БухгалтерскиеИтоги");
БИт.Рассчитать(ДатаДок,ДатаДок,СпСчетов,0,ПланыСчетов.ЕПСБУ,ВыбраннаяФирма);
БИт.Актуальность(1);
ТабЧ.ВыбратьСтроки();
Пока ТабЧ.ПолучитьСтроку() = 1 Цикл
ТекСуммаР = ТабЧ.Сумма;
ТекСуммаАв = БИт.СКД(ТабЧ.СчетАванса,"С",,ТабЧ.ФКР,,Контрагент,ТабЧ.Субконто4,ТабЧ.Субконто5);
ТекОстР = БИт.СКК(ТабЧ.СчетРасчета,"С",,ТабЧ.ФКР,,Контрагент,ТабЧ.Субконто4,ТабЧ.Субконто5);
СуммаЗач = Мин(ТекСуммаР,ТекСуммаАв,ТекОстР);
ТабЧ.Сумма = СуммаЗач;
КонецЦикла;
БИт.Актуальность(0);
КонецПроцедуры // ДозаполнитьТабЧ()
Может кто подскажет, что не так в этой процедуре, в частности ТекСуммаАв = Ит.СКД не видит что есть остаток по субконто5, хотя все условия выполняются.
если убрать отбор по субконто5 то остаток видит."
Процедура ЗаполнитьНаОсновании()
выполняется нормально до вот этой процедуры:
Процедура ДозаполнитьТабЧ()
СпСчетов = СоздатьОбъект("СписокЗначений");
ДопТ = СоздатьОбъект("ТаблицаЗначений");
ДопТ.НоваяКолонка("Счет","Счет");
ДопТ.НоваяКолонка("Сумма","Число");
ТабЧ.ВыбратьСтроки();
Пока ТабЧ.ПолучитьСтроку() = 1 Цикл
ДопТ.НоваяСтрока();
ДопТ.Счет = ТабЧ.СчетАванса;
ДопТ.Сумма = ТабЧ.Сумма;
ДопТ.НоваяСтрока();
ДопТ.Счет = ТабЧ.СчетРасчета;
ДопТ.Сумма = ТабЧ.Сумма;
КонецЦикла;
ДопТ.Свернуть("Счет","Сумма");
ДопТ.Выгрузить(СпСчетов,,,"Счет");
БИт = СоздатьОбъект("БухгалтерскиеИтоги");
БИт.Рассчитать(ДатаДок,ДатаДок,СпСчетов,0,ПланыСчетов.ЕПСБУ,ВыбраннаяФирма);
БИт.Актуальность(1);
ТабЧ.ВыбратьСтроки();
Пока ТабЧ.ПолучитьСтроку() = 1 Цикл
ТекСуммаР = ТабЧ.Сумма;
ТекСуммаАв = БИт.СКД(ТабЧ.СчетАванса,"С",,ТабЧ.ФКР,,Контрагент,ТабЧ.Субконто4,ТабЧ.Субконто5);
ТекОстР = БИт.СКК(ТабЧ.СчетРасчета,"С",,ТабЧ.ФКР,,Контрагент,ТабЧ.Субконто4,ТабЧ.Субконто5);
СуммаЗач = Мин(ТекСуммаР,ТекСуммаАв,ТекОстР);
ТабЧ.Сумма = СуммаЗач;
КонецЦикла;
БИт.Актуальность(0);
КонецПроцедуры // ДозаполнитьТабЧ()
Может кто подскажет, что не так в этой процедуре, в частности ТекСуммаАв = Ит.СКД не видит что есть остаток по субконто5, хотя все условия выполняются.
если убрать отбор по субконто5 то остаток видит."
23.07.2008
05:55
#4
Оборотный другая галочка, то есть может быть субконто по сумме, но учитываться по этому субконто будут, только обороты. В описании субконто в плане счетов галочка "Только обороты"
23.07.2008
06:14
#5
Я поставил учет по только сумме, в принципе эта проблема в бюджетке уже навероное с год существует, я пытался и до этого реализовать учет расчетов с *** и кредиторами по детализации ЭКР, и была такая же картина. Вот сейчас это приперло и приходится решать эту проблему плотно.
27.07.2008
22:25
#7
Есть мнение - что субконто 4 - то бишь договор, если не ошибаюсь, пустое - попробуй заполнить в доке оплаты и акте, соответственно, субконто5 будет аффтаматически определяццо - была такая фигня....
ЗЫ Ежели без договора все происходило, то заведи договор с названием "Без договора" и выбеои его:)
ЗЫ Ежели без договора все происходило, то заведи договор с названием "Без договора" и выбеои его:)
Читают тему
(гостей: 1)