Код

$РегАлк.ТекущийДокумент КАК [ТекДок $Документ],
$РегАлк.ВидДокумента КАК [ТекДок_Вид $ВидДокумента], 

Код

РегАлк.ТекущийДокумент КАК [ТекДок $Документ],
РегАлк.ВидДокумента КАК [ТекДок_Вид $ВидДокумента], 

Код

...
|,	Сред($ТЧ.СпецПредложение,5)  КАК [СпецПредложениеСкидки $Справочник.ШтрихКодыСоСкидкой]
... 

Код

  	Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса = "//{{ЗАПРОС(ПоДокам)
	|Период с ДатаНач по ДатаКон;
	|Без итогов;
	|РУ = Документ.ПриходнаяНакладная.Фирма,
	|	Документ.ЗаказПоставщику.Фирма,
	|	Документ.РасходнаяНакладная.Фирма,
	|	Документ.РасходнаяРозница.Фирма,
	|	Документ.ПеремещениеТоваров.Фирма,
	|	Документ.ВозвратОтПокупателя.Фирма,
	|	Документ.ВозвратПоставщику.Фирма,
	|	Документ.СписаниеТоваров.Фирма,
	|	Документ.ОприходованиеТоваров.Фирма,
	|	Документ.Пересорт.Фирма;
	|Док = Документ.ПриходнаяНакладная.ТекущийДокумент,
	|	Документ.ЗаказПоставщику.ТекущийДокумент,
	|	Документ.РасходнаяНакладная.ТекущийДокумент,
	|	Документ.РасходнаяРозница.ТекущийДокумент,
	|	Документ.ПеремещениеТоваров.ТекущийДокумент,
	|	Документ.ВозвратОтПокупателя.ТекущийДокумент,
	|	Документ.ВозвратПоставщику.ТекущийДокумент,
	|	Документ.СписаниеТоваров.ТекущийДокумент,
	|	Документ.ОприходованиеТоваров.ТекущийДокумент,
	|	Документ.Пересорт.ТекущийДокумент;
	|Склад = Документ.ПриходнаяНакладная.МестоХранения,
..............................
	|Сумм = Документ.ПриходнаяНакладная.Всего,
	|	Документ.ЗаказПоставщику.Всего,
	|	Документ.РасходнаяНакладная.Всего,
	|	Документ.РасходнаяРозница.Всего,
	|	Документ.ПеремещениеТоваров.Сумма,
	|	Документ.ВозвратОтПокупателя.Всего,
	|	Документ.ВозвратПоставщику.Всего,
	|	Документ.СписаниеТоваров.Сумма,
	|	Документ.ОприходованиеТоваров.Всего,
	|	Документ.Пересорт.Сумма;
	|Функция КоличВсегоШТ = Сумма(Кол*КоэффДок) Когда (СписТиповТовара.Принадлежит(ТоварТип)=1);
	|Функция КоличУпак = Сумма(?(КоэффОснЕд>1,Цел(Запрос.КоличВсегоШТ/КоэффОснЕд),0)) Когда (СписТиповТовара.Принадлежит(ТоварТип)=1);
.................................
	|Группировка Док;
	|Группировка СтрокаДокумента;
	|Условие(СписДокПометка.Принадлежит(Док.Вид())=1);";
	|Условие((ВыбСкладОткуда.Принадлежит(Склад)=1) ИЛИ (ВыбСкладКуда.Принадлежит(СкладКуда)=1));";

	ОбъектМФ.СформироватьУсловияЗапроса(ТекстЗапроса,Запрос,глЭтоSQL);

и т.д. ..................................
 

Код

оПЗ = СоздатьОбъект("ПрямойЗапрос");
	оПЗ.РежимОтладки = РежимОтладки;

	//{--- Текст запроса
	лТЗ = "
	|ВЫБРАТЬ
	|	ОстаткиОборотыОсновной.Субконто1		КАК [Агент			$Субконто	]
	|,	ОстаткиОборотыОсновной.Субконто1_вид	КАК [Агент_вид		$ВидСубконто]
	|,	ОстаткиОборотыОсновной.Субконто2		КАК [ТаксаХХ		$Субконто	]
	|,	ОстаткиОборотыОсновной.Субконто2_вид	КАК [ТаксаХХ_вид	$ВидСубконто]
	|,	ОстаткиОборотыОсновной.НачалоПериода	КАК [НачалоПериода	$Дата		]

	|,	ОстаткиОборотыОсновной.СуммаНачальныйОстаток	КАК [СН_Сумма		$Число	]
	|,	ОстаткиОборотыОсновной.ВалютаНачальныйОстаток	КАК [СН_СумКорп		$Число	]
	|,	ОстаткиОборотыОсновной.СуммаОборот				КАК [Оборот_Сумма	$Число	]
	|,	ОстаткиОборотыОсновной.ВалютаОборот				КАК [Оборот_СумКорп	$Число	]
	|,	ОстаткиОборотыОсновной.СуммаКонечныйОстаток		КАК [СК_Сумма		$Число	]
	|,	ОстаткиОборотыОсновной.ВалютаКонечныйОстаток	КАК [СК_СумКорп		$Число	]
	|
	|
	|ИЗ
	|	$БИОстаткиОбороты.Основной(:ДатаНач
	|,	:ДатаКон
	|,	МЕСЯЦ ДОПОЛНЕНИЕ
	|,
	|,	#СчетаТКС
	|,	(Сотрудники, ТаксыХХ)
	|,	(Сумма, Валюта)
	|,
	|) КАК ОстаткиОборотыОсновной";
	//}

	оПЗ.Текст = лТЗ;
	оПЗ.УстановитьТекстовыйПараметр("ДатаНач", ДатаНач);
	оПЗ.УстановитьТекстовыйПараметр("ДатаКон", ДатаКон);

	спСчетовТКС = СоздатьОбъект("СписокЗначений");
	спСчетовТКС.ДобавитьЗначение(СчетПоКоду("ТКС.ХХ"));
	оПЗ.УложитьСписокЗначений(спСчетовТКС, "#СчетаТКС", "Основной");

	лИТЗ = оПЗ.Выполнить("ИндексированнаяТаблица");

 

Код

ВЫБРАТЬ $ТекДок.ТекущийДокумент КАК [Док $Документ.ВозвратОтПокупателя]
ИЗ
	Документ.ВозвратОтПокупателя КАК ТекДок $nolock
ОБЪЕДИНИТЬ
ВЫБРАТЬ $ТекДок.ТекущийДокумент КАК [Док $Документ.ВозвратПоставщику]
ИЗ
	Документ.ВозвратПоставщику КАК ТекДок $nolock
ОБЪЕДИНИТЬ
ВЫБРАТЬ $ТекДок.ТекущийДокумент КАК [Док $Документ.ОприходованиеТоваров]
ИЗ
	Документ.ОприходованиеТоваров КАК ТекДок $nolock
ВНУТРЕННЕЕ СОЕДИНЕНИЕ
	ЖурналДокументов КАК Жур $nolock
ПО
	$ТекДок.ТекущийДокумент = $Жур.ТекущийДокумент
ГДЕ
	$Жур.ДатаДокумента >=:лДатаНач И $Жур.ДатаДокумента<=:лДатаКон~ И $Жур.Проведен = 1";
ПЗ.УстановитьТекстовыйПараметр("лДатаНач", ДатаНач);
ПЗ.УстановитьТекстовыйПараметр("лДатаКон", ДатаКон); 

Код

ВЫБРАТЬ $ТекДок.ВидДокумента+$ТекДок.ТекущийДокумент КАК [Док $Документ]
ИЗ
	Документ.ВозвратОтПокупателя КАК ТекДок $nolock
ВНУТРЕННЕЕ СОЕДИНЕНИЕ
	ЖурналДокументов КАК Жур $nolock
ПО
	$ТекДок.ТекущийДокумент = $Жур.ТекущийДокумент
И
	$Жур.ДатаДокумента МЕЖДУ :лДатаНач И $Жур.ДатаДокумента<=:лДатаКон~ И $Жур.Проведен = 1

ОБЪЕДИНИТЬ ВСЕ
ВЫБРАТЬ $ТекДок.ВидДокумента+$ТекДок.ТекущийДокумент
ИЗ
	Документ.ВозвратПоставщику КАК ТекДок $nolock
ВНУТРЕННЕЕ СОЕДИНЕНИЕ
	ЖурналДокументов КАК Жур $nolock
ПО
	$ТекДок.ТекущийДокумент = $Жур.ТекущийДокумент
И
	$Жур.ДатаДокумента МЕЖДУ :лДатаНач И $Жур.ДатаДокумента<=:лДатаКон~ И $Жур.Проведен = 1

ОБЪЕДИНИТЬ ВСЕ
ВЫБРАТЬ $ТекДок.ВидДокумента+$ТекДок.ТекущийДокумент
ИЗ
	Документ.ОприходованиеТоваров КАК ТекДок $nolock
ВНУТРЕННЕЕ СОЕДИНЕНИЕ
	ЖурналДокументов КАК Жур $nolock
ПО
	$ТекДок.ТекущийДокумент = $Жур.ТекущийДокумент
И
	$Жур.ДатаДокумента МЕЖДУ :лДатаНач И $Жур.ДатаДокумента<=:лДатаКон~ И $Жур.Проведен = 1