Функция ПолучитьСписокПлановыхНачислений(Организация, Сотрудник, ДатаО) Экспорт





	Запрос = Новый Запрос;

	Запрос.Текст = 

	"ВЫБРАТЬ

	|	ПлановыеНачисленияСрезПоследних.Период,

	|	ПлановыеНачисленияСрезПоследних.ВидРасчета,

	|	ПлановыеНачисленияСрезПоследних.Показатель1,

	|	ПлановыеНачисленияСрезПоследних.Валюта1,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд1,

	|	ПлановыеНачисленияСрезПоследних.Показатель2,

	|	ПлановыеНачисленияСрезПоследних.Валюта2,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд2,

	|	ПлановыеНачисленияСрезПоследних.Показатель3,

	|	ПлановыеНачисленияСрезПоследних.Валюта3,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд3,

	|	ПлановыеНачисленияСрезПоследних.Показатель4,

	|	ПлановыеНачисленияСрезПоследних.Валюта4,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд4,

	|	ПлановыеНачисленияСрезПоследних.Показатель5,

	|	ПлановыеНачисленияСрезПоследних.Валюта5,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд5,

	|	ПлановыеНачисленияСрезПоследних.Показатель6,

	|	ПлановыеНачисленияСрезПоследних.Валюта6,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд6,

	|	ПлановыеНачисленияСрезПоследних.Действие,

	|	ПлановыеНачисленияСрезПоследних.ПериодЗавершения,

	|	ПлановыеНачисленияСрезПоследних.ВидРасчетаЗавершения,

	|	ПлановыеНачисленияСрезПоследних.ДействиеЗавершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель1Завершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель2Завершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель3Завершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель4Завершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель5Завершения,

	|	ПлановыеНачисленияСрезПоследних.Показатель6Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта1Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта2Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта3Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта4Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта5Завершения,

	|	ПлановыеНачисленияСрезПоследних.Валюта6Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд1Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд2Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд3Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд4Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд5Завершения,

	|	ПлановыеНачисленияСрезПоследних.ТарифныйРазряд6Завершения,

	|	ПлановыеНачисленияСрезПоследних.Регистратор

	|ИЗ

	|	РегистрСведений.ПлановыеНачисленияРаботниковОрганизаций.СрезПоследних(

	|			&ДатаСреза,

	|			Организация =ГоловнаяОрганизация

	|				И Сотрудник =Ссылка) КАК ПлановыеНачисленияСрезПоследних

	|ГДЕ

	|	ВЫБОР

	|			КОГДА ПлановыеНачисленияСрезПоследних.Действие = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					И ПлановыеНачисленияСрезПоследних.ДействиеЗавершения = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.ПустаяСсылка)

	|				ТОГДА ЛОЖЬ

	|			КОГДА ПлановыеНачисленияСрезПоследних.Действие = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					И ПлановыеНачисленияСрезПоследних.ДействиеЗавершения <> ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.ПустаяСсылка)

	|					ИДатаСреза < ПлановыеНачисленияСрезПоследних.ПериодЗавершения

	|				ТОГДА ЛОЖЬ

	|			КОГДА ПлановыеНачисленияСрезПоследних.ДействиеЗавершения = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					ИДатаСреза >= ПлановыеНачисленияСрезПоследних.ПериодЗавершения

	|				ТОГДА ЛОЖЬ

	|			ИНАЧЕ ИСТИНА

	|		КОНЕЦ";

	

	Запрос.УстановитьПараметр("ГоловнаяОрганизация", Организация);

	Запрос.УстановитьПараметр("ДатаСреза", ДатаО);

	Запрос.УстановитьПараметр("Ссылка", Сотрудник);

	Возврат Запрос.Выполнить().Выгрузить();





КонецФункции





Функция ПолучитьСписокПлановыхУдержаний(Организация, Сотрудник, ДатаО) Экспорт





	Запрос = Новый Запрос;

	Запрос.Текст = 

	"ВЫБРАТЬ

	|	ПлановыеУдержанияСрезПоследних.Период,

	|	ПлановыеУдержанияСрезПоследних.ВидРасчета,

	|	ПлановыеУдержанияСрезПоследних.Показатель1,

	|	ПлановыеУдержанияСрезПоследних.Валюта1,

	|	ПлановыеУдержанияСрезПоследних.Показатель2,

	|	ПлановыеУдержанияСрезПоследних.Валюта2,

	|	ПлановыеУдержанияСрезПоследних.Показатель3,

	|	ПлановыеУдержанияСрезПоследних.Валюта3,

	|	ПлановыеУдержанияСрезПоследних.Показатель4,

	|	ПлановыеУдержанияСрезПоследних.Валюта4,

	|	ПлановыеУдержанияСрезПоследних.Показатель5,

	|	ПлановыеУдержанияСрезПоследних.Валюта5,

	|	ПлановыеУдержанияСрезПоследних.Показатель6,

	|	ПлановыеУдержанияСрезПоследних.Валюта6,

	|	ПлановыеУдержанияСрезПоследних.Действие,

	|	ПлановыеУдержанияСрезПоследних.ПериодЗавершения,

	|	ПлановыеУдержанияСрезПоследних.ДействиеЗавершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель1Завершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель2Завершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель3Завершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель4Завершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель5Завершения,

	|	ПлановыеУдержанияСрезПоследних.Показатель6Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта1Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта2Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта3Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта4Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта5Завершения,

	|	ПлановыеУдержанияСрезПоследних.Валюта6Завершения,

	|	ПлановыеУдержанияСрезПоследних.Регистратор

	|ИЗ

	|	РегистрСведений.ПлановыеУдержанияРаботниковОрганизаций.СрезПоследних(

	|			&ДатаСреза,

	|			Организация =ГоловнаяОрганизация

	|				И Физлицо =Ссылка) КАК ПлановыеУдержанияСрезПоследних

	|ГДЕ

	|	ВЫБОР

	|			КОГДА ПлановыеУдержанияСрезПоследних.Действие = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					И ПлановыеУдержанияСрезПоследних.ДействиеЗавершения = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.ПустаяСсылка)

	|				ТОГДА ЛОЖЬ

	|			КОГДА ПлановыеУдержанияСрезПоследних.Действие = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					И ПлановыеУдержанияСрезПоследних.ДействиеЗавершения <> ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.ПустаяСсылка)

	|					ИДатаСреза < ПлановыеУдержанияСрезПоследних.ПериодЗавершения

	|				ТОГДА ЛОЖЬ

	|			КОГДА ПлановыеУдержанияСрезПоследних.ДействиеЗавершения = ЗНАЧЕНИЕ(Перечисление.ВидыДействияСНачислением.Прекратить)

	|					ИДатаСреза >= ПлановыеУдержанияСрезПоследних.ПериодЗавершения

	|				ТОГДА ЛОЖЬ

	|			ИНАЧЕ ИСТИНА

	|		КОНЕЦ";

	

	Запрос.УстановитьПараметр("ГоловнаяОрганизация", Организация);

	Запрос.УстановитьПараметр("ДатаСреза", ДатаО);

	Запрос.УстановитьПараметр("Ссылка", Сотрудник.Физлицо);

	Возврат Запрос.Выполнить().Выгрузить();

КонецФункции   

  //ВНИМАНИЕ !!! 

// В качестве полей для отбора могут задаваться измерения или реквизиты, для которых

// в конфигураторе признак индексирования установлен в значение "Индексировать" или 

// установлен признак "Ведущее". Вид сравнения может быть только Равно.



// Пример 1 Периодический регистр сведений

Отбор = Новый Структура("Сотрудник");

Отбор.Сотрудник = Результат.Сотрудник;

ВыборкаОКЛАД = РегистрыСведений.ПлановыеНачисленияРаботниковОрганизаций.Выбрать(Результат.Период,ТекДата, Отбор);

		

// КРАТКИЙ ВАРИАНТ

ВыборкаОКЛАД = РегистрыСведений.ПлановыеНачисленияРаботниковОрганизаций.Выбрать(Результат.Период,ТекДата,Новый Структура("Сотрудник", Результат.Сотрудник));

СумОкл=0;

Пока ВыборкаОКЛАД.Следующий() Цикл

	СумОкл=СумОкл+ВыборкаОКЛАД.Показатель1;

КонецЦикла;



// Пример 2 Непериодический регистр сведений

ВыборкаОРГ = РегистрыСведений.КонтактнаяИнформация.Выбрать(Новый Структура("Объект", Организация));

Пока ВыборкаОРГ.Следующий() Цикл

	Если Строка(ВыборкаОРГ.Вид) = "Юридический адрес организации" Тогда

		ЮрАдрес = ВыборкаОРГ.Представление;

	ИначеЕсли Строка(ВыборкаОРГ.Вид) = "Телефон организации" Тогда

		Телефон = ВыборкаОРГ.Представление;

	КонецЕсли;		

КонецЦикла;