Архитектура Аудит Военная наука Иностранные языки Медицина Металлургия Метрология
Образование Политология Производство Психология Стандартизация Технологии


Пока Выборка . Следующий () Цикл. //Сообщить(""+Выборка.Период+Символы.Таб+Выборка.Курс). Область . Параметры . Дата = Выборка . Период



//Сообщить(""+Выборка.Период+Символы.Таб+Выборка.Курс);

Область . Параметры . Дата = Выборка . Период ;

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

ТабДок . Вывести ( Область );

КонецЦикла ;

// Установка свойств табличного документа в целом

// перед его отображением:

ТабДок . ИмяПараметровПечати = "ПараметрыПечатиУЕ" ;

ТабДок . ИмяСохраненияПоложенияОкна = "ОкноПечатиУЕ" ;

ТабДок . ОтображатьЗаголовки = Ложь ;

ТабДок . ОтображатьСетку = Ложь ;

ТабДок . СохранятьСвойстваОтображения = Истина ;

ТабДок . ТолькоПросмотр = Истина ;

ТабДок . ФиксацияСверху = 3 ;

ТабДок . Показать ( "История курса УЕ" );

 

КонецПроцедуры


 

 

Листинг ю_7.1

 


Процедура Печать ( Элемент )

//{{_КОНСТРУКТОР_ПЕЧАТИ_СПИСОК(Печать)

// Данный фрагмент построен конструктором.

// При повторном использовании конструктора, внесенные вручную

//изменения будут утеряны!!!

ТабДок = Новый ТабличныйДокумент ;

Макет = Справочники . Подразделения . ПолучитьМакет ( "Печать" );

// Заголовок

Область = Макет . ПолучитьОбласть ( "Заголовок" );

ТабДок . Вывести ( Область );

// Шапка

Область = Макет . ПолучитьОбласть ( "Шапка" );

ТабДок . Вывести ( Область );

Выборка = Справочники . Подразделения . ВыбратьИерархически ();

Группа = Макет . ПолучитьОбласть ( "Группа" );

Элемент = Макет . ПолучитьОбласть ( "Элемент" );

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

Если Выборка . ЭтоГруппа Тогда

Группа . Параметры . Заполнить ( Выборка );

ТабДок . Вывести ( Группа );

Иначе

Элемент . Параметры . Заполнить ( Выборка );

ТабДок . Вывести ( Элемент );

КонецЕсли;

КонецЦикла;

ТабДок . ОтображатьСетку = Ложь ;

ТабДок . Защита = Ложь ;

ТабДок . ТолькоПросмотр = Истина ;

ТабДок . ОтображатьЗаголовки = Ложь ;

ТабДок . Показать ();

//}}_КОНСТРУКТОР_ПЕЧАТИ_СПИСОК

КонецПроцедуры


 

Листинг ю_7.2

 


Процедура ПечатьЧерезЗапрос ( Кнопка )

ТабДок = Новый ТабличныйДокумент ;

Макет = Справочники . Фирмы . ПолучитьМакет ( "Печать" );

// Заголовок

Секция = Макет . ПолучитьОбласть ( "Заголовок" );

ТабДок . Вывести ( Секция );

// Шапка

Секция = Макет . ПолучитьОбласть ( "Шапка" );

ТабДок . Вывести ( Секция );

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

Запрос . Текст = "ВЫБРАТЬ


|

|

|ИЗ

|

|




Фирмы.Код КАК Код,

Фирмы.Наименование

 

Справочник.Фирмы КАК Фирмы


|УПОРЯДОЧИТЬ ПО

| Код" ;

//И выполняем запрос

Результат = Запрос . Выполнить ();

Секция = Макет . ПолучитьОбласть ( "Элемент" );

// Обработка результата

Выборка = Результат . Выбрать ();


Поделиться:



Последнее изменение этой страницы: 2019-04-21; Просмотров: 203; Нарушение авторского права страницы


lektsia.com 2007 - 2024 год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! (0.019 с.)
Главная | Случайная страница | Обратная связь