SELECT DISTINCT

Т.е, вторую оплату надо выкинуть ?
)))

Как ты из этого
Цитата:


делаешь это ?

Цитата:


на Опл2 фиолетово ?
Тогда выбирай из максимума или через top 1 оплат

))))))))

еще раз посмотри, что ты пишешь.

Нужно чтобы в результат включались все различные оплаты и различные отгрузки.

Если у документа заявки одна отгрузка и одна оплата -
получается правильно, одна строка типа:

ДокЗаказ -> докОтгр -> докОпл.

Если же у документа заказ несколько подчиненных отгрузок и оплат, получается:

докзаказ1 Отгр1  Опл1
докзаказ1 Отгр1  Опл2
докзаказ1 Отгр2  Опл1
докзаказ1 Отгр2  Опл2

А нужно
докзаказ1 Отгр1  Опл1
докзаказ1 Отгр2  Опл2

потому что для заказа было 2 оплаты и 2 отгрузки,
иначе сумма по отгрузкам и оплатам увеличивается.

Так понятно?

А что, если для двух отгрузок будет лишь одна оплата? А если две отгрузки и 4 оплаты?

Начну с того, что в селект-листе запроса 10 колонок, а в "результат - мне надо" - всего 4.
И лично я не могу даже идентифицировать, какими из 10 эти 4 являются.

Далее, как уже верно заметили, правил (скажем так - стандартных) уменьшения количества строк в выборке не так уж и много - групбай сильно разгуляться не даст.

Соответственно, если колонки Отгр и Опл числовые - то видимо, тебя интересует sum() по ни.
Если это документы - то (select top 1 from ... order by <нужные тебе критерии>) в общем случае или max()/min() в частном.

Тупо сделал так:

Если Док.ВыбратьПодчиненныеДокументы(НачДата,КонДата,тДокПр.ДокЗак)>0 Тогда
	Пока Док.ПолучитьДокумент() = 1 Цикл
		Если Док.Проведен() = 0 Тогда
			Продолжить;
		КонецЕсли;
		Если Док.Вид() = "СтрокаВыпискиПриход" Тогда
			Если ТабОпл.НайтиЗначение("ДокВып", Док.ТекущийДокумент())<=0 Тогда
				ТабОпл.ВыбратьСтроки(); Ф = 0;
				Пока ТабОпл.ПолучитьСтроку() = 1 Цикл
					Если (ТабОпл.ДокПко.Выбран() = 1) Или (ТабОпл.ДокВып.Выбран() = 1) Тогда
						Продолжить;
					Иначе
						Ф = 1;
						Прервать;
					КонецЕсли;
				КонецЦикла;
				Если Ф = 0 Тогда
					ТабОпл.НоваяСтрока();
					ТабОпл.ДокР = ПолучитьПустоеЗначение("Документ.Реализация");
					ТабОпл.СуммаР = 0;
				КонецЕсли;
				ТабОпл.ДокВып = Док.ТекущийДокумент();
				ТабОпл.ДокПко = ПолучитьПустоеЗначение("Документ.ПКО");
				ТабОпл.СуммаВып = Док.Сумма;
				ТабОпл.СуммаПко = 0;
			КонецЕсли;
		ИначеЕсли Док.Вид() = "Реализация" Тогда
			Если ТабОпл.НайтиЗначение("ДокР", Док.ТекущийДокумент())<=0 Тогда
				ТабОпл.НоваяСтрока();
				ТабОпл.ДокВып = ПолучитьПустоеЗначение("Документ.СтрокаВыпискиПриход");
				ТабОпл.ДокПко = ПолучитьПустоеЗначение("Документ.ПКО");
				ТабОпл.ДокР = Док.ТекущийДокумент();
				ТабОпл.СуммаР = Док.Итог("Сумма");
				ТабОпл.СуммаВып = 0;
				ТабОпл.СуммаПко = 0;
				Если Док1.ВыбратьПодчиненныеДокументы(НачДата,КонДата,Док.ТекущийДокумент())>0 Тогда
					Пока Док1.ПолучитьДокумент() = 1 Цикл
						Если Док1.Вид() = "СтрокаВыпискиПриход" Тогда
							Если ТабОпл.НайтиЗначение("ДокВып", Док1.ТекущийДокумент())<=0 Тогда
								ТабОпл.ВыбратьСтроки(); Ф = 0;
								Пока ТабОпл.ПолучитьСтроку() = 1 Цикл
									Если (ТабОпл.ДокПко.Выбран() = 1) Или (ТабОпл.ДокВып.Выбран() = 1) Тогда
										Продолжить;
									Иначе
										Ф = 1;
										Прервать;
									КонецЕсли;
								КонецЦикла;
								Если Ф = 0 Тогда
									ТабОпл.НоваяСтрока();
									ТабОпл.ДокР = ПолучитьПустоеЗначение("Документ.Реализация");
									ТабОпл.СуммаР = 0;
								КонецЕсли;
								ТабОпл.ДокВып = Док1.ТекущийДокумент();
								ТабОпл.СуммаВып = Док1.Сумма;
								ТабОпл.ДокПко = ПолучитьПустоеЗначение("Документ.ПКО");
								ТабОпл.СуммаПко = 0
							КонецЕсли;
						ИначеЕсли Док1.Вид() = "ПКО" Тогда
							Если ТабОпл.НайтиЗначение("ДокПко", Док1.ТекущийДокумент())<=0 Тогда
								ТабОпл.ВыбратьСтроки(); Ф = 0;
								Пока ТабОпл.ПолучитьСтроку() = 1 Цикл
									Если (ТабОпл.ДокПко.Выбран() = 1) Или (ТабОпл.ДокВып.Выбран() = 1) Тогда
										Продолжить;
									Иначе
										Ф = 1;
										Прервать;
									КонецЕсли;
								КонецЦикла;
								Если Ф = 0 Тогда
									ТабОпл.НоваяСтрока();
									ТабОпл.ДокР = ПолучитьПустоеЗначение("Документ.Реализация");
									ТабОпл.СуммаР = 0;
								КонецЕсли;
								ТабОпл.ДокПко = Док1.ТекущийДокумент();
								ТабОпл.СуммаПко = Док1.Сумма;
								ТабОпл.ДокВып = ПолучитьПустоеЗначение("Документ.СтрокаВыпискиПриход");
								ТабОпл.СуммаВып = 0
							КонецЕсли;
						КонецЕсли;
					КонецЦикла;
				КонецЕсли;

			КонецЕсли;
		КонецЕсли;
	КонецЦикла;
КонецЕсли;
 

Вот это мне хотелось в запросе реализовать, но что-то не заладилось. В принципе, на скорость это сильно не повлияло.