Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> При выполнении цикла ошибка "Не выбран элемент" 1с 7.7 конф 7.7.00          
ZUBR Подменю пользователя
сообщение 08.04.20, 1:41
Сообщение #1

Завсегдатай
****
Группа: Пользователи
Сообщений: 231
Из: Київ
Спасибо сказали: 5 раз
Рейтинг: 3

Здравствуйте. При выполнении цикла перебора элементов справочника Контрагенты номер телефона находит, предупреждение и открытие соответствующей формы, как и требуется, происходит. Но появляется в окне сообщений ошибка:

Пока Спр.ПолучитьЭлемент()=1 Цикл
{Отчет.ПОИСК.Форма.Модуль(124)}: Не выбран элемент!

Если Поиск=0 Тогда
        Спр = СоздатьОбъект("Справочник.Контрагенты");
        Спр.ВыбратьЭлементы();
        Пока Спр.ПолучитьЭлемент()=1 Цикл
            Если (Спр.НайтиПоРеквизиту("Телефоны",Телефон,1)=1)и(Спр.ТекущийЭлемент().ПометкаУдаления()=0) Тогда
                Поиск=2;
                Если Спр.ТекущийЭлемент().ЧС=1 Тогда
                    ОткрытьФорму(Спр.ТекущийЭлемент());
                    Предупреждение("ЦЕЙ ТЕЛЕФОН В ЧОРНОМУ СПИСКУ! "+Спр.ТекущийЭлемент().ПричинаЧС);
                КонецЕсли;                
            КонецЕсли;
        КонецЦикла;
    КонецЕсли;

В справочнике Контрагенты есть папки Поставщики и Покупатели. У меня все элементы в Покупателях

Кто знает, скажите, пожалуйста, в чем тут проблема. Спасибо.

Alegzander Подменю пользователя
сообщение 08.04.20, 8:45
Сообщение #2

Общительный
**
Группа: Пользователи
Сообщений: 28
Спасибо сказали: 9 раз
Рейтинг: 8

Если используется НайтиПоРеквизиту, зачем перебор всего справочника?

Через перебор справочника поменять
Цитата(ZUBR @ 08.04.20, 2:41) *
Если (Спр.НайтиПоРеквизиту("Телефоны",Телефон,1)=1)и(Спр.ТекущийЭлемент().ПометкаУдаления()=0) Тогда


на

Если (Спр.Телефоны=Телефон)и(Спр.ТекущийЭлемент().ПометкаУдаления()=0) Тогда

Спасибо сказали: ZUBR,

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 17.04.24, 0:31
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!