Перенос "Ввод остатков" из Альфы в БП 2.0
Читают тему
Вход в личный кабинет
Для получения доступа к форуму необходимо
авторизоваться
или
зарегистрироваться
на сайте.
{{ formTitle ? formTitle : 'Заказ обратного звонка' }}
{{ formDescription }}
Сообщить об ошибке
В момент переноса документа "Ввод начальных остатков" из Альфы в Бухгалтерию формируются проводки (см.на скрине).
Проблема в следующем. В момент переноса формируется документ "Установка цен", цена берется как сумма по счету 41.11 и 42.01 деленное на количество. А учетная цена как сумма по счету 41.11 деленное на количество (т.к. по Дебету торговой наценки, вспомогательный счет 000). В результате при перемещении товаров возникает ошибка "Розничная цена не равна учетной".
Документы поступления формируют правильно, т.е. цена = как сумма по счету 41.11 и 42.01 деленное на количество.
Т.е. в обработке загрузки, если учет по продажным ценам, то изменил Стр.Сумма на Стр.СуммаРозничная
УстановитьРеквизит(ТекСтрока,"Сумма",Стр.СуммаРозничная)
Насчет документа Установки цен был не прав, там все правильно.
Просьба если что-то правили, привести участок кода с которым не согласны, что бы его можно было идентифицировать. К примеру указать процедуру загрузки (имя) и 5 строк вверх 5 строк вниз относительно измененной строки.
Номера строк не подойдут так как они постоянно меняются в результате доработок.
............
УстановитьРеквизит(ТекСтрока, "Количество", Стр.Количество);
//28.06.2011
//УстановитьРеквизит(ТекСтрока, "Сумма", Стр.Сумма); //ВСТАВАЛА ЭТА СУММА
//28.06.2011
Если ТоварыВРозницеНТТ ИЛИ ТоварыВРозницеАТТ Тогда
Если (мУчетВПродажныхЦенах) И ЗначениеЗаполнено(Стр.СуммаРозничная) И ЗначениеЗаполнено(Стр.Сумма) Тогда
ТорговаяНаценка = Стр.СуммаРозничная - Стр.Сумма;
УстановитьРеквизит(ТекСтрока, "ТорговаяНаценка", ТорговаяНаценка);
//28.06.2011
УстановитьРеквизит(ТекСтрока, "Сумма", Стр.СуммаРозничная);
//28.06.2011
КонецЕсли;
Если ТоварыВРозницеНТТ Тогда
УстановитьРеквизит(ТекСтрока, "СчетУчета", ПланыСчетов.Хозрасчетный.ТоварыВРозничнойТорговлеВПродажныхЦенахНТТ);
Иначе
УстановитьРеквизит(ТекСтрока, "СчетУчета", ПланыСчетов.Хозрасчетный.ТоварыВРозничнойТорговлеВПродажныхЦенахАТТ);
КонецЕсли;
Иначе
УстановитьРеквизит(ТекСтрока, "СчетУчета", Стр.СчетУчета);
КонецЕсли;
Если (мУчетВПродажныхЦенах) И ЗначениеЗаполнено(Стр.СуммаРозничная) И ЗначениеЗаполнено(Стр.Сумма) Тогда
По поводу суммы розничной чуть позже
Ошибка в обработке исправлена и будет включена в следующем релизе Альфы