програмное проведение РКО в УПП проблема с СуммаДокумента
☑
0
Baloven
12.03.12
✎
06:52
проблема следующая, при программно проведении РКО почему-то сбрасывается СуммаДокумента в ноль и проведение не происходит, почему - не могу понять :(
вот код фукнции:
ДокументРКО.ВидОперации = ВидОперации;
ДокументРКО.Контрагент = КонтрагентВыплаты;
ДокументРКО.Организация = Организация;
ДокументРКО.СуммаДокумента = СуммаВыплаты;
ЗаполнениеДокументовПереопределяемый.ЗаполнитьШапкуДокумента(ДокументРКО,глЗначениеПеременной("глТекущийПользователь"));
ДокументРКО.ПоДокументу = ДокументРКО.Контрагент.ДокументУдостоверяющийЛичность;
ВалютаДокумента = ДокументРКО.мВалютаРегламентированногоУчета;
ДокументРКО.КурсДокумента = 1;
ДокументРКО.КратностьДокумента = 1;
ДокументРКО.Касса = Касса;
ДокументРКО.Оплачено = Истина;
ДокументРКО.ОтражатьВУправленческомУчете = Истина;
ДокументРКО.ОтражатьВБухгалтерскомУчете = Истина;
ДокументРКО.ОтражатьВНалоговомУчете = Истина;
ДокументРКО.ОтраженоВОперУчете = Истина;
ДокументРКО.Основание = Основание;
КонтрагентФИОИменительный = ДокументРКО.Контрагент.Наименование;
КонтрагентФИОВыдать = "";
ПолКонтрагента = ПроцедурыУправленияПерсоналом.ПолучитьПол(ОбщегоНазначения.ПолучитьМассивФИО(КонтрагентФИОИменительный)[2]);
УниверсальныеМеханизмы.Просклонять(глЗначениеПеременной("глКомпонентаСклоненияФИО"),КонтрагентФИОИменительный,3,ПолКонтрагента,КонтрагентФИОВыдать);
ДокументРКО.Выдать = КонтрагентФИОВыдать;
СтрокаПлатеж = ДокументРКО.РасшифровкаПлатежа.Добавить();
СтрокаПлатеж.СуммаПлатежа = СуммаВыплаты;
СтрокаПлатеж.КурсВзаиморасчетов = 1;
СтрокаПлатеж.ДоговорКонтрагента = Договор;
СтрокаПлатеж.КратностьВзаиморасчетов = 1;
СтрокаПлатеж.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
СтрокаПлатеж.СтатьяДвиженияДенежныхСредств = СтатьяДвижения;
СтрокаПлатеж.СуммаНДС = 0;
СтрокаПлатеж.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.РасчетыПоАвансамВыданным;
СтрокаПлатеж.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПоставщиками;
ДокументРКО.Записать(РежимЗаписиДокумента.Проведение,РежимПроведенияДокумента.Неоперативный);
Если просто записать документ ДокументРКО.Записать(); все записывается и поле СуммаДокумента нулевое хотя в расшифровке сумма СуммаПлатежа стоит и все нормально
1
Wobland
12.03.12
✎
06:56
а где ты сумму документа присваиваешь?
2
Baloven
12.03.12
✎
07:03
все нашел нужно было в расшифровку сумму взаиморасчета еще раз продублировать
СтрокаПлатеж.СуммаВзаиморасчетов = СуммаВыплаты;
3
Baloven
12.03.12
✎
07:04
(1)
здесь ("СуммаВыплаты" - переменная передаваемая в параметрах функции:
ДокументРКО.СуммаДокумента = СуммаВыплаты;
и здесь:
СтрокаПлатеж.СуммаПлатежа = СуммаВыплаты;
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший