Задача: есть справочник Контакты. Ему подчинен справочник: Созвоны. Надо отобрать элементы справочника (сделанные созвоны) Созвоны, согласно текущей дате. Как способ наиболее быстрый? Может, кто пробовал? Количество контактов: около 30000 шт. Созвонов: по 5-7 шт на каждый контакт.

Запросом можно
Выбрать по реквизиту (если есть индекс по дате)
Прямым запросом можно

ЗАпросом.
Прямым или чОрным..

Не юли, пиши код, а мы поможем :)

(2) Лучше прямым, быстрее :)

(4) Если человек задаёт такой вопрос, то ой не факт...

Кон = СоздатьОбъект("Справочник.Контакты");
Соз = СоздатьОбъект("Справочник.Созвоны");    
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Созвоны_");    
Таб.ВывестиСекцию("Заг");

Но = 0;
Кон.ВыбратьЭлементы();
Пока Кон.ПолучитьЭлемент() > 0 Цикл    
   Соз.ИспользоватьВладельца(Кон);
   Соз.ВыбратьЭлементы();
   Пока Соз.ПолучитьЭлемент() > 0 Цикл            
           Если Соз.ДатаСозвона = Д тогда        
               СИН = Найти(Соз.Автор, СокрЛП(глПользователь));
               Если СИН > 0   тогда
                     Но = Но + 1;        
                   Таб.ВывестиСекцию("Тело");
               КонецЕсли;
           КонецЕсли;
       КонецЦикла;
   КонецЦикла;
   
   Таб.ПараметрыСтраницы(2,,,,,,,,,,,);
   Таб.Опции(0);    
   Таб.ТолькоПросмотр(1);
   Таб.Показать("Созвоны_", "");

Соз.ИспользоватьВладельца(Кон);

Пиши так

Соз.ИспользоватьВладельца(Кон.ТекущийЭлемент());

+(6) И что тебя тревожит?

Меня тревожит то, что это долго, что ужас. Думал, может есть способы побыстрее обработать и выдать на гора

(6) для обращения к спр. созвоны не обязательно перебирать все элементы контактов
можно напрямую созвоны перебирать (или запросом) в контакты уже через владельца получать

"в контакты" = "а контакты"

(9) Прямым запросом меньше секунды, но если ты не знаешь что это такое, то это длинная история :)

Что быстрее: перебор или запрос? Кто знает? Сам только учусь :)

Может кто переделает код под прямой запрос? Буду признателен.

1С - dbf

Если я не ошибаюсь - прямые запросы, только в SQl версии?

(16) ошибаешься

(16) Ошибаешь ищи класс "ПрямойЗапрос" он использует компоненту 1cpp и 1sqlite

Для начала с простыми запросами разберись ))

   "Обрабатывать НеПомеченныеНаУдаление;
   |Контакт = Справочник.Созвоны.Владелец;
   |Созвон = Справочник.Созвоны.ТекущийЭлемент;
   |ДатаС = Справочник.Созвоны.ДатаСозвона;
   |Автор = Справочник.Созвоны.Автор;
   |Условие (ДатаС = Д);
   |Условие (Найти(Автор, СокрЛП(глПользователь)) > 0)
   |Без Итогов;
   |"


(19) Спасибо. Простые я могу делать. Просто перед тем как делать думал переспросить. Может кто уже пробовал так делать. Всем спасибо.

Поставь у "ДатаСозвона" сортировку и делай ВыбратьПоРеквизиту()
При обходе проверяй пользователя
Нафига перебирать во-первых все контакты, во-вторых все созвоны?

Что то я честно говоря несколько в недоумении :)

Условие (Найти(Автор, СокрЛП(глПользователь)) > 0)

А простите разве Автор это строка? Это помоему реквизит типа Справочник.Пользователи и собстрвенно должно быть:
Условие (Автор = глПользователь);

Что собственно даст существенный прирос в скорости.

(21) ВыбратьЭлементыПоРеквизиту()

SELECT
Спр.ParentExt as [Контакты $Справочник.Контакты],
Спр.ID as [Созвоны $Справочник.Созвоны],
$Спр.Автор
FROM
$Справочник.Созвоны as Спр
WHERE
$Спр.ДатаС = :ВыбКонтра AND $Спр.Автор = :глПользователь";

Не?

т.е.
WHERE
$Спр.ДатаСозвона = :Д AND $Спр.Автор = :глПользователь";

Всем сразу скажу: писал это не я. Я только начал исправлять этот участок кода. Ибо он слишком тормозит работу программы при каждом включении.

(21) теоретически после сортировки, если следующий автор не тот, что ищем, можно прервать все циклы? я правильно понял?

(22) Да, а вот тут Вы правы - надо будет посмотреть и переделать эту проверку

(22) Автор - это реквизит справочника Созвоны.

(27) цикл с включенным фильтром гораздо быстрее выполнтся чем в твоем коде.

(27) Ты уж определись что первично и чем больше можно отсечь данных.
Я бы отсекал по дате. Дат явно больше чем авторов.
Выборка не будет упорядочена по авторам. Он может встретиться еще раз. Так что ничего прерывать не нужно.

(31) Спасибо за столь дельный совет. Один из лучших как для новичков. :) Реально спасибо! Так и сделаю