новое событие
Информационный поток
Задания вакансии материалы разработки сообщения форума
Недолуга Александр Сергеевич
Приватное сообщение
Новый заказчик

обойти дубли запроса и прибавить к их наименованию АБВ

a.s.nedoluga
07.10.1993(31 год)
17 января 2024 в 22:03:42 (44 недели 1 день 22 часа назад)
Текст задания
Есть запрос, он выводит дубли Наименований из справочника Контрагенты. Как правильно обойти выборку запроса и для каждого дубля дописать АБВ? Задача простая, данные есть, незнаю как сделать алгоритм обхода дублей.


Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ ПЕРВЫЕ 3
| Контрагенты.Наименование КАК Наименование
|ПОМЕСТИТЬ ДублиНаименований
|ИЗ
| Справочник.Контрагенты КАК Контрагенты
|
|СГРУППИРОВАТЬ ПО
| Контрагенты.Наименование
|
|ИМЕЮЩИЕ
| СУММА(1) > 1
|;
|
|////////////////////////////////////////////////////////////­////////////////////
|ВЫБРАТЬ ПЕРВЫЕ 3
| Контрагенты.Наименование КАК Наименование
|ИЗ
| Справочник.Контрагенты КАК Контрагенты
|ГДЕ
| Контрагенты.Наименование В
| (ВЫБРАТЬ
| ДублиНаименований.Наименование КАК Наименование
| ИЗ
| ДублиНаименований КАК ДублиНаименований)
|ИТОГИ ПО
| Наименование";

РезультатЗапроса = Запрос.Выполнить();

ВыборкаНаименование = РезультатЗапроса.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

Пока ВыборкаНаименование.Следующий() Цикл
// Как обойти выборку? и добавить для дублей "АБВ" к наименованию?
КонецЦикла;
0
Отклики (8)