Проведение документа Корректировки заказа покупателя в УТ 10.3.5.1
19.03.2009
16:52
#1
"Здравствуйте форумчане! В УТ типовой конфигурации есть процедура в модуле документа есть такая функция :
Процедура ПодготовитьТаблицуТоваровУпр(ТаблицаТоваров, СтруктураШапкиДокумента)
// Надо добавить колонки
ТаблицаТоваров.Колонки.Добавить("СуммаВзаиморасчетов", ОбщегоНазначения.ПолучитьОписаниеТиповЧисла(15,2));
ТаблицаТоваров.Колонки.Добавить("СуммаУпр", ОбщегоНазначения.ПолучитьОписаниеТиповЧисла(15,2));
// Надо заполнить новые колонки.
Для каждого СтрокаТаблицы Из ТаблицаТоваров Цикл
// Суммы пересчитаем в валюту упр. учета
СтрокаТаблицы.СуммаБезНДС = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СтрокаТаблицы.СуммаБезНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
СуммаСНДС = СтрокаТаблицы.Сумма + ?(УчитыватьНДС И Не СуммаВключаетНДС, СтрокаТаблицы.НДС, 0);
СтрокаТаблицы.НДС = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СтрокаТаблицы.НДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
СтрокаТаблицы.СуммаВзаиморасчетов = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СуммаСНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаВзаиморасчетов,
СтруктураШапкиДокумента.КурсДокумента,
КурсВзаиморасчетов,
СтруктураШапкиДокумента.КратностьДокумента,
КратностьВзаиморасчетов);
СтрокаТаблицы.СуммаУпр = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СуммаСНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
КонецЦикла;
КонецПроцедуры // ПодготовитьТаблицуТоваровУпр()
Ситуация следующая делаю документ с валютой Рубли валюта упр учета USD. при проведении документа получается что СуммаСНДС складывает рублевую сумму и НДС переведенную в валюту УУ получается нехорошо как то.
Подскажите может я что то нетак делаю? или это действительно проблемма релиза
причем такая же ситуация происходит при проведении заказа покупателя
"
Процедура ПодготовитьТаблицуТоваровУпр(ТаблицаТоваров, СтруктураШапкиДокумента)
// Надо добавить колонки
ТаблицаТоваров.Колонки.Добавить("СуммаВзаиморасчетов", ОбщегоНазначения.ПолучитьОписаниеТиповЧисла(15,2));
ТаблицаТоваров.Колонки.Добавить("СуммаУпр", ОбщегоНазначения.ПолучитьОписаниеТиповЧисла(15,2));
// Надо заполнить новые колонки.
Для каждого СтрокаТаблицы Из ТаблицаТоваров Цикл
// Суммы пересчитаем в валюту упр. учета
СтрокаТаблицы.СуммаБезНДС = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СтрокаТаблицы.СуммаБезНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
СуммаСНДС = СтрокаТаблицы.Сумма + ?(УчитыватьНДС И Не СуммаВключаетНДС, СтрокаТаблицы.НДС, 0);
СтрокаТаблицы.НДС = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СтрокаТаблицы.НДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
СтрокаТаблицы.СуммаВзаиморасчетов = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СуммаСНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаВзаиморасчетов,
СтруктураШапкиДокумента.КурсДокумента,
КурсВзаиморасчетов,
СтруктураШапкиДокумента.КратностьДокумента,
КратностьВзаиморасчетов);
СтрокаТаблицы.СуммаУпр = МодульВалютногоУчета.ПересчитатьИзВалютыВВалюту(СуммаСНДС, СтруктураШапкиДокумента.ВалютаДокумента,
СтруктураШапкиДокумента.ВалютаУправленческогоУчета,
СтруктураШапкиДокумента.КурсДокумента,
СтруктураШапкиДокумента.КурсВалютыУправленческогоУчета,
СтруктураШапкиДокумента.КратностьДокумента,
СтруктураШапкиДокумента.КратностьВалютыУправленческогоУчета);
КонецЦикла;
КонецПроцедуры // ПодготовитьТаблицуТоваровУпр()
Ситуация следующая делаю документ с валютой Рубли валюта упр учета USD. при проведении документа получается что СуммаСНДС складывает рублевую сумму и НДС переведенную в валюту УУ получается нехорошо как то.
Подскажите может я что то нетак делаю? или это действительно проблемма релиза
причем такая же ситуация происходит при проведении заказа покупателя
"
Читают тему
(гостей: 1)