Когда создаю Списание программно не проводится документ

Подскажите что я не так заполняю. Создаю программно документ но он не проводится пишет - Невозможно определить налоговое назначение затрат для указанного счета затрат!
Бух. учет. Строка :1
Не списано 4 шт. товара 001.Актимель пит. натуральный 100 гр, счет учета 281 , налог. назначение: Необл. НДС, любая хоз.

Если я в место Записать использую открыть программно созданный документ то при проведение все проводится. При открытии что то наверно заполняется, уже все пересмотрел понять не могу.
Вот так создаю документ:
НовыйДокумент = Документы.СписаниеТоваров.СоздатьДокумент();
НовыйДокумент.Дата = ТекущаяДата();
НовыйДокумент.ПредседательКомиссии = Председатель.Ссылка;
НовыйДокумент.ПервыйЧленКомиссии = ЧленКомиссии;
НовыйДокумент.ВторойЧленКомиссии = ЧленКомиссии1;
НовыйДокумент.ТретийЧленКомиссии = ЧленКомиссии2;
НовыйДокумент.ИнвентаризацияТоваровНаСкладе = Ссылка;
НовыйДокумент.Основание = Ссылка;
НовыйДокумент.ОтражатьВБухгалтерскомУчете = Истина;
НовыйДокумент.ОтражатьВУправленческомУчете = Истина;
НовыйДокумент.ВидОперации = Перечисления.ВидыОперацийСписаниеТоваров.ТоварыПродукция;
НовыйДокумент.СчетДт = ПланыСчетов.Хозрасчетный.НайтиПоКоду("902");
НовыйДокумент.НалоговоеНазначениеДоходовИЗатрат = Справочники.НалоговыеНазначенияАктивовИЗатрат.НайтиПоКоду("000030");
ТабЧасть = НовыйДокумент.Товары;
Для каждого Строка Из Недостача Цикл
НоваяСтрока = ТабЧасть.Добавить();
НоваяСтрока.Номенклатура = Строка.Номенклатура;
НоваяСтрока.Количество = Строка.Количество;
НоваяСтрока.ЕдиницаИзмерения = НоваяСтрока.Номенклатура.ЕдиницаХраненияОстатков;
НоваяСтрока.Коэффициент = НоваяСтрока.ЕдиницаИзмерения.Коэффициент;
НоваяСтрока.СчетУчетаБУ = ПланыСчетов.Хозрасчетный.НайтиПоКоду("281");
НоваяСтрока.Качество = Справочники.Качество.Новый;
НоваяСтрока.НалоговоеНазначение = Справочники.НалоговыеНазначенияАктивовИЗатрат.НДС_Облагаемая;
КонецЦикла;

НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение);