Код

рс = СоздатьОбъект("ODBCRecordset");
рс.Отладка(1);
ТекстЗапроса = "-- qryMaker:Отчет1.2008.08.07.10.00.18
	|SELECT Заказ.IDDOC [ЗаказСсылка $Документ.Заказ]
	|	, $ЗаказСтроки.КтоВыполнил КтоВыполнил
	|	, $ЗаказСтроки.КтоВыполнилИд КтоВыполнилИд
	|	, coalesce($ЗаказСтроки.ПодрТ,$Заказ.Подразделение) [Подразделение2 $Справочник.Подразделения]
	|	, $ЗаказСтроки.ПодрТ as ПодрТ
	|	, $Заказ.Подразделение as Подр
	|FROM $ДокументСтроки.Заказ AS ЗаказСтроки With (NOLOCK)
	|	INNER JOIN _1SJOURN AS Журнал With (NOLOCK) ON ЗаказСтроки.IDDOC = Журнал.IDDOC
	|	INNER JOIN $Документ.Заказ AS Заказ With (NOLOCK) ON Заказ.IDDOC = ЗаказСтроки.IDDOC
	|WHERE ((Журнал.CLOSED & 1) = 1)
	|	AND (Журнал.DATE_TIME_IDDOC > :фНачало)
	|	AND (Журнал.DATE_TIME_IDDOC < :фКонец)
	|	AND ($Заказ.Подразделение = :фПодр)
	|";
рс.УстановитьТекстовыйПараметр("фНачало", фНачало);
рс.УстановитьТекстовыйПараметр("фКонец", фКонец);
рс.УстановитьТекстовыйПараметр("фПодр", фПодр);
тз = рс.ВыполнитьИнструкцию(ТекстЗапроса); 

Код

case when $ЗаказСтроки.ПодрТ = $ПустойИд then $Заказ.Подразделение else $ЗаказСтроки.ПодрТ end