Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Процедура Печать()



СпрГрупп=СоздатьОбъект ("Справочник.Контрагенты");

// Создание переменной СпрГрупп для хранения элементов группы

СпрЭлемен=СоздатьОбъект ("Справочник.Контрагенты");

// Создание переменной СпрЭлем для хранения элементов справочника

Таб=СоздатьОбъект ("Таблица");

//создаем объект Таблица

Таб.ИсходнаяТаблица ("ТаблицаКонтр");

// выбираем таблицу шаблона с именем ТаблицаКонтр

Таб.ВывестиСекцию ("Шапка");

Если СпрГрупп.ВыбратьЭлементы()=1 Тогда

// если есть группа, то организуем цикл для просмотра элементов группы

Пока СпрГрупп.ПолучитьЭлемент()=1 Цикл

Если СпрГрупп.ЭтоГруппа()=1 Тогда

Групп=СпрГрупп.ТекущийЭлемент();

//переменной Групп присваиваем значение текущего элемента Группы

Таб.ВывестиСекцию ("Группа");

СпрЭлемен.ИспользоватьРодителя(Групп);

//организуем выборку по группе

Если СпрЭлемен.ВыбратьЭлементы()=1 Тогда

Пока СпрЭлемен.ПолучитьЭлемент()=1 Цикл

Наименов=СпрЭлемен.ТекущийЭлемент();

//Функция Наименов позволяет получить конкретный элемент справочника

Адрес=Наименов.Адрес;

Банк=Наименов.Банк;

РасчСчет=Наименов.РасчетныйСчет;

//получаем значения атрибутов справочника

Таб.ВывестиСекцию("Строка");

КонецЦикла;

КонецЕсли;

КонецЕсли;

КонецЦикла;

КонецЕсли;

Таб.ТолькоПросмотр(1);

// 1 – только просмотр, редактировать таблицу в окне просмотра нельзя

Таб.Показать ("Контрагенты","");

// в заголовке таблицы будет выведен текст «Контрагенты»





Дата публикования: 2015-02-20; Прочитано: 217 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.005 с)...