v8: Выбрать документы с одинаковыми номерами

25.07.2011 14:51

Прочитано: 9538

Доброго дня! Подскажите пож-ста, отключен контроль уникальности номеров документов платежный ордер, надо отобрать повторяющиеся и вывести их в табличное поле. Спасибо!

Yandex

Возможно, вас также заинтересует

Anton Kolimbetov

25.07.2011 17:03

Ответ № 1

На примере документа "Реализация ТМЗ и услуг", подставьте вместо него в запросе свой документ.

Код 1C v 8.х

 
Процедура КнопкаВыполнитьНажатие(Кнопка)
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
	"ВЫБРАТЬ
	|	РеализацияТоваровУслуг.Ссылка
	|ИЗ
	|	Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
	|ГДЕ
	|	РеализацияТоваровУслуг.Номер В
	|			(ВЫБРАТЬ
	|				Список.Номер
	|			ИЗ
	|				(ВЫБРАТЬ
	|					РеализацияТоваровУслуг.Номер КАК Номер,
	|					КОЛИЧЕСТВО(РеализацияТоваровУслуг.Номер) КАК Количество
	|				ИЗ
	|					Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
	|				СГРУППИРОВАТЬ ПО
	|					РеализацияТоваровУслуг.Номер
	|				) КАК Список
	|			ГДЕ
	|				Список.Количество > 1)";
	Выгрузка = Запрос.Выполнить().Выгрузить();
	
	Таблица = ЭлементыФормы.ТЗ;//табличное поле со значением "таблица значений"
	Таблица.Значение = Выгрузка;
	Таблица.СоздатьКолонки();
	
КонецПроцедуры