Создание печатных форм
X

Привет дорогой друг

Наш сайт существует и развиваетется за счет рекламы. Пожалуйста, отключите блокировку рекламы AdBlock или подобное, для нашего сайта. Спасибо!
Показано с 1 по 1 из 1
  1. #1
    Гость форума

    Регистрация
    29.07.2010
    Сообщений
    2
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях

    Arrow Создание печатных форм

    Здравствуйте, кто нибудь сталкивался с такой ситуацией: нужно сделать так, чтобы определенная область макета выводилась в начале каждой новой страницы, и еще одна область - в конце каждой страницы? Как это можно описать на встроенном языке?

    Добавлено через 11 часов 12 минут 42 секунды
    Структура макета:

    | ВерхКолонтитул (с картинками) |
    | Шапка |
    | Заголовок |
    |Строка (количество строк зависит от колиества товаров) |
    | Подвал |
    | НизКолонтитул (с картинками) |

    Задача:

    Область верхКолонтитул должна выводиться в верху каждой страницы, а НизКолонтитул - в низу каждой страницы.

    Решение:

    Код:
    	ТабДок = Новый ТабличныйДокумент;
    	ТабДок.Очистить();
    	Макет = ПолучитьМакет("Макет");
    
               //Получаем области макета
    	ВерхКолонтитул = Макет.ПолучитьОбласть("ВерхКолонтитул");
    	Шапка = Макет.ПолучитьОбласть("Шапка");
    	Заголовок = Макет.ПолучитьОбласть("Заголовок");
    	Строка = Макет.ПолучитьОбласть("Строка");
    	Подвал = Макет.ПолучитьОбласть("Подвал");
    	НизКолонтитул = Макет.ПолучитьОбласть("НизКолонтитул");
    	
    	//Выводим область "ВерхКолонтитул"
    	ТабДок.Вывести(ВерхКолонтитул);
    	
    	//Выводим область "Шапка"
               // Параметры шапки
               // ...
    	ТабДок.Вывести(Шапка);	
     	
    	//Выводим область "ЗаголовокСтрока"
               // Параметры заголовка
               // ...
    	ТабДок.Вывести(Заголовок);
    	
    	//Параметры области "НизКолонтитул"
    	// ...
    	
    	//Выводим область "Строка"
    	ПроверкаПечатиНизКолонтитул = Новый Массив;
    	ПроверкаПечатиНизКолонтитул.Добавить(Строка);
    	ПроверкаПечатиНизКолонтитул.Добавить(НизКолонтитул);
    	
               // Параметры оласти "строка"
               // ... 	
    	
     Для Каждого СтрокаТоваров из Документ.Товары Цикл
         Если НЕ ТабДок.ПроверитьВывод(ПроверкаПечатиНизКолонтитул) Тогда
    	ТабДок.Вывести(НизКолонтитул);
    	ТабДок.Вывести(ВерхКолонтитул);
         КонецЕсли;	
         ТабДок.Вывести(Строка);
    КонецЦикла;
    	
    	//Выводим область "Подвал"
    	ПроверкаПечатиНизКолонтитул.Очистить();
    	ПроверкаПечатиНизКолонтитул.Добавить(Подвал);
    	ПроверкаПечатиНизКолонтитул.Добавить(НизКолонтитул);
    	ПустаяСтрока = Макет.ПолучитьОбласть("ПустаяСтрока");	
    	ПроверкаНизКолонтитул = Новый Массив;
    	ПроверкаНизКолонтитул.Добавить(НизКолонтитул);
    	ПроверкаНизКолонтитул.Добавить(ПустаяСтрока);
    Если НЕ ТабДок.ПроверитьВывод(ПроверкаПечатиНизКолонтитул) Тогда 
                Пока ТабДок.ПроверитьВывод(ПроверкаНизКолонтитул) Цикл
    		ТабДок.Вывести(ПустаяСтрока);
    	КонецЦикла;
    		ТабДок.Вывести(НизКолонтитул);
    		ТабДок.Вывести(ВерхКолонтитул);
    КонецЕсли;			
    	ТабДок.Вывести(Подвал);
    	
    	//Выводим область "НизКолонтитул"
    	Пока  ТабДок.ПроверитьВывод(ПроверкаНизКолонтитул) Цикл
    		ТабДок.Вывести(ПустаяСтрока);
    	КонецЦикла;
    	ТабДок.Вывести(НизКолонтитул);
    	
    	//Устанвливаем параметры таблицы и выводим ее
    	ТабДок.ОтображатьСетку = Ложь;
    	ТабДок.Защита = Ложь;
    	ТабДок.ТолькоПросмотр = Ложь;
    	ТабДок.ОтображатьЗаголовки = Ложь;
    	Возврат ТабДок;
    Последний раз редактировалось Proger; 08.11.2010 в 09:56. Причина: Добавлено сообщение

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •