Вытянуть данные по единицам измерения в Счете

1. alexeinahai 23.02.17 13:34 Сейчас в теме
Доброго дня, разрабатываю ВнешнююПечатнуюФорму для СчетНаОплатуПокупателю. создал макет вывел все нужные данные кроме Единиц измерения. В табличной части Счета единиц измерения нету, а вытянуть из справочника не получается. смотрел другие макеты, там через запрос выводится:
        |       ЕСТЬNULL(СчетНаОплату.Номенклатура.ЕдиницаИзмерения, ЗНАЧЕНИЕ(Справочник.КлассификаторЕдиницИзмерения.ПустаяСсылка)) КАК ЕдиницаИзмерения,
	|	ЕСТЬNULL(СчетНаОплату.Номенклатура.ЕдиницаИзмерения.Код, """") КАК ЕдиницаИзмеренияКод,
	|	ЕСТЬNULL(СчетНаОплату.Номенклатура.ЕдиницаИзмерения.Наименование, """") КАК ЕдиницаИзмеренияНаименование,
	|	ЕСТЬNULL(СчетНаОплату.Номенклатура.ЕдиницаИзмерения.НаименованиеПолное, """") КАК ЕдиницаИзмеренияНаименованиеПолное,

с запросами я не очень дружу, помогите плиз переделать это в Нормальный вид)
По теме из базы знаний
Найденные решения
3. alexeinahai 24.02.17 08:29 Сейчас в теме
(2) Спасибо, но у меня не получается присвоить данные, полученные функцией, переменной.
Функция ПолучитьЕдиницуИзм(Номенклатура)
Если Номенклатура.Пустая() Тогда
Возврат Справочники.КлассификаторЕдиницИзмерения.ПустаяСсылка();
Иначе
Возврат Номенклатура.ЕдиницаИзмерения;
КонецЕсли;
КонецФункции

Функция СформироватьПечатнуюФорму(СсылкаНаОбъект, ОбъектПечати)
	
******************************************************************
	
	ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");
	ОбластьСтроки.Параметры.НомерПП = 0;
	Для Каждого ТекущаяСтрока из СсылкаНаОбъект.Товары Цикл
		
		ОбластьСтроки.Параметры.НомерПП = ОбластьСтроки.Параметры.НомерПП + 1 ;
		ОбластьСтроки.Параметры.Товары = ТекущаяСтрока.Номенклатура;
		ОбластьСтроки.Параметры.КолВо = ТекущаяСтрока.Количество;
		ОбластьСтроки.Параметры.Ед = ПРИСВОИТЬ ДАННЫЕ ФУНКЦИИ;
		ОбластьСтроки.Параметры.Цена = ТекущаяСтрока.Цена;
		ОбластьСтроки.Параметры.Сумма = ТекущаяСтрока.Сумма;
		
		ТабличныйДокумент.Вывести(ОбластьСтроки);
		
	КонецЦикла;
********************************************	

КонецФункции
Показать
6. minarenko 24.02.17 09:18 Сейчас в теме
(4) если без запроса, то
ОбластьСтроки.Параметры.Ед = ТекущаяСтрока.Номенклатура.ЕдиницаИзмерения;
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. SP17081992 5 23.02.17 15:57 Сейчас в теме
(1) Если не хочешь через запрос можешь создать функцию:
&НаСервереБезКонтекста
Функция ПолучитьЕдиницуИзм(Номенклатура)
Если Номенклатура.Пустая() Тогда
Возврат СправочникСсылка.КлассификаторЕдиницИзмерения.ПустаяСсылка;
Иначе
Возврат Номенклатура.ЕдиницаИзмерения;
КонецЕсли;
КонецФункции
3. alexeinahai 24.02.17 08:29 Сейчас в теме
(2) Спасибо, но у меня не получается присвоить данные, полученные функцией, переменной.
Функция ПолучитьЕдиницуИзм(Номенклатура)
Если Номенклатура.Пустая() Тогда
Возврат Справочники.КлассификаторЕдиницИзмерения.ПустаяСсылка();
Иначе
Возврат Номенклатура.ЕдиницаИзмерения;
КонецЕсли;
КонецФункции

Функция СформироватьПечатнуюФорму(СсылкаНаОбъект, ОбъектПечати)
	
******************************************************************
	
	ОбластьСтроки = МакетОбработки.ПолучитьОбласть("СтрокаТЧ");
	ОбластьСтроки.Параметры.НомерПП = 0;
	Для Каждого ТекущаяСтрока из СсылкаНаОбъект.Товары Цикл
		
		ОбластьСтроки.Параметры.НомерПП = ОбластьСтроки.Параметры.НомерПП + 1 ;
		ОбластьСтроки.Параметры.Товары = ТекущаяСтрока.Номенклатура;
		ОбластьСтроки.Параметры.КолВо = ТекущаяСтрока.Количество;
		ОбластьСтроки.Параметры.Ед = ПРИСВОИТЬ ДАННЫЕ ФУНКЦИИ;
		ОбластьСтроки.Параметры.Цена = ТекущаяСтрока.Цена;
		ОбластьСтроки.Параметры.Сумма = ТекущаяСтрока.Сумма;
		
		ТабличныйДокумент.Вывести(ОбластьСтроки);
		
	КонецЦикла;
********************************************	

КонецФункции
Показать
4. alexeinahai 24.02.17 09:09 Сейчас в теме
пробую выводить так, но не выходит:
		ОбластьСтроки.Параметры.Ед = ПолучитьЕдиницуИзм(Справочники.Номенклатура.ЕдиницаИзмерения);
5. minarenko 24.02.17 09:16 Сейчас в теме
(4) для чего тут функция?
у тебя есть ссылка на номенклатуру из запроса, на ней есть реквизит ЕдиницаИзмерения, его и выводи
ОбластьСтроки.Параметры.Ед = Выборка.Номенклатура.ЕдиницаИзмерения;
6. minarenko 24.02.17 09:18 Сейчас в теме
(4) если без запроса, то
ОбластьСтроки.Параметры.Ед = ТекущаяСтрока.Номенклатура.ЕдиницаИзмерения;
7. alexeinahai 24.02.17 09:23 Сейчас в теме
(6) понял свою ошибку. спасибо.
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот