Задание 4. Создание печатной формы справочника Контрагенты.

Как упоминалось ранее, Таблица – это табличный редактор, с помощью которого создается шаблон печатной формы. На данной вкладке формируется шаблон, по которому будут выводиться реальные данные. 4. 1. Создание шаблона печатной формы. Итак, возвращаемся в Конфигуратор, выбираем справочник Контрагенты, и в окне структуры справочника щелкаем по кнопке [Форма списка]. На вкладке Диалог уже сформирована экранная форма пользователя для ввода данных. Переходим на вкладку Таблица. Видно, что открылась область, похожая на таблицу Excel, состоящую из строк и столбцов, на пересечении которых находятся ячейки. Обращаться к каждой ячейке из процедур можно прямо по ее адресу: например, ячейка R1C1 – это ячейка на пересечении первой строки и первого столбца. Адреса ячеек используются при выводе печатной формы без шаблона. Например: Процедура Сформировать() Таб = СоздатьОбъект (“Таблица”); // Создание объекта Таблица Таб.Область(“R1C1”).Текст = “Обработка”; // метод Область используется для присвоения ячейке R1C1 текста “Обработка” Таб.Показать (); // открывает окно табличного документа

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

Мы будем формировать печатную форму с использованием шаблона, т. к. это наиболее используемый способ. Разнесем текст шаблона согласно рис. 2.9. Рис.2.9 Шаблон печатной формы справочника Контрагенты.

1. Для объединения ячеек используется кнопка на нижней панели инструментов Таблица.

2. Для формирования Секций – именованных частей шаблона таблицы, к которым можно обращаться из программы для манипулирования данными, используются кнопки на той же панели внизу: . Каждая секция имеет имя, обычно это:

• Шапка - для вывода заголовка, подзаголовков таблицы.

• Группа - для вывода групп объектов, например, для вывода двух групп справочника Контрагенты.

• Строка - для вывода данных.

• Подвал - для подведения итогов.

3. Форматирование ячеек осуществляется через свойства ячеек, которое открывается через контекстное меню или по команде Действия/Свойства.

4. Данные, которые будут извлекаться из объектов и выводиться на печать (в данном случае из справочника), имеют тип данных – Выражение, который устанавливается через свойства соответствующей ячейки (см. рис. 2.10)

5. Для задания таблице уникального имени необходимо щелкнуть по вкладке ^ Таблица правой кнопкой и выбрать пункт Задать имя таблицы. Зададим имя – ТаблицаКонтр.

Рис.2.10 Окно свойств ячейки Таблицы. 4. 2. Создание процедуры для вывода печатной формы. После того, как шаблон печатной формы создан, необходимо написать программу для вывода данных на печать.

1. Сначала добавим в экранную форму кнопку [Печать]. Для этого перейдем на вкладку Диалог и на нижней панели инструментов выберем элемент диалога Кнопка .

2. В свойствах кнопки установим на вкладке ^ Общие: Заголовок – Печать, на вкладке Дополнительно: Формула – Печать().

3. Теперь перейдем на вкладку Модуль и запишем следующий текст процедуры (зеленым цветом выделены комментарии к фрагментам программы):

Процедура Печать() СпрГрупп=СоздатьОбъект ("Справочник.Контрагенты"); // Создание переменной СпрГрупп для хранения элементов группы СпрЭлемен=СоздатьОбъект ("Справочник.Контрагенты"); // Создание переменной СпрЭлем для хранения элементов справочника Таб=СоздатьОбъект ("Таблица"); //создаем объект Таблица Таб.ИсходнаяТаблица ("ТаблицаКонтр"); // выбираем таблицу шаблона с именем ТаблицаКонтр Таб.ВывестиСекцию ("Шапка"); Если СпрГрупп.ВыбратьЭлементы()=1 Тогда // если есть группа, то организуем цикл для просмотра элементов группы Пока СпрГрупп.ПолучитьЭлемент()=1 Цикл Если СпрГрупп.ЭтоГруппа()=1 Тогда Групп=СпрГрупп.ТекущийЭлемент(); //переменной Групп присваиваем значение текущего элемента Группы Таб.ВывестиСекцию ("Группа"); СпрЭлемен.ИспользоватьРодителя(Групп); //организуем выборку по группе Если СпрЭлемен.ВыбратьЭлементы()=1 Тогда Пока СпрЭлемен.ПолучитьЭлемент()=1 Цикл Наименов=СпрЭлемен.ТекущийЭлемент(); //Функция Наименов позволяет получить конкретный элемент справочника Адрес=Наименов.Адрес; Банк=Наименов.Банк; РасчСчет=Наименов.РасчетныйСчет; //получаем значения атрибутов справочника Таб.ВывестиСекцию("Строка"); КонецЦикла; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; Таб.ТолькоПросмотр(1); // 1 – только просмотр, редактировать таблицу в окне просмотра нельзя Таб.Показать ("Контрагенты",""); // в заголовке таблицы будет выведен текст «Контрагенты» КонецПроцедуры Сохраните изменения в структуре метаданных, отредактируйте пользовательское меню, способом, описанным ранее, перейдите в 1С: Предприятие и выведите печатную форму справочника Контрагенты (см. рис. 2.11). Рис.2.11 Печатная форма в режиме 1С.