Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 17:46

Не находит поля

Автор LexaDF, 11 янв 2012, 14:19

0 Пользователей и 1 гость просматривают эту тему.

LexaDF

Доброго времени суток! Столкнулся с проблемой, перевел 1С 8.1 ред. 1.6 в 8.2 ред 2.0 все роде бы ничего но тут наткнулся на подводные камни. Один из них внешние обработки. Переконвертировал их из 8.1 в 8.2 , начал проверять их работоспособность и получил несколько  ошибок, пробовал исправить но так и не получилось  :dfbbdrfb:     :
КонецЕсли;
Перемещение.Номер = НомерДокумента;
Перемещение.Дата = ДатаДокумента;
Перемещение.Организация = Справочники.Организации.НайтиПоКоду("00001");
Перемещение.Ответственный = Ответственный;
[color=red]Перемещение.ОтражатьВНалоговомУчете = Истина;    // не находит поле[/color]
Перемещение.Комментарий = "Загружен из Производства";
СкладОтправительПР = XMLУзел.getAttribute("СкладОтправитель");

СкладОтправительБУХ = ТаблицаСкладов.Найти(СкладОтправительПР,"КодПроизводство");
Если СкладОтправительБУХ = Неопределено Тогда
Сообщить("В документе №" + НомерДокумента + " от " + Строка(ДатаДокумента) + " не указан склад.");
Продолжить;
КонецЕсли;
Перемещение.СкладОтправитель = Справочники.Склады.НайтиПоКоду(СкладОтправительБУХ.КодБухгалтерия);
СкладПолучательПР = XMLУзел.getAttribute("СкладПолучатель");
СкладПолучательБУХ = ТаблицаСкладов.Найти(СкладПолучательПР,"КодПроизводство");
Перемещение.СкладПолучатель  = Справочники.Склады.НайтиПоКоду(СкладПолучательБУХ.КодБухгалтерия);
Перемещение.Товары.Очистить();
Для каждого ТЧ из XMLУзел.childNodes Цикл
НоваяСтрока = Перемещение.Товары.Добавить();
НоменклатураПР = ТЧ.getAttribute("Номенклатура");
НоменклатураБУХ = ТаблицаСырья.Найти(НоменклатураПР,"КодПроизводство");
Если НоменклатураБУХ = Неопределено Тогда
Сообщить("В документе №" + НомерДокумента + " от " + Строка(ДатаДокумента) + " указана неизвестная номенклатура.");
НеЗаписывать = Истина;
Продолжить;
КонецЕсли;
ГруппаНоменклатуры = Справочники.Номенклатура.НайтиПоНаименованию("Мясосырье");
НоваяСтрока.Номенклатура = Справочники.Номенклатура.НайтиПоКоду(НоменклатураБУХ.КодБухгалтерия,,ГруппаНоменклатуры);
Если НоваяСтрока.Номенклатура.Наименование = "" Тогда
ГруппаНоменклатуры = Справочники.Номенклатура.НайтиПоНаименованию("Добавки");
НоваяСтрока.Номенклатура = Справочники.Номенклатура.НайтиПоКоду(НоменклатураБУХ.КодБухгалтерия,,ГруппаНоменклатуры);
Если НоваяСтрока.Номенклатура.Наименование = "" Тогда
НеЗаписывать = Истина;
Сообщить("В документе №" + НомерДокумента + " от " + Строка(ДатаДокумента) + " указана неизвестная номенклатура.");
КонецЕсли;
КонецЕсли;
НоваяСтрока.Количество = ТЧ.getAttribute("Количество");
Если НоваяСтрока.Количество = 0 Тогда
НеЗаписывать = Истина;
Сообщить("В документе №" + НомерДокумента + " от " + Строка(ДатаДокумента) + " не указано количество.");
КонецЕсли;
[color=red]НоваяСтрока.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.НайтиПоКоду("10.01");           // не находит поле
    НоваяСтрока.НовыйСчетУчетаБУ = ПланыСчетов.Хозрасчетный.НайтиПоКоду("10.01");
НоваяСтрока.СчетУчетаНУ = ПланыСчетов.Налоговый.НайтиПоКоду("10.01");
НоваяСтрока.НовыйСчетУчетаНУ = ПланыСчетов.Налоговый.НайтиПоКоду("10.01");[/color]



При активации загрузки он выдает следущее :
{Форма.Форма.Форма(82)}: Поле объекта не обнаружено (ОтражатьВНалоговомУчете)
      Перемещение.ОтражатьВНалоговомУчете = Истина;


или

{Форма.Форма.Форма(120)}: Поле объекта не обнаружено (СчетУчетаБУ)
         НоваяСтрока.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.НайтиПоКоду("10.01");


Не знаю что делать уже :( а просят срочно нужно выгрузить данные  :(( посоветуйте  пожалуйста!!!


Dethmontt

Ну ты посмотри эти реквизиты то есть у документ или нет!!!
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск