Код

	Мета = СоздатьОбъект("MetaDataWork");
	СЗначисления = СоздатьОбъект("СписокЗначений");

	Для Индекс = 1 По ГруппаРасчетов.ВсеНачисления.Количество() Цикл
		еНачисления.ПолучитьРасчет(Индекс)), 27, 13)));
	КонецЦикла;
	СтрокаУсловия1 = Мета.ПолучитьСтрокуИзСЗ(СЗначисления);

	СЗначисления.УдалитьВсе();
	Для Индекс = 1 По ГруппаРасчетов.ВсеУдержания.Количество() Цикл
		еУдержания.ПолучитьРасчет(Индекс)), 27, 13)));
	КонецЦикла;
	СтрокаУсловия2 = Мета.ПолучитьСтрокуИзСЗ(СЗначисления);

	Условие = "";
	ТекстЗапроса = "
		|SELECT
		|	ЖР.ids AS [Объект $Справочник.Сотрудники],
		|   ЖР.IDALG as [ВидРасч $ВидРасчета],
		|	CASE
		|		WHEN ЖР.IDALG IN (" + СтрокаУсловия1 + ") THEN SUM(ЖР.result)
		|		ELSE 0
		|	END AS Приход,
		|	CASE
		|		WHEN ЖР.IDALG IN (" + СтрокаУсловия2 + ") THEN SUM(ЖР.result)
		|		ELSE 0
		|	END AS Расход
		|
		|FROM
		|	$ЖурналРасчетов.Зарплата AS ЖР (NOLOCK)
		|WHERE
		|	:ТекДата BETWEEN ЖР.DATEB AND ЖР.DATEE AND
		|	ЖР.IDALG IN (" + СтрокаУсловия1 + "," + СтрокаУсловия2 + ")
		|";


 

Код

SELECT
...,
...,
Сотр.CODE
FROM
...
JOIN $Справочник.Сотрудники AS Сотр (NOLOCK) ON Сотр.ID = ЖР.ids
 

Код

|ДолжностьСотрудника=ЖурналРасчетов.Зарплата.Объект.Должность; 

Код

|$ПоследнееЗначение.Сотрудники.Должность(ЖР.ids,:КонецПериода~~) AS [ДолжностьСотрудника $Справочник.Должности] 

Код

ТекстЗапроса = "
|SELECT
|
|	Подзапрос.Объект 				AS [Объект $Справочник.Сотрудники],
|	SUM(Подзапрос.Результат)		AS Результат,
|	Подзапрос.Родитель				AS [Родитель $Справочник.Должности],
|	Подзапрос.Должность				AS [Должность $Справочник.Должности],  
|	Подзапрос.Подразделение			AS [Подразделение $Справочник.Подразделения],
|	Подзапрос.Категория 			AS [Категория $Перечисление.КатегорииСотрудников],
|	Подзапрос.ДолжностьСотрудника	AS [ДолжностьСотрудника $Справочник.Должности]
|
|FROM	(
|	SELECT  
|		ЖР.ids 						AS Объект,
|		ЖР.result 					AS Результат,    
|		Долж.PARENTID 				AS Родитель,
|		$ЖР.Должность 				AS Должность,
|		$ЖР.Подразделение 			AS Подразделение,
|		$ЖР.Категория 				AS Категория,
|		$ПоследнееЗначение.Сотрудники.Должность(ЖР.ids,:КонецПериода~~) AS ДолжностьСотрудника
|	FROM
|		$ЖурналРасчетов.Зарплата AS ЖР    
|	JOIN $Справочник.Должности AS Долж (NOLOCK) ON Долж.ID = $ЖР.Должность    
|
|	WHERE	(ЖР.period='"+Формат(ДатаЗапроса,"Д ГГГГММДД")+"M')
|		AND (ЖР.idalg IN (" + СтрокаУсловия1 + "))
|		) AS Подзапрос
|
|GROUP BY
|	Подзапрос.Объект,
|	Подзапрос.Родитель,
|	Подзапрос.Должность,
|	Подзапрос.Подразделение,
|	Подзапрос.Категория,
|	Подзапрос.ДолжностьСотрудника
|"//}}ЗАПРОС
;    
RS.УложитьСписокОбъектов(списокподр, "#сп1","Подразделения");  
RS.УстановитьТекстовыйПараметр("КонецПериода",ДатаЗапроса);
RS.Отладка(1);
ТЗ = RS.ВыполнитьИнструкцию(ТекстЗапроса);   

PS не знаю, как другим, но меня плохо отформатированный код приводит в уныние (это мягко сказано  )

PPS хотя на форуме табуляция почему то плывет... совсем не так, как в 1С-ке