FOLD
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору vjick Мне кажется "законными" методоми не разрулишь korvin76 Непонятно ,печать нужна для элемента номенклатуры ,или для списка. Содаешь отчет в конфигурации ,открывешь конструктр(два клика мышой) переходишь макеты,низу жмешь конструкторы-конструктор выходной формы, и шаманишь Для элемента все просто. Цитата: роцедура Свойство(ТабДок, ВыбОбъект, ВыбСвойство) Экспорт //{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Свойство) // Данный фрагмент построен конструктором. // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!! Макет = ОтчетОбъект.ПолучитьМакет("Свойство"); Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ЗначенияСвойствОбъектов.Объект, | ПРЕДСТАВЛЕНИЕ(ЗначенияСвойствОбъектов.Объект), | ЗначенияСвойствОбъектов.Свойство.Ссылка, | ЗначенияСвойствОбъектов.Свойство.Представление, | ЗначенияСвойствОбъектов.Значение, | ПРЕДСТАВЛЕНИЕ(ЗначенияСвойствОбъектов.Значение) |ИЗ | РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов |ГДЕ | ЗначенияСвойствОбъектов.Объект = &ВыбОбъект | И ЗначенияСвойствОбъектов.Свойство = &ВыбСвойство"; Запрос.УстановитьПараметр("ВыбОбъект", ВыбОбъект); Запрос.УстановитьПараметр("ВыбСвойство", ВыбСвойство); Результат = Запрос.Выполнить(); ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок"); ОбластьПодвал = Макет.ПолучитьОбласть("Подвал"); ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы"); ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы"); ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали"); ТабДок.Очистить(); ТабДок.Вывести(ОбластьЗаголовок); ТабДок.Вывести(ОбластьШапкаТаблицы); ТабДок.НачатьАвтогруппировкуСтрок(); ВыборкаДетали = Результат.Выбрать(); Пока ВыборкаДетали.Следующий() Цикл ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали); ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень()); КонецЦикла; ТабДок.ЗакончитьАвтогруппировкуСтрок(); ТабДок.Вывести(ОбластьПодвалТаблицы); ТабДок.Вывести(ОбластьПодвал); ТабДок.ОтображатьСетку = Ложь; ТабДок.Защита = Истина; ТабДок.ТолькоПросмотр = Истина; ТабДок.ОтображатьЗаголовки = Ложь; ТабДок.Показать(); //}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ КонецПроцедуры | В реквизитах созданных конструктором ,устанавливаешь тип значения тот же что и в соостветствующих измерениях регСведений Объект -ДокументСсылка, СправочникСсылка Тебе нужна номенклатура назначаешь ВыбОбъект -СправочникСсылка.Номенклатура ВыбСвойство - ПланВидовХарактеристикСсылка.СвойстваОбъектов | Всего записей: 1238 | Зарегистр. 26-01-2004 | Отправлено: 11:09 02-08-2006 | Исправлено: FOLD, 11:15 02-08-2006 |
|