Eprst писал(а) 11. Сентября 2014 :: 07:42:


Я пробую кучу разных вариантов, которые дописываю сам и которые советуют, вылаживаю и запрос и отладку, в чем "странный человек"? уточните! Какой "не тот" запрос я выложил?

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

Отсюда и "странный" человек.

Могу, смотри #4  ответ. Там готовый код.

Всем ОГРОМНЕЙШЕЕ СПАСИБО! Все заработало - цель достигнута!

остаток в каком ресурсе?

Eprst писал(а) 11. Сентября 2014 :: 09:52:

СПАСИБО!

И снова добрый день, снова прошу Вашей помощи, товарищи наставники .
1. Подскажите, пожалуйста, как в прямом запросе корректно написать аналог обычного запроса:

|Товар = Регистр.Взаиморасчеты.Товар,Регистр.ПартииТоваров.Товар; 

тоесть как присвоить переменной значение из двух регистров? очередно раз спасибо!


2. И подскажите, пожалуйста, правильно ли присвоина переменная "Вид"? в оригинале написано:

|Вид		= Регистр.Взаиморасчеты.Товар.ВидИзделия; 

Как в прямом:

|Select
	|   Взаим.Товар	   [Товар $Справочник.Номенклатура],
	|   Взаим.Партия	[Партия $Справочник.Партии],
	|   Взаим.Склад 	[Склад $Справочник.Подразделения],
	|   Вид	 		[Вид $Справочник.Номенклатура.ВидИзделия], 

или правильней так:

|Select
	|   Взаим.Товар	   [Товар $Справочник.Номенклатура],
	|   Взаим.Партия	[Партия $Справочник.Партии],
	|   Взаим.Склад 	[Склад $Справочник.Подразделения],
	|   Вид	 		[Вид $Перечисления.ВидИзделия], 

3. Как в запросе прописать переменную, которая может быть как группой так и элементом или вообще не выбрана?

Навсякий случай, для ясности моей задачи, это полный запрос, который я сейчас пытаюсь переделать на прямой запрос:

Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса =
	"//{{ЗАПРОС(Сформировать)
	|Период с ВыбКонПериода по ВыбКонПериода;
	|Товар	    = Регистр.Взаиморасщеты.Товар,Регистр.ПартииТоваров.Товар;
	|Партия	   = Регистр.Взаиморасщеты.Партия,Регистр.ПартииТоваров.Партия;
	|Склад	    = Регистр.Взаиморасщеты.Магазин,Регистр.ПартииТоваров.Склад;
	|Вид		= Регистр.Взаиморасщеты.Товар.ВидИзделия,Регистр.ПартииТоваров.Товар.ВидИзделия;
	|ТипПФ	    = Регистр.Взаиморасщеты.Товар.ТипПФ,Регистр.ПартииТоваров.Товар.ТипПФ;
	|Тип		= Регистр.Взаиморасщеты.Товар.Тип,Регистр.ПартииТоваров.Товар.Тип;
	|Акция			=
	|Вуду		  = Регистр.Взаиморасщеты.Партия.ВидУчета,Регистр.ПартииТоваров.Партия.ВидУчета;
	|Клиент	   = Регистр.Взаиморасщеты.Партия.Поставщик,Регистр.ПартииТоваров.Партия.Поставщик;
	|Штук	     = Регистр.Взаиморасщеты.Количество,Регистр.ПартииТоваров.Штук;
	|Масса	    = Регистр.Взаиморасщеты.Масса,Регистр.ПартииТоваров.Масса;
	|МассаБК	  = Регистр.Взаиморасщеты.МассаБК,Регистр.ПартииТоваров.МассаБК;
	|Сумма	    = Регистр.Взаиморасщеты.Сумма,Регистр.ПартииТоваров.Сумма;
	|СуммаП	   = Регистр.Взаиморасщеты.СуммаПродажи;
	|Фирмочка	 = Регистр.Взаиморасщеты.Партия.Фирма,Регистр.ПартииТоваров.Партия.Фирма;
	|ВладелецТовара = Регистр.Взаиморасщеты.Партия.ВладелецТовара;
	|Функция ШтОст  = КонОст(Штук);
	|Функция МБКОст = КонОст(МассаБК);
	|Функция МОст   = КонОст(Масса);
	|Функция КОст   = КонОст(Сумма);
	|Функция КПОст  = КонОст(СуммаП);
	|Группировка Клиент без групп;
	|Группировка Вид;   // без групп;
	|Группировка Товар Упорядочить по Товар.Наименование без групп;
	|Группировка Партия;
	|Условие(Тип = Константа.Изделие);
	|"//}}ЗАПРОС
	;

	Если Складик.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Склад в Складик);";
	КонецЕсли;

	Если Акц.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Акция = Акц);";
	КонецЕсли;
	Если Фирма.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Фирмочка = Фирма);";
	КонецЕсли;
	Если ВыбКод.РазмерСписка() = 0 Тогда
	Иначе
		ТекстЗапроса = ТекстЗапроса + "Условие (Товар в выбКод);";
	КонецЕсли;
	Если Поставщик.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Клиент = Поставщик);";
	КонецЕсли;

	Если ВыбВидИзделия.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Вид = ВыбВидИзделия);";
	КонецЕсли;

	Если Клиентик.Выбран() = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(ВладелецТовара = Клиентик);";
	КонецЕсли;
	Если Учет = Перечисление.ВидУчета.Бухгалтерия Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Вуду = Учет);";
	КонецЕсли;

	Если Размер > 0 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.Размер = число(сокрлп(Размер)));";
	КонецЕсли;
	Если БрилКол = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.БрилКол > 0)
		|И (число(сокрлп(Партия.ЦвДрКол)) = 0));";
	КонецЕсли;

	Если ЦвДрЦ = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.ЦвДрКол > 0)
		|И (Партия.БрилКол = 0);";

	КонецЕсли;
	Если БриллДраг = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.ЦвДрКол > 0)
		|И (Партия.БрилКол > 0));";
	КонецЕсли;

	Если Жемчуг = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.ЖемчугКол > 0);";
	КонецЕсли;

	Если Циркон = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.БрилКол = 0)
		|И (Партия.ЦвДрКол = 0);";
	КонецЕсли;


	Если Красное = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.Цвет = Перечисление.Цвет.Красное);";
	КонецЕсли;
	Если Белое = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.Цвет = Перечисление.Цвет.Белое);";
	КонецЕсли;
	Если Желтое = 1 Тогда
		ТекстЗапроса = ТекстЗапроса + "Условие(Партия.Цвет = Перечисление.Цвет.Желтое);";
	КонецЕсли;

	Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
		Возврат;
	КонецЕсли;