Перебрать все значения в справочнике

[malvina_l]

Не понимаю реально задачи.Если просто перебрать все наименования справочника, то ГДЕ не нужно, а нужен просто опрос справочника:

Код Выделить Развернуть


Запрос = Новый Запрос;
Запрос.Текст ="
|1.ссылка,
|1.Наименование КАК Наименование
|ИЗ
|Справочник.1 КАК 1
|";
Результат = Запрос.Выполнить().Выбрать();
Пока Результат.Следующий() Цикл
    Сообщить("Наименование:" + Результат.Наименование);
КонецЦикла;



Если нужно найти в справочнике с поиском по конкретному значению Наименования, то добавляем секцию

Код Выделить Развернуть


|Где
|   1.Наименование = &ПоискНаименования

Перед получением запроса передаем параметр

Код Выделить Развернуть


Запрос.УстановитьПараметр("ПоискНаименования",ПараметрПоиска);

"ПараметрПоиска" - можем задавать по своему усмотрению или получать ранее по алгоритмам (пустым быть не должно - выдаст ошибку).

Задача такая: в справочнике нужно в наименовании удалить пробелы вот я написала:
   
     Наименование=справочники.1.НайтиПоНаименованию(Наименование);

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

[LordWizard]

Думаю, что можно следующее, цикл делает выборку по всему справочнику на простом доступном уровне, а вот внутри цикла

Код Выделить Развернуть


Пока Результат.Следующий() Цикл //есть хоть один элемент
    Если Найти(Резултат.Наименование,"  ") Тогда
        ЭлементСправочника = Результат.Ссылка;
        ЭлементСправочника.Наименование = СокрЛП(ЭлементСправочника.Наименование); //обрежем пустышки слева и справа
        ЭлементСправочника.Наименование = СтрЗаменить(ЭлементСправочника.Наименование,"  "," "); //заменим два пробела на один - вдруг составное имя типа "Болт железный" содержит два пробела вместо одного
        ЭлементСправочника.Записать();
    Иначе
        Продолжить;
    КонецЕсли;

КонецЦикла;


[malvina_l]

Думаю, что можно следующее, цикл делает выборку по всему справочнику на простом доступном уровне, а вот внутри цикла

Код Выделить Развернуть


Пока Результат.Следующий() Цикл //есть хоть один элемент
    Если Найти(Резултат.Наименование,"  ") Тогда
        ЭлементСправочника = Результат.Ссылка;
        ЭлементСправочника.Наименование = СокрЛП(ЭлементСправочника.Наименование); //обрежем пустышки слева и справа
        ЭлементСправочника.Наименование = СтрЗаменить(ЭлементСправочника.Наименование,"  "," "); //заменим два пробела на один - вдруг составное имя типа "Болт железный" содержит два пробела вместо одного
        ЭлементСправочника.Записать();
    Иначе
        Продолжить;
    КонецЕсли;

КонецЦикла;


делаю во внешней обработке, результат.ссылка не работает

[KrivosheevEV]

Добавить в запрос получение ссылки на элемент справочника:

Код Выделить Развернуть

//...
| 1.Наименование КАК Наименование,
| 1.Ссылка КАК Ссылка
//...