v8: Подтверждающие Документы

 

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

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

		|ВЫБРАТЬ

		|	ПодтверждающиеДокументы.Ссылка КАК Документ,

		|	ПодтверждающиеДокументы.КемВыдан КАК ДокументКемВыдан,

		|	ПодтверждающиеДокументы.ДатаВыдачи КАК ДокументДатаВыдачи,

		|	ПодтверждающиеДокументы.ВидПодтверждающегоДокумента КАК ВидДокумента

		|ИЗ

		|	Справочник.ПодтверждающиеДокументы КАК ПодтверждающиеДокументы

		|ГДЕ

		|	ПодтверждающиеДокументы.Владелец = &Владелец

		|	И ПодтверждающиеДокументы.Текущий = ИСТИНА

		|";

	Запрос.УстановитьПараметр("Владелец", ДокументОбъект.Заказчик);		

	ВыборкаДокументов = Запрос.Выполнить().Выбрать();

	Если ВыборкаДокументов.Количество()=0 Тогда

		ОбластьМакета.Параметры.ЗаказчикДокумент				= "_________________";

		ОбластьМакета.Параметры.ЗаказчикДокументКемВыдан		= "___________";

		ОбластьМакета.Параметры.ЗаказчикДокументДатаВыдачи		= "___________";

	Иначе 

		ВыборкаДокументов.Следующий();

		ОбластьМакета.Параметры.ЗаказчикДокумент				= Строка(ВыборкаДокументов.ВидДокумента) + ": " + ВыборкаДокументов.Документ;

		ОбластьМакета.Параметры.ЗаказчикДокументКемВыдан		= ВыборкаДокументов.ДокументКемВыдан;

		ОбластьМакета.Параметры.ЗаказчикДокументДатаВыдачи		= Формат(ВыборкаДокументов.ДокументДатаВыдачи,"ДФ='dd MMMM yyyy'");

	КонецЕсли;