Как правильно программно распечатать счет на оплату покупателя?

Anonymous

10.04.2009 - 06:33

Делаю как в нижеприведенном коде, Открывается только форма документа, печатная форма ни на экран ни на принтер не выходят :((
Поправьте меня если я не прав :))

Если ФормироватьСнОПЛ Тогда
            ОбъектСнОПЛ = Документы.СчетНаОплатуПокупателю.СоздатьДокумент();
            ОбъектСнОПЛ.Дата = РабочаяДата;
            ОбъектСнОПЛ.Заполнить(ЗаказПокупателя);
            ОбъектСнОПЛ.Организация = Реализация.Организация;
            ОбъектСнОПЛ.Ответственный = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ОсновнойОтветственный");

            ОбъектСнОПЛ.Записать();
        КонецЕсли;
        Если ПроводитьСнОПЛ Тогда
            Попытка
                ОбъектСнОПЛ.Записать(РежимЗаписиДокумента.Запись);
            Исключение
                ОбщегоНазначения.СообщитьОбОшибке("Не удалось провести "+СокрЛП(ОбъектСнОПЛ));
            КонецПопытки;
        КонецЕсли;

        Если ОткрыватьСнОПЛ Тогда
            ФормаСнОПЛ = ОбъектСнОПЛ.ПолучитьФорму("ФормаДокумента");
            ФормаСнОПЛ.Открыть();
        КонецЕсли;
        Если ПечататьСнОПЛ Тогда
            ОбъектСнОПЛ.Печать(,, ПечататьСнОПЛНаПринтер);
        КонецЕсли;

К списку тем

К списку форумов

Интересные темы

odines.ru

26.04.2024 - 07:07

Смотри также:
Какой документ использовать в УТ при переносе остатков по номенклатуре.
Отчет оплаченные поставки
ПолуОФФ: 1 мая, Белгород, Срочно нужен спец по 1С8 и торг. оборудованию !

Re: Как правильно программно распечатать счет на оплату покупателя?

Anonymous

1 - 10.04.2009 - 06:39

Процедура НапечататьДокумент(ПечДокумент, КоличествоЭкземпляров = 1,
НаПринтер = Ложь, Заголовок = "", Ссылка = Неопределено, ИсточникМакета =
Неопределено) Экспорт

    Если ПечДокумент = Неопределено тогда
        Возврат;
    КонецЕсли;

Вот на этой фигне он вылетает из общих модулей (универсальные механизмы)