Здравствуйте.
вот процедура
Процедура КнопкаВыполнитьНажатие(Кнопка)
   Запрос = Новый Запрос;
   
   Запрос.Текст =
           "ВЫБРАТЬ
    |    Номенклатура.Ссылка
    |ИЗ
    |    Справочник.Номенклатура КАК Номенклатура
    |ГДЕ
    |    Номенклатура.Ссылка " +?(ВГруппеИлиРавно="равно","=&Ссылка", "В ИЕРАРХИИ (&Ссылка)");
   
    Запрос.УстановитьПараметр("Ссылка",Товар);
   
    Результат = Запрос.Выполнить().Выбрать();
   
   Пока Результат.Следующий() ЦИКЛ
       
       Ссылка = Результат.Ссылка;
       Сообщить(Ссылка.Наименование);
       
       
   Если Ссылка.ЭтоГруппа Тогда
       Продолжить;
   КонецЕсли;

   ВыборкаЕдиниц = Справочники.ЕдиницыИзмерения.Выбрать(, Ссылка);
   Если ВыборкаЕдиниц.Следующий() Тогда
       НайденнаяЕдиница = ВыборкаЕдиниц.Ссылка;
   Иначе
       НайденнаяЕдиницаОбъект                         = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
       НайденнаяЕдиницаОбъект.Наименование            = БазоваяЕдиницаИзмерения.Наименование;
       НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = БазоваяЕдиницаИзмерения;
       НайденнаяЕдиницаОбъект.Коэффициент             = 1;
       НайденнаяЕдиницаОбъект.Владелец                = Ссылка;

       Попытка
           НайденнаяЕдиницаОбъект.Записать();
       Исключение
           Сообщить("Не удалось записать единицу: " + ОписаниеОшибки(), СтатусСообщения.Важное);
           Отказ = Истина;
           Возврат;
       КонецПопытки;

       НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;
   КонецЕсли;

   ЕдиницаХраненияОстатков = НайденнаяЕдиница;

   Попытка
       ЕдиницаХраненияОстатков.Записать();
   Исключение
       Отказ = Истина;
   КонецПопытки;
         КонецЦикла;
КонецПроцедуры

процедура работает, но не полностью. добавляет БазоваяЕдиницаИзмерения, но не добавляет ЕдиницаХраненияОстатков. в чем ошибка?

(0) Отладчик?

подскажу, разные типы

(2) ты не прав.

Могу, конечно ошибаться, но единицу хранения просто так не поменяешь. Где-то в коде (точно не помню) стоит "Отказ = Истина;".

(3) думаешь ?

объектном = Ссылка.получитьобъект();
объектном.единицахраненияостатков = НайденнаяЕдиница;
объектном.записать();

(4) открой для себя конструкцию
Если ОбменДанными.Загрузка Тогда
   Возврат;
КонецЕсли;

и перейдешь на новый уровень

(7) Это к чему?

(8) к твоему посту в этой ветке естественно

(8) это тебе ответ на (4) ... все нечем крыть ?

(0)  Процедура КнопкаВыполнитьНажатие(Кнопка) - это где?
ЕдиницаХраненияОстатков - это что?

случайно не из типовой копи-паст?

Процедура ПроверитьЕдиницуХраненияОстатков(Отказ)

   Если ЗначениеЗаполнено(ЕдиницаХраненияОстатков) Тогда
       Возврат;
   КонецЕсли;

   ВыборкаЕдиниц = Справочники.ЕдиницыИзмерения.Выбрать(, Ссылка);
   Если ВыборкаЕдиниц.Следующий() Тогда
       НайденнаяЕдиница = ВыборкаЕдиниц.Ссылка;
   Иначе
       НайденнаяЕдиницаОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
       НайденнаяЕдиницаОбъект.Наименование            = БазоваяЕдиницаИзмерения.Наименование;
       НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = БазоваяЕдиницаИзмерения;
       НайденнаяЕдиницаОбъект.Коэффициент             = 1;
       НайденнаяЕдиницаОбъект.Владелец                = Ссылка;

       Попытка
           НайденнаяЕдиницаОбъект.Записать();
       Исключение
           Сообщить("Не удалось записать единицу хранения остатков: " + ОписаниеОшибки(), СтатусСообщения.Важное);
           Отказ = Истина;
           Возврат;
       КонецПопытки;

       НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;
   КонецЕсли;

   ЕдиницаХраненияОстатков = НайденнаяЕдиница;

   Попытка
       ЗаписатьВФорме();
   Исключение
       Отказ = Истина;
   КонецПопытки;

КонецПроцедуры // ПроверитьЕдиницуХраненияОстатков()

(11) ЕдиницаХраненияОстатков это ЕдиницаХраненияОстатков. Кэп.

я так понял, что ТС программно прописывает единицы в номенклатуре... элемент ЕдиницыИзмерения создал. а в карточке элемента Номенклатуры ссылку не привязал

(12) если более подробно, то та единица в которой буду сформированы движения документа

(13) так может это в форме элемента

(12) спасибо, но это так-же может быть и переменная, реквизит формы, реквизит документа, справочника, обработки...

(11) Реквизит объекта номенклатура, думаю

(16) вы совершенно правы - это и есть реквизит справочника Номенклатура

Хотя если в контексте (0) - это переменная со ссылкой

(18) телепат? ...я вот не уверен что эта процедура у автора в  справочнике Номенклатура, мне почему-то кажется, что в обработке

(19), а гоню. Это действительно что угодно может быть, зависит от контекста, где (0) написано

+20 могу конечно ошибаться, но автор пояснять не хочет :)

Но там явно ссылка и
   Попытка
       ЕдиницаХраненияОстатков.Записать();
всегда вызывает исключение

судя по конструкции

Отказ = Истина;

это таки модуль объекта

Думаю это кривая и косая копипаста с поста ПалПетровича, ну точнее с его первоисточника

(23) ксати да :)

а в чем смысл
|    Номенклатура.Ссылка " +?(ВГруппеИлиРавно="равно","=&Ссылка", "В ИЕРАРХИИ (&Ссылка)");
она как-то по другому работает разве чем:
|    Номенклатура.Ссылка В ИЕРАРХИИ (&Ссылка)";
?

(24) Судя по названию процедуры "КнопкаВыполнитьНажатие(Кнопка)"  -наврядли модулб объекта :)

А отказ - это тупо переменная, котрая исчезает после завершения этой процедуры

(25) ну первоисточнок - в УТ, в модуле формы спраочника номенклатура :)

Короче я раскрыл заговор. Автору учить отличие между объектом и ссылкой.

(27) тоже первым делом сомневался, но...

Автор кстати создал тему и свалил, истину мы не узнаем ^^

(0) как-то так получше будет:

Процедура КнопкаВыполнитьНажатие(Кнопка)
   Запрос.Текст = "ВЫБРАТЬ
    |    Номенклатура.Ссылка
    |ИЗ
    |    Справочник.Номенклатура КАК Номенклатура
    |ГДЕ
    |    Номенклатура.Ссылка В ИЕРАРХИИ (&ВыбНоменклатура)");
   
    Запрос.УстановитьПараметр("Ссылка",Товар);
    Результат = Запрос.Выполнить().Выбрать();
    Пока Результат.Следующий() ЦИКЛ
        НоменклатураСсылка = Результат.Ссылка;
        Если НоменклатураСсылка.ЭтоГруппа Тогда
            Продолжить;
        КонецЕсли;
       
        ВыборкаЕдиниц = Справочники.ЕдиницыИзмерения.Выбрать(, НоменклатураСсылка);
        Если ВыборкаЕдиниц.Следующий() Тогда
            НайденнаяЕдиница = ВыборкаЕдиниц.Ссылка;
        Иначе
            НайденнаяЕдиницаОбъект                         = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
            НайденнаяЕдиницаОбъект.Наименование            = НоменклатураСсылка.БазоваяЕдиницаИзмерения.Наименование;
            НайденнаяЕдиницаОбъект.ЕдиницаПоКлассификатору = НоменклатураСсылка.БазоваяЕдиницаИзмерения;
            НайденнаяЕдиницаОбъект.Коэффициент             = 1;
            НайденнаяЕдиницаОбъект.Владелец                = НоменклатураСсылка;
            Попытка
                НайденнаяЕдиницаОбъект.Записать();
            Исключение
                Сообщить("Не удалось записать единицу: " + ОписаниеОшибки(), СтатусСообщения.Важное);
                Возврат;
            КонецПопытки;
            НайденнаяЕдиница = НайденнаяЕдиницаОбъект.Ссылка;
        КонецЕсли;
       
        НоменклатураОбъект = НоменклатураСсылка.ПолучитьОбъект();
        НоменклатураОбъект.ЕдиницаХраненияОстатков = НайденнаяЕдиница;
        Попытка
            НоменклатураОбъект.Записать();
        Исключение
        КонецПопытки;
    КонецЦикла;
КонецПроцедуры    
зы: не проверял, но вроде ошибок нет :)

* мля :)
Запрос.УстановитьПараметр("ВыбНоменклатура",ВыбНоменклатура); // ВыбНоменклатура - реквизит на форме обработки

Спасибо большое palpetrovich! а ошибка есть, забыли поставить "." между Номенклатура и Ссылка :)

НоменклатураОбъект = НоменклатураСсылка.ПолучитьОбъект();

(35) не-не, там-же раньше НоменклатураСсылка = Результат.Ссылка;
а вот что забыл, так это вначале: Запрос = новый Запрос; :)

(35) Гы-гы. Не надо там точки