перенос документов из Бух 4.5 в ТиС 9.2

"1С 7.7 сетевая (7.70.027)<br>бух редакции 4.5 (7.70.513)<br>торговля+склад 9.2 (7.70.938)<br><br>при нажатии в обработчике на кнопку сформировать выдает ошибку:<br>рн.Скидка=1*мПродажа.Скидка.Наименование;<br>{путь к файлу обработчика(281)}: Поле агрегатного объекта не обнаружено (Скидка)<br>Раньше все работало, как выяснилось были установлены какие-то обновления, после чего все и рухнуло.<br><br>Вот та часть кода в которой находится ошибка. Помогите пожалуйста и если можно объясните общедоступным языком что и куда, т.к. я не сильно разбираюсь в 1С. Заранее спасибо<br><br>//===========================================­===<br>// ЗаполнитьДокументРеализация()                  <br>//============================================== <br>Процедура ЗаполнитьДокументРеализация(мПродажа, рн) <br> Перем СтавкаНДС;<br> <br> вариантРасчетаНДС=мПродажа.СуммаВклНДС;<br>                    <br> <br> рн.Контрагент=ПолучитьКонтрагента(мПродажа.Контрагент.НаименованиеБух);<br> рн.Договор=рн.Контрагент.ОсновнойДоговор;<br> рн.МестоХранения=шаблонРеализ.МестоХранения;<br> рн.ВидОтгрузки=шаблонРеализ.ВидОтгрузки;<br> рн.УчитыватьНП=шаблонРеализ.УчитыватьНП;<br> рн.ЗачитыватьАванс=шаблонРеализ.ЗачитыватьАванс;<br> рн.Курс=шаблонРеализ.Курс;<br> рн.Скидка=1*мПродажа.Скидка.Наименование;<br> <br> Если фПродажаСНДС = 1 Тогда<br> Если вариантРасчетаНДС=1 тогда<br> рн.ВариантРасчетаНалогов=НДСВнутри;<br> Иначе<br> рн.ВариантРасчетаНалогов=НДССверху;<br> КонецЕсли;<br> Иначе<br> рн.ВариантРасчетаНалогов=шаблонРеализ.ВариантРасчетаНалогов;<br> КонецЕсли;<br> <br> рн.РасчетныйСчет=шаблонРеализ.РасчетныйСчет;<br> рн.ВерсияОбъекта=шаблонРеализ.ВерсияОбъекта;<br> //рн.НДСвключатьВСтоимость=шаблонРеализ.НДСвключатьВСтоимость;<br> рн.ТипЦен=шаблонРеализ.ТипЦен;<br> рн.ПоставщикуВыставляетсяСчетФактураНаВозврат=шаблонРеализ.ПоставщикуВыставляетсяСчетФактураНаВозврат; <br> рн.Скидка=1*мПродажа.Скидка.Наименование; <br> рн.ЦеныИзДокумента=шаблонРеализ.ЦеныИзДокумента; <br> <br> мПродажа.ВыбратьСтроки();<br> пока мПродажа.ПолучитьСтроку()=1 цикл<br> рн.НоваяСтрока(); <br> <br> Если мПродажа.Номенклатура.родитель.Наименование="Тара" Тогда<br> продолжить;<br> КонецЕсли;<br> <br> рн.Товар = ПолучитьНоменклатуру(мПродажа.номенклатура.НаименованиеБух,мПродажа.номенклатура.СтавкаНДС, рн.ДатаДок); <br> Если фПродажаСНДС = 1 Тогда<br> СтавкаНДС=рн.Товар.СтавкаНДС.Получить(рн.ДатаДок).Ставка; <br> КонецЕсли;<br> рн.Количество=мПродажа.Количество;<br> рн.Цена=мПродажа.Цена;<br> рн.Сумма=мПродажа.сумма;<br> рн.СумСкидка=рн.Количество*рн.Цена-рн.Сумма;<br> Если фПродажаСНДС = 1 Тогда<br> рн.НДС=мПродажа.СуммаНДС;<br> Если вариантРасчетаНДС=1 Тогда <br> рн.всего=рн.Сумма;<br> Иначе<br> РасчетНДС=Окр(рн.Сумма*ставкаНДС/100,2,1);<br> Если РасчетНДС<>рн.НДС Тогда<br> Сообщить("В докумененте реализация "+ мПродажа.НомерДок + " для товара " + рн.Товар + " не верно расчитан НДС");<br> КонецЕсли;<br> рн.всего=рн.Сумма+рн.НДС;<br> КонецЕсли;<br> Иначе<br> рн.всего=рн.Сумма;<br> КонецЕсли;<br>       <br> Если фГотоваяПродукция = 1 Тогда<br> ТаблицаГП.НоваяСтрока(); <br> ТаблицаГП.ДатаДок = мПродажа.ДатаДок;<br> ТаблицаГП.Товар = рн.Товар;<br> ТаблицаГП.Количество = рн.Количество;<br> Если фПлановаяСебестоимость = 1 Тогда<br> ТаблицаГП.Стоимость = рн.Цена;<br> ТаблицаГП.Сумма = Окр(рн.Количество*рн.Цена, 2, 1);<br> КонецЕсли;<br> КонецЕсли;<br> <br> КонецЦикла;<br> <br>КонецПроцедуры // ЗаполнитьДокументРеализация()"

"Впишите перед:<br>> рн.Скидка=1*мПродажа.Скидка.Наименование;<br>Сообщить(мПродажа.Вид());<br><br>узнаете в документе какого вида система пытается найти реквизит Скидка в то время когда его там нет.<br>И вообще вопрос, что значит:<br>1*мПродажа.Скидка.Наименование = ?<br><br>число на строку умножается"

Реализация и ниже та же ошибка

В типовой 1С:Бухгалтерии нет документа вида "Реализация".<br>Кстати, в документе "РасходнаяНакладная" реквизита "Скидка" тоже нет. Обработка, которая у вас не работает была создана для использования с какой то иной или для использования с измененной конфигурацией.

что порекомендуете сделать? можно как-то безболезненно избавиться от этой скидки?

Запросто, просто закомментарьте строку

"закомментировал строки, вроде все пошло, осталось разобраться верно ли теперь все документы переносит.<br><br>рн.Скидка=1*мПродажа.Скидка.Наименование;<br>рн.ЦеныИзДокумента=шаблонРеализ.ЦеныИзДокумента; <br><br>и<br><br>рн.СумСкидка=рн.Количество*рн.Цена-рн.Сумма;<br><br>спасибо!"

"Теперь выдаёт еще одну ошибку:<br><br>текДок.Записать();<br>{}:Номер не уникальный!<br><br>чтобы вернуть всё в первоначальное положение по базе данных, что нужно сделать? или нужно было скопировать её, а потом если что заменить?<br><br>// Сывак 11.06.2009 Начало<br>//==============================================<b­r>// СоздатьДокумент()                  <br>//==============================================<br>Проц­едура СоздатьДокумент(текДок, Продажа = """", текДатаДок = """")<br> Перем Ч; <br> Перем М;<br> Перем С;<br> <br> Ч = 0;<br> М = 0;<br> С = 0; <br> <br> текДок.Новый();<br> Если (текДок.Вид() <> "ГотоваяПродукция") И (текДок.Вид() <> "ПлановаяСебестоимость") Тогда<br> текДок.ДатаДок = Продажа.ДатаДок;<br> текДок.НомерДок = ПолучитьНомерДокумента(Продажа.НомерДок);<br> Иначе<br> текДок.ДатаДок = текДатаДок;<br> КонецЕсли;<br> <br> Если (текДок.Вид() = "ГотоваяПродукция") ИЛИ (текДок.Вид() = "ПлановаяСебестоимость") Тогда<br> текДок.Комментарий = "Создан по реализации и возвратам загруженым из Торговли-Склад " + Формат(ТекущаяДата(),"Д (0)ДДММММГГГГ");<br> Иначе<br> текДок.Комментарий = "Загружен из Торговли-Склад " + Формат(ТекущаяДата(),"Д (0)ДДММММГГГГ");<br> КонецЕсли;<br> <br> текДок.Записать();<br> <br> Если текДок.Вид() = "РасходнаяНакладная" Тогда<br> Ч = 12;<br> ИначеЕсли текДок.Вид() = "ПоступлениеТоваров" Тогда<br> Ч = 9;<br> ИначеЕсли текДок.Вид() = "ГотоваяПродукция" Тогда<br> Ч = 8;<br> ИначеЕсли текДок.Вид() = "ПлановаяСебестоимость" Тогда<br> Ч = 6;<br> КонецЕсли;<br> М = 0;<br> С = 0;<br> текДок.УстановитьВремя(Ч, М, С);<br> текДок.Записать(); <br> текДок.ПолучитьВремя(Ч, М, С);<br> Сообщить(""""+ текДок.ТекущийДокумент() + " " + Строка(Ч) + ":" + Строка(М) + ":" + Строка(С),"i");<br>КонецПроцедуры // СоздатьДокумент() // Сывак 11.06.2009 Окончание"

А что в этой процедуре : ПолучитьНомерДокумента(Продажа.НомерДок) ?

я не знаю =( где можно посмотреть что там или что?