Цитата:
Сообщение от Sub
ellezar, скорей всего не правильно или не полностью обновлена конфа. в справочнике виды затрат у вас нет реквизита статьяналоговойдекларации. объединить еще раз с 288 мд-шником. в след раз строки кода надо копить до ошибки, т.к. после ошибки он все равно не исполняется и строки ни о чем не скажут, а вот до неясно что присваивается переменной спр
|
пробовал обновить повторно ситуация повторяется
вот код до ошыбки .Модуль(8920)
//новые ставки НДФЛ
Если СпрНИО.НайтиПоКоду("НДФЛОсн") = 1 Тогда
СпрНИО.Предел.Установить('01.04.11', 9410);
СпрНИО.Предел.Установить('01.10.11', 9410);
СпрНИО.Предел.Установить('01.12.11', 9410);
КонецЕсли;
ЗаполнитьСправочникСтатьиНалоговыхДеклараций();
Если флЗапВидЗатрат = 1 Тогда
ЗаполнитьВидыЗатрат();
СпрВЗ = СоздатьОбъект("Справочник.ВидыЗатрат");
Если СпрВЗ.НайтиПоКоду(1012) = 1 Тогда
Константа.ВидЗатратСебестРеалПокупныхЗапасов = СпрВЗ.ТекущийЭлемент();
Константа.ВидЗатратВозврат = СпрВЗ.ТекущийЭлемент();
КонецЕсли;
Иначе
Спр = СоздатьОбъект("Справочник.ВидыЗатрат");
СпрСтНД = СоздатьОбъект("Справочник.СтатьиНалоговыхДеклараци й");
Если Спр.НайтиПоКоду(100,1) = 0 Тогда
Спр.Новый();
Спр.Код = 100;
Спр.Наименование = "Себест. реализов. продукции";
Спр.ПолнНаименование = "Себестоимость реализованной продукции (работ, услуг) ";
Спр.СчетЗакрытия = СчетПоКоду("943");
Спр.ПостОбщепроизвЗатрата = 0;
СпрСтНД.НайтиПоКоду("1/5/1");
//Собівартість реалізованої продукції, робіт, послуг власного виробництва
Спр.СтатьяНалоговойДекларации = СпрСтНД.ТекущийЭлемент();
Спр.Родитель = Спр.ТекущийЭлемент();
Спр.Записать();
КонецЕсли;
Если Спр.НайтиПоКоду(101,1) = 0 Тогда
Спр.Новый();
Спр.Код = 101;
Спр.Наименование = "Себест.реализов.покупных запасов";
Спр.ПолнНаименование = "Себестоимость реализованных покупных запасов ";
Спр.СчетЗакрытия = СчетПоКоду("943");
Спр.ПостОбщепроизвЗатрата = 0;
СпрСтНД.НайтиПоКоду("1/5/2");
код Модуль(275)
Процедура ЗаполнитьВидыЗатрат()
Спр = СоздатьОбъект("Справочник.ВидыЗатрат");
СпрСтНД = СоздатьОбъект("Справочник.СтатьиНалоговыхДеклараци й");
ТекущийРодитель = 0;
Если Спр.НайтиПоКоду(1000) = 0 Тогда
Спр.НоваяГруппа();
Спр.Код = 1000;
КонецЕсли;
Спр.Наименование = "Статьи затрат по налогу на прибыль";
Спр.Записать();
РодительНК = Спр.ТекущийЭлемент();
Спр.ИспользоватьРодителя(РодительНК);
Если Спр.НайтиПоКоду(1001,1) = 0 Тогда
Спр.НоваяГруппа();
Спр.Код = 1001;
Спр.Наименование = "Другие операционные затраты";
Спр.Родитель = РодительНК;
Спр.Записать();
КонецЕсли;
ТекущийРодитель = Спр.ТекущийЭлемент();
Если Спр.НайтиПоКоду(1011,1) = 0 Тогда
Спр.Новый();
Спр.Код = 1011;
Спр.Наименование = "Себест. реализов. продукции";
Спр.ПолнНаименование = "Себестоимость реализованной продукции (работ, услуг) ";
Спр.СчетЗакрытия = СчетПоКоду("943");
Спр.ПостОбщепроизвЗатрата = 0;
СпрСтНД.НайтиПоКоду("1/5/1");
//Собівартість реалізованої продукції, робіт, послуг власного виробництва
Спр.СтатьяНалоговойДекларации = СпрСтНД.ТекущийЭлемент();
Спр.Родитель = ТекущийРодитель;
Спр.Записать();
КонецЕсли;
Если Спр.НайтиПоКоду(1012,1) = 0 Тогда
Спр.Новый();
Спр.Код = 1012;
Спр.Наименование = "Себест.реализов.покупных запасов";
Спр.ПолнНаименование = "Себестоимость реализованных покупных запасов ";
Спр.СчетЗакрытия = СчетПоКоду("943");
Спр.ПостОбщепроизвЗатрата = 0;
СпрСтНД.НайтиПоКоду("1/5/2");