|
Команды печати на форме списка и документа | ☑ | ||
---|---|---|---|---|
0
Gossar1C
05.12.14
✎
14:28
|
Здравствуйте! Подскажите пожалуйста, можно ли в настройках УТ 11.1.6 выключить использование некоторых печатных форм. У нас есть 2 фирменные,внешние печатные формы которые мы используем, соответственно такие печатные формы как "Извещение","Заказ клиента", "Счет на оплату в факсимиле" просто мозолят глаза.
Или же надо программно ставить отбор? Заранее спасибо! |
|||
1
Banned
05.12.14
✎
14:29
|
3 строчки закомментировать в коде
|
|||
2
Gossar1C
05.12.14
✎
14:31
|
а стандартными методами никак? вот допустим то место где заполняются команды
// Возвращает список команд печати для указанной формы. // // Параметры: // Форма - УправляемаяФорма, Строка - форма или полное имя формы, для которой необходимо получить список команд печати. // // Возвращаемое значение: // ТаблицаЗначений - описание см. в СоздатьКоллекциюКомандПечати(). Функция КомандыПечатиФормы(Форма) Экспорт Если ТипЗнч(Форма) = Тип("УправляемаяФорма") Тогда ИмяФормы = Форма.ИмяФормы; Иначе ИмяФормы = Форма; КонецЕсли; КомандыПечати = СоздатьКоллекциюКомандПечати(); КомандыПечати.Колонки.Добавить("СкрытаФункциональнымиОпциями", Новый ОписаниеТипов("Булево")); СтандартнаяОбработка = Истина; УправлениеПечатьюПереопределяемый.ПередДобавлениемКомандПечати(ИмяФормы, КомандыПечати, СтандартнаяОбработка); Если СтандартнаяОбработка Тогда ПолноеИмяОбъекта = Метаданные.НайтиПоПолномуИмени(ИмяФормы).Родитель().ПолноеИмя(); МенеджерПечати = ОбщегоНазначения.МенеджерОбъектаПоПолномуИмени(ПолноеИмяОбъекта); МенеджерПечати.ДобавитьКомандыПечати(КомандыПечати); Для Каждого КомандаПечати Из КомандыПечати Цикл Если ПустаяСтрока(КомандаПечати.МенеджерПечати) Тогда КомандаПечати.МенеджерПечати = ПолноеИмяОбъекта; КонецЕсли; КонецЦикла; Если ОбщегоНазначения.ПодсистемаСуществует("СтандартныеПодсистемы.ДополнительныеОтчетыИОбработки") Тогда МодульДополнительныеОтчетыИОбработки = ОбщегоНазначения.ОбщийМодуль("ДополнительныеОтчетыИОбработки"); МодульДополнительныеОтчетыИОбработки.ПриПолученииКомандПечати(КомандыПечати, ИмяФормы); КонецЕсли; КонецЕсли; Для Каждого КомандаПечати Из КомандыПечати Цикл Если КомандаПечати.Порядок = 0 Тогда КомандаПечати.Порядок = 50; КонецЕсли; КонецЦикла; КомандыПечати.Сортировать("Порядок Возр, Представление Возр"); ЧастиИмени = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(ИмяФормы, ".", Истина); КраткоеИмяФормы = ЧастиИмени[ЧастиИмени.Количество()-1]; // фильтр по именам форм Для НомерСтроки = -КомандыПечати.Количество() + 1 По 0 Цикл КомандаПечати = КомандыПечати[-НомерСтроки]; СписокФорм = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(КомандаПечати.СписокФорм, ",", Истина); Если СписокФорм.Количество() > 0 И СписокФорм.Найти(КраткоеИмяФормы) = Неопределено Тогда КомандыПечати.Удалить(КомандаПечати); КонецЕсли; КонецЦикла; ОпределитьВидимостьКомандПечатиПоФункциональнымОпциям(КомандыПечати, Форма); Возврат КомандыПечати; КонецФункции а вот эта процедура очень интересная... ОпределитьВидимостьКомандПечатиПоФункциональнымОпциям(КомандыПечати, Форма); тоесть получается так или иначе менять код? |
|||
3
banco
05.12.14
✎
14:34
|
(2) что за стандартные методы?
|
|||
4
banco
05.12.14
✎
14:36
|
(2) в модуле менеджера документа (1)
|
|||
5
Gossar1C
05.12.14
✎
14:39
|
(4) да нашел, в модуле менеджера, но судя по всему они контролируются теми же функциональными опциями
стандартными методами - тоесть настройками программы, в разделе настройки печати и отчетов не нашел ничего. |
|||
6
Gossar1C
05.12.14
✎
14:43
|
(5) в принципе да, тут только ремить код... ладно, спасибо всем за помощь!
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |