Имя: Пароль:
1C
 
Команды печати на форме списка и документа
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) в принципе да, тут только ремить код... ладно, спасибо всем за помощь!
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.