Поступрление ТМЦ (импорт) Комплексная конф. 483 релиз
22.05.2008
15:34
#1
При проведении док. поступление ТМЦ (импорт)в Комплесной конфигурации релиз 483, не верно формируется стоимость ввезенного товара. В стоимость ошибочно вкл. НДС. Как исправить?
22.05.2008
23:29
#2
"Описание:
При проведении документа "Поступление ТМЦ (Импорт)" сумма, на
которую корректируется движения по партионному учету берется из
книги покупок, но для данного документа необходимо определять
сумму по регистру взаиморасчетов и не корректировать отражение в
партиях сумму таможенных платежей.
Способ исправления:
1. в модуле документа "Поступление ТМЦ (Импорт)" нужно заменить
процедуру СкорретироватьДвиженияПартийПоАвансам() на следующую:
Процедура СкорретироватьДвиженияПартийПоАвансам()
ОбщаяСуммаДокумента = глПересчет(глОбщаяСуммаДокумента(Контекст), Валюта, Курс, глРубли, 1, Кратность, 1);
ОбщаяСуммаПоУчету = 0;
РегистрВзаиморасчетов = СоздатьОбъект("Регистр.Поставщики");
Если РегистрВзаиморасчетов.ВыбратьДвиженияДокумента(ТекущийДокумент()) = 1 Тогда
Пока РегистрВзаиморасчетов.ПолучитьДвижение() = 1 Цикл
Если РегистрВзаиморасчетов.КодОперации = глКО.Закупка Тогда
ОбщаяСуммаПоУчету = ОбщаяСуммаПоУчету + РегистрВзаиморасчетов.ОценкаРуб;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Если ОбщаяСуммаПоУчету <> 0 Тогда
// если документ не отражается по книгам покупок/продаж, корректировать не надо
ТаблицаКорректировкиПартий = глСоздатьТаблицуКорректировкиПартий();
глЗаполнитьТаблицуПоДвижениямРегистраПартий(ТаблицаКорректировкиПартий, Контекст);
глСкорретироватьСуммыПартий(ТаблицаКорректировкиПартий, ОбщаяСуммаДокумента, ОбщаяСуммаПоУчету);
глЗаписатьДвиженияРегистраПартийПоТаблице(ТаблицаКорректировкиПартий, Контекст);
КонецЕсли;
КонецПроцедуры // СкорретироватьДвиженияПартийПоАвансам()
2. в глобальном модуле заменить процедуру глСкорретироватьСуммыПартий() на следующую:
Процедура глСкорретироватьСуммыПартий(ТаблицаКорректировкиПартий, ОбщаяСуммаДокумента, ОбщаяСуммаПоУчету) Экспорт
ТаблицаКорректировкиПартий.ВыбратьСтроки();
Пока ТаблицаКорректировкиПартий. ПолучитьСтроку() = 1 Цикл
ТаблицаКорректировкиПартий.Количество = 0;
ТаблицаКорректировкиПартий.СуммаУпр = 0;
Если ТаблицаКорректировкиПартий.КодОперации = глКО.ТаможенныеПлатежи Тогда
ТаблицаКорректировкиПартий.СуммаРуб = 0;
ТаблицаКорректировкиПартий.СуммаБезНДС = 0;
ТаблицаКорректировкиПартий.СуммаПлат = 0;
ТаблицаКорректировкиПартий.ПродСтоимость = 0;
ТаблицаКорректировкиПартий.Выручка = 0;
Иначе
ТаблицаКорректировкиПартий.СуммаРуб = ТаблицаКорректировкиПартий.СуммаРуб * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.СуммаБезНДС = ТаблицаКорректировкиПартий.СуммаБезНДС * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.СуммаПлат = ТаблицаКорректировкиПартий.СуммаПлат * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.ПродСтоимость = ТаблицаКорректировкиПартий.ПродСтоимость * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.Выручка = ТаблицаКорректировкиПартий.Выручка * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
КонецЕсли;
КонецЦикла;
КонецПроцедуры // глСкорретироватьСуммыПартий()
"
При проведении документа "Поступление ТМЦ (Импорт)" сумма, на
которую корректируется движения по партионному учету берется из
книги покупок, но для данного документа необходимо определять
сумму по регистру взаиморасчетов и не корректировать отражение в
партиях сумму таможенных платежей.
Способ исправления:
1. в модуле документа "Поступление ТМЦ (Импорт)" нужно заменить
процедуру СкорретироватьДвиженияПартийПоАвансам() на следующую:
Процедура СкорретироватьДвиженияПартийПоАвансам()
ОбщаяСуммаДокумента = глПересчет(глОбщаяСуммаДокумента(Контекст), Валюта, Курс, глРубли, 1, Кратность, 1);
ОбщаяСуммаПоУчету = 0;
РегистрВзаиморасчетов = СоздатьОбъект("Регистр.Поставщики");
Если РегистрВзаиморасчетов.ВыбратьДвиженияДокумента(ТекущийДокумент()) = 1 Тогда
Пока РегистрВзаиморасчетов.ПолучитьДвижение() = 1 Цикл
Если РегистрВзаиморасчетов.КодОперации = глКО.Закупка Тогда
ОбщаяСуммаПоУчету = ОбщаяСуммаПоУчету + РегистрВзаиморасчетов.ОценкаРуб;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Если ОбщаяСуммаПоУчету <> 0 Тогда
// если документ не отражается по книгам покупок/продаж, корректировать не надо
ТаблицаКорректировкиПартий = глСоздатьТаблицуКорректировкиПартий();
глЗаполнитьТаблицуПоДвижениямРегистраПартий(ТаблицаКорректировкиПартий, Контекст);
глСкорретироватьСуммыПартий(ТаблицаКорректировкиПартий, ОбщаяСуммаДокумента, ОбщаяСуммаПоУчету);
глЗаписатьДвиженияРегистраПартийПоТаблице(ТаблицаКорректировкиПартий, Контекст);
КонецЕсли;
КонецПроцедуры // СкорретироватьДвиженияПартийПоАвансам()
2. в глобальном модуле заменить процедуру глСкорретироватьСуммыПартий() на следующую:
Процедура глСкорретироватьСуммыПартий(ТаблицаКорректировкиПартий, ОбщаяСуммаДокумента, ОбщаяСуммаПоУчету) Экспорт
ТаблицаКорректировкиПартий.ВыбратьСтроки();
Пока ТаблицаКорректировкиПартий. ПолучитьСтроку() = 1 Цикл
ТаблицаКорректировкиПартий.Количество = 0;
ТаблицаКорректировкиПартий.СуммаУпр = 0;
Если ТаблицаКорректировкиПартий.КодОперации = глКО.ТаможенныеПлатежи Тогда
ТаблицаКорректировкиПартий.СуммаРуб = 0;
ТаблицаКорректировкиПартий.СуммаБезНДС = 0;
ТаблицаКорректировкиПартий.СуммаПлат = 0;
ТаблицаКорректировкиПартий.ПродСтоимость = 0;
ТаблицаКорректировкиПартий.Выручка = 0;
Иначе
ТаблицаКорректировкиПартий.СуммаРуб = ТаблицаКорректировкиПартий.СуммаРуб * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.СуммаБезНДС = ТаблицаКорректировкиПартий.СуммаБезНДС * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.СуммаПлат = ТаблицаКорректировкиПартий.СуммаПлат * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.ПродСтоимость = ТаблицаКорректировкиПартий.ПродСтоимость * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
ТаблицаКорректировкиПартий.Выручка = ТаблицаКорректировкиПартий.Выручка * (ОбщаяСуммаПоУчету / ОбщаяСуммаДокумента - 1);
КонецЕсли;
КонецЦикла;
КонецПроцедуры // глСкорретироватьСуммыПартий()
"
автоматическая проводка документом общего назначениявзаимоувязка информации хранящейся в справочниках ЗиК 7.7
Читают тему
(гостей: 1)