Если запись в ТЧ ДокВУ, то:
СПВУ = СоздатьОбъект("Справочник.ВидыУпаковки);
Если СПВУ.НайтиПоКоду(Код) = 1 Тогда // поскольку в сабже "код известен"
Новая строка();
//присвоение значений переменным ТЧ
Код = СПВУ.Код;
Наименование = СПВУ.Наименование;
КодТНВ = СБВУ.КодТНВ; //если он там есть
КонецЕсли;
Если в Таблицу значений, тогда
ТЗ = СоздатьОбъект("ТаблицаЗначений");
ТЗ.НоваяКолонка("Код");
...
...
ТЗ.НоваяСтрока();
ТЗ.Код = СПВУ.Код;
...
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший