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

Потому что подразделениеОрганизации это не строка

Если док.ПодразделениеОрганизации <> "Основое подразделение" Тогда

подсказываю док.ПодразделениеОрганизации - не строка, так что же ты его со строкой сравниваешь?

(0) используй обработку справочников и документов
есть в типовых(некоторых) или на итс

(3) апаздал

А как лучше данный код подправить?

(3) а в каких типовых ее нет?

(5) данный код лучше выкинуть

Наименование сравнить не могу, так как это тоже не строка. А по отладке и значению у него значение равно данному выражению

(5) Ты не сможешь присвоить строку док.ПодразделениеОрганизации

(6) в УТ11 она не много другая, групповое измение

"Наименование сравнить не могу, так как это тоже не строка"

а что это?

(5) Лучше воспользоваться вариантом (3)

(12) это опасно

(13) Его программирование не менее опасно =)

(6) в УТ 11 не нашел с ходу

(12) Он никак не сможет "сменить Подразделение на значение "Основное подразделение"" и  ничем

(10) о как )

типовой обработчик групповой обработки объектов вообще не запускается даже. Как лучше быть? Конфигурация БП 3.0

(18) уходить оттуда

(16) ... и ничем ему не помочь? )))

(15) выдели несколько строк в форме списка и контекстное меню. Вот оно теперь как)

(0) Перед циклом сделай
"ОсновноеПодразделение = Справочники.Подразделения.НайтиПоНаименованию("Основное подразделение");" и в цикле сравнивай с этой переменной и её же присваивай реквизиту документа.

Все элементы справочника Подразделения переименовать в "Основное подразделение"

(22) А не ПодразделенияОрганизаций?

(24) Ну это уже на месте разберется..

(21) и чего там? у меня никакого группового изменения нет (

Внимательно читайте сабж:Необходимо во всех документах приходного ордера сменить Подразделение на значение "Основное подразделение". Ответ в (23)

(20) Можно, если в справочнике Подразделение есть подразделение Основное подразделение. :)

Пятничное трололо? :)

(24) Даже СтруктураПредприятия может быть, а в реквизите Подразделение :)

(27) А потом как будет аналитика по Основному подразделению собираться?

Кто вручит бомбу юному подавану?

Хм... так это БП 3.0... Выборка на клиенте, стало быть вы БП 3.0 в обычном приложении открываете?

(0) потому что ты в ссылку запихиваешь строку

(31) мух отдельно от котлет!)

да, в обычном открываем для запуска обработчика.

Процедура ОсновныеДействияФормыВыпольнить(Кнопка)
    
    ОсновноеПодразделение = Справочники.ПодразделенияОрганизаций.НайтиПоНаименованию("Основое подразделение");
    
    Докум = Документы.ПриходныйКассовыйОрдер.Выбрать();
    Пока Докум.Следующий() Цикл
        док = Докум.ПолучитьОбъект();
        Если док.ПодразделениеОрганизации <> ОсновноеПодразделение Тогда
            док.ПодразделениеОрганизации=ОсновноеПодразделение;
            док.Записать(РежимЗаписиДокумента.Проведение);
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры

(37) Большое спасибо. Так и понял.

(37) Ставлю 50 руб на то, что после этого у него будут пустые ссылки в подразделении ))))

Если бездумно копировать будет )))

Гонокод, костыль, но самое простое и быстрое решение:
Если СокрЛП(док.ПодразделениеОрганизации) <> "Основое подразделение"

(41) изменять то на чё?

(39) ну я название из (0) брал

(42) чорт (

(44) да не переживай, он не проведённые документы без пометки удаления проведёт, или на ошибку нарвется...

(45) а если непроведенных и помещенных на удаление доков не будет?))

(46) Тогда считай, что повезло.

+ (37) Нужно "ПолучитьОбъект()" делать после проверки подразделения.

(48) для чего?

(49) Чтобы не считывать весь объект, если не нужна его обработка. До конца не уверен, скорее всего он и так полностью в кэш будет считан при обращении к "док.ПодразделениеОрганизации", но интуиция подсказывает что будет правильнее.

(50) Да и ссылки, в которых нужно заменить подразделение лучше сразу запросом получить все, а не гонять выборку.

ОсновноеПодразделение = Справочники.ПодразделенияОрганизаций.НайтиПоНаименованию("Основное подразделение")

Запрос = Новый Запрос;
Запрос.Текст =  "ВЫБРАТЬ
                       |    ПриходныйКассовыйОрдер.Ссылка
                       |ИЗ
                       |    Документ.ПриходныйКассовыйОрдер КАК ПриходныйКассовыйОрдер
                       |ГДЕ
                       |    ПриходныйКассовыйОрдер.Проведен
                       |    И ПриходныйКассовыйОрдер.Подразделение <> &ОсновноеПодразделение";

Запрос.УстановитьПараметр("ОсновноеПодразделение", ОсновноеПодразделение);

Результат = Запрос.Выполнить();
Если Результат.Пустой() Тогда
    Сообщить("Документы с не правильным подразделением не нашлись");
    Возврат;
КонецЕсли;

Выборка = Результат.Выбрать();
Пока Выборка.Следующий() цикл

   ДокОбъект = Выборка.ПолучитьОбъект();
   ДокОбъект.ПодразделениеОрганизации = ОсновноеПодразделение;
   Попытка
      ДокОбъект.Записать(РежимЗаписиДокумента.Проведение);
   Исключение
      Сообщить(ОписаниеОшибки());
   КонецПопытки;
КонецЦикла;

Вот что с человеком делает скука...

(52) не будет работать

(53) Лучше НайтиПоНаименованию заменить на НайтиПоКоду, наверное, может подразделение быть Основное подразделение2

(54) Да да
ДокОбъект = Выборка.Ссылка.ПолучитьОбъект();

(55) Исходил из условий в (0)

(57) В справочнике помимо "Основное подразделение" может быть "Основное подразделение такое-то", он и его подхватит.

(58) =)
ОсновноеПодразделение = Справочники.ПодразделенияОрганизаций.НайтиПоНаименованию("Основное подразделение", Истина);

(58) Не сразу понял на что ты в (55) намекал

(60) Истина - будет полностью совпадать с наименованием (за исключением "хвостовых" пробелов в наименовании). :)

(61) Ну все, сдаюсь ))) Пусть тогда по коду ищет))) а еще лучше интерактивно выбирает.

(62) :)

(62) еще можно сделать предопределенным :)))