Бухгалтерия, 2.0.28.3
Загружаю данные из Эксель в документ "ТребованиеНакладная". Необходимо прописать, что на вкладке "Счет затрат" всегда проставлялся СчетЗатрат = 20.01 и определенная статья затрат.
СчетЗатрат я прописала при загрузке как:

ДокРеализация = Документы.ТребованиеНакладная.СоздатьДокумент();
ДокРеализация.СчетЗатрат = ПланыСчетов.Хозрасчетный.ОсновноеПроизводство;


А вот как теперь сделать, чтобы всегда подтягивалась определенная статья затрат? Ниже код не сработал:
ДокРеализация.Субконто3 = Справочники.СтатьиЗатрат.НайтиПоКоду("000000167");

(0) посмотри что происходит по ПриВыборе счет затрат - может там и есть заполнение по умолчанию

зы: хороша Маша ))

(1) в типовом документе тоже такого нет, заполняется тоже только счет:


Процедура УстановитьСчетаУчетаИАналитикуЗатрат(СтрокаТЧ, Шаг)
   
   Если СчетаУчетаЗатратВТаблице Тогда
       СтрокаТЧ.СтатьяЗатрат     = СтрокаТЧ.Номенклатура.СтатьяЗатрат;
       УстновитьНоменклатурнуюГруппу(СтрокаТЧ, Шаг);
       УстановитьСчетаУчетаЗатрат(СтрокаТЧ, Шаг);
   Иначе
       СтрокаТЧ.СтатьяЗатрат     = "";
       СтрокаТЧ.НоменклатурнаяГруппа = "";
       СтрокаТЧ.СчетЗатрат = "";
   КонецЕсли;
КонецПроцедуры

Процедура УстановитьСчетаУчетаЗатрат(СтрокаТЧ, Шаг)
   
   Если СчетаУчетаЗатратВТаблице Тогда
       Если Материалы.Количество() = 1 Тогда
           ТекущийСчетЗатрат      = ПланыСчетов.Хозрасчетный.ОсновноеПроизводство;
       Иначе
           ПредыдущаяСтрокаТЧ = Материалы.Получить(СтрокаТЧ.НомерСтроки - Шаг);
           ТекущийСчетЗатрат = ПредыдущаяСтрокаТЧ.СчетЗатрат;
       КонецЕсли;
       СтрокаТЧ.СчетЗатрат = ТекущийСчетЗатрат;
   Иначе
       Если Не ЗначениеЗаполнено(СчетЗатрат) Тогда
           СчетЗатрат      = ПланыСчетов.Хозрасчетный.ОсновноеПроизводство;
       КонецЕсли;
   КонецЕсли;

КонецПроцедуры

(2) да не ваша )

как нет, а это что?        
СтрокаТЧ.СтатьяЗатрат     = СтрокаТЧ.Номенклатура.СтатьяЗатрат;

А как в моем случае применить код:

СтрокаТЧ.СтатьяЗатрат     = СтрокаТЧ.Номенклатура.СтатьяЗатрат;



Сейчас я пишу:
ДокРеализация = Документы.ТребованиеНакладная.СоздатьДокумент();
ДокРеализация.СчетЗатрат = ПланыСчетов.Хозрасчетный.ОсновноеПроизводство;

Счет подтягивается, но статью не получается подтянуть. Вот как это выглядит:
http://s017.radikal.ru/i434/1112/94/928badf11a91.jpg

а статья затрат чему равна?

(7) Справочники.СтатьиЗатрат.НайтиПоКоду("000000167");

Ап!

Еще в типовой БП, в модуле формы документа нашла процедуру. Объясните, как мне ее можно использовать???


Процедура СчетЗатратПриИзменении(Элемент)

   РаботаСДиалогами.ПриВыбореСчетаВТабличномПоле(Элемент.Значение,
       Субконто1, ЭлементыФормы.Субконто1,
       Субконто2, ЭлементыФормы.Субконто2,
       Субконто3, ЭлементыФормы.Субконто3,
       ПодразделениеЗатрат, ЭлементыФормы.ПодразделениеЗатрат);
                               
   Подразделение = Неопределено;
   РаботаСДиалогами.УстановитьПодразделениеПоСчету(
       ПодразделениеЗатрат, СчетЗатрат, Организация, Подразделение);
   
   Если ЭлементыФормы.Субконто2.ОграничениеТипа = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура.ТипЗначения Тогда
       ЭлементыФормы.Субконто2.Доступность = Ложь;
       ЭлементыФормы.Субконто2.Значение = "Из табличной части";
   ИначеЕсли (2 <= СчетЗатрат.ВидыСубконто.Количество()) и (ЗначениеЗаполнено(СчетЗатрат)) Тогда
       ЭлементыФормы.Субконто2.Доступность = Истина;
   КонецЕсли;
   Если ЭлементыФормы.Субконто3.ОграничениеТипа = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура.ТипЗначения Тогда
       ЭлементыФормы.Субконто3.Доступность = Ложь;
   ИначеЕсли (3 <= СчетЗатрат.ВидыСубконто.Количество()) и (ЗначениеЗаполнено(СчетЗатрат)) Тогда
       ЭлементыФормы.Субконто3.Доступность = Истина;
   КонецЕсли;
   
   Если НалоговыйУчетУСН.ПрименениеУСН(Организация, Дата) И ОтражениеВУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка() Тогда
       ОтражениеВУСН = Перечисления.ОтражениеВУСН.Принимаются;
   КонецЕсли;
   
   УстановитьВидимость();
   
КонецПроцедуры // СчетЗатратПриИзменении

когда открываешь загруженный документ у него становится флаг модификации?

положите на форму обработки реквизит статьи затрат и пусть бухи его заполнят и пусть он идет в Субконто3

Уже разобралась: надо было писать не ДокРеализация.Субконто3 = Справочники.СтатьиЗатрат.НайтиПоКоду("000000167");
А ДокРеализация.Субконто2 = Справочники.СтатьиЗатрат.НайтиПоКоду("000000167");

Пора отдыхать...

А статья затрат с таким кодом точно есть? Проверь отладчиком что возвращается.

(13). Все-равно было приятно пообщаться со столь симпатичной леди.