Имя: Пароль:
1C
1С v8
Как вывести на печать номер экземпляра печати (УТ 10.3)
0 egorover
 
20.07.11
14:48
Принтер с двухсторонней печатью, нужно выводить новую форму "Транспортной накладной" с номерами экземпляров печати, как?
Вот так не подходит:
ОбластьЛицевая.Параметры.Экземпляр = 1;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   ОбластьЛицевая.Параметры.Экземпляр = 2;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   ОбластьЛицевая.Параметры.Экземпляр = 3;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   ОбластьЛицевая.Параметры.Экземпляр = 4;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   ОбластьЛицевая.Параметры.Экземпляр = 5;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
     
   Таб.Вывести(ОбластьОборотная);
1 egorover
 
20.07.11
15:09
Неужели нет никакой возможности?
2 egorover
 
20.07.11
16:53
Сделал так

Таб.ПроверитьВывод(ОбластьЛицевая);
   ОбластьЛицевая.Параметры.Экземпляр = 1;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   
   Таб.ПроверитьВывод(ОбластьЛицевая);
   ОбластьЛицевая.Параметры.Экземпляр = 2;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.ПроверитьВывод(ОбластьЛицевая);
   ОбластьЛицевая.Параметры.Экземпляр = 3;
   Таб.Вывести(ОбластьЛицевая);
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.ПроверитьВывод(ОбластьЛицевая);
   ОбластьЛицевая.Параметры.Экземпляр = 4;
   Таб.Вывести(ОбластьЛицевая);
   Таб.Вывести(ОбластьОборотная);
   Таб.ВывестиГоризонтальныйРазделительСтраниц();
   
   Таб.ПроверитьВывод(ОбластьЛицевая);
   ОбластьЛицевая.Параметры.Экземпляр = 5;  
   Таб.Вывести(ОбластьЛицевая);
   Таб.Вывести(ОбластьОборотная);


   Таб.АвтоМасштаб = Истина;
   Таб.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
   
   Таб.ПолеСверху = 0;
   Таб.ПолеСлева  = 5;
   Таб.ПолеСнизу  = 0;
   Таб.ПолеСправа = 5;

   Возврат Таб;
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn