1С Бух77 Не заполняется субконто в строке документа Бухгалтерская справка

"Здравствуйте!<br>Не могу понять что делаю не правильно?!<br>Создаю внешнюю обработку, которая создает новый документ Бух справка и добавляет в неё новую строку.<br>Счета в проводку проставляются, а субконто нет! Выложу текст: <br><br>Процедура Сформировать()<br> Док = СоздатьОбъект("Документ.БухгалтерскаяСправка");<br> Док.Новый(); <br> СпрЗаказ = СоздатьОбъект("Справочник.ВидыНоменклатуры");<br> СпрЗаказ.НайтиПоКоду("23");<br> Заказ = СпрЗаказ.ТекущийЭлемент();<br><br> Док.НоваяСтрока(); <br> Док.СчетДт = СчетПоКоду("40"); <br> Док.СубконтоДт1 = Заказ;<br>       Док.СчетКт = СчетПоКоду("25");<br> <br> Док.Записать(); <br> ОткрытьФорму(Док.ТекущийДокумент());<br> <br>КонецПроцедуры<br><br><br>Подскажите, пожалуйста, как правильно заполнить субконто."

типовую смотрите!<br>З,Ы там еще надо установить тип реквизита,если не ошибаюсь!

"Добавила строчку <br>Док.НазначитьТип("СубконтоДт1","Справочник.ВидыНоменклатуры");<br>Помогло, Спасибо!"

Вот видишь, не зря же люди пишут конфигурацию!

"надо назначить ещё вид субконто для этих полей. В типовой есть процедура ПриВыбореСчета()<br>Взглянув на неё видим, что там написано:<br>Счет = ПолучитьАтрибут(ИдентификаторКолонки);<br>ИмяАтрибутаСубконто = СтрЗаменить(ИдентификаторКолонки, "Счет", "Субконто");<br>НазначитьТип(ИмяАтрибутаСубконто + "1", Счет.ВидСубконто(1));<br>НазначитьТип(ИмяАтрибутаСубконто + "2", Счет.ВидСубконто(2));<br>НазначитьТип(ИмяАтрибутаСубконто + "3", Счет.ВидСубконто(3));<br><br>т.е. для нашей обработки делаем так:<br>Док.НоваяСтрока(); <br>Док.СчетДт = СчетПоКоду("40"); <br>Док.НазначитьТип("СубконтоДт1", Док.СчетДт.ВидСубконто(1));<br>Док.НазначитьТип("СубконтоДт2", Док.СчетДт.ВидСубконто(2));<br>Док.НазначитьТип("СубконтоДт3", Док.СчетДт.ВидСубконто(3));<br>Док.СубконтоДт1 = Заказ;<br>Док.СчетКт = СчетПоКоду("25");<br>Док.НазначитьТип("СубконтоКт1", Док.СчетКт.ВидСубконто(1));<br>Док.НазначитьТип("СубконтоКт2", Док.СчетКт.ВидСубконто(2));<br>Док.НазначитьТип("СубконтоКт3", Док.СчетКт.ВидСубконто(3));<br>"

Большое спасибо! Очень подробно и понятно!Все получилось, Ура!!!