В начало

Печать текущего документа

 

Процедура ПечатьТекущегоДокумента ()

            Список = ЭлементыФормы.Список,

            Если Список.ТекущаяСтрока = Неопределено Тогда

                        Возврат;

            КонецЕсли;

            ТекДокумент = Список.ТекущаяСтрока.ПолучитьОбъект ();

            ТабДок = Новый ТабличныйДокумент;

            ТекДокумент.Печать (ТабДок);

            ТабДок.Показать ();

КонецПроцедуры