Печать строки на ФР

PrintString()
ПечатьСтроки()

Функция ПолучитьОбъектДрайвера(ДанныеДрайвера, ТекстОшибки = Неопределено)
    
        глПодключаемоеОборудование = Новый Структура();
        глПодключаемоеОборудование.Вставить("ДрайвераПодключаемогоОборудования", Новый Соответствие());
        глПодключаемоеОборудование.Вставить("ПараметрыПодключенияПО"           , Новый Массив());
        глПодключаемоеОборудование.Вставить("ПоследнийСлипЧек"                 , "");
        глПодключаемоеОборудование.Вставить("ЗавершениеРаботыСистемы"          , Ложь);
    
    ОбъектДрайвера = Неопределено;
    
    Для Каждого ДрайверПО Из глПодключаемоеОборудование.ДрайвераПодключаемогоОборудования Цикл
        Если ДрайверПО.Ключ = ДанныеДрайвера.ДрайверОборудования  Тогда
            ОбъектДрайвера = ДрайверПО.Значение;
            Прервать;
        КонецЕсли;
    КонецЦикла;   
    
    Если ОбъектДрайвера = Неопределено Тогда
        Попытка
            
            ProgID = ДанныеДрайвера.ИдентификаторОбъекта;
            Если ПустаяСтрока(ProgID) Тогда
                ОбъектДрайвера = "";// Драйвер не требуется

            Иначе
                ProgID1 = ?(Найти(ProgID, "|") > 0, Сред(ProgID, 1, Найти(ProgID, "|")-1), ProgID); 
                ProgID2 = ?(Найти(ProgID, "|") > 0, Сред(ProgID, Найти(ProgID, "|")+1), ProgID); 
                Если ДанныеДрайвера.ПоставляетсяДистрибутивом Тогда
                    ПодключитьВнешнююКомпоненту(ProgID1);
                Иначе
                    ИмяОбъекта = Сред(ProgID1, Найти(ProgID1, ".") + 1); 
                    Префикс = Сред(ProgID1, 1, Найти(ProgID1, ".")); 
                    ProgID2 = Префикс + СтрЗаменить(ИмяОбъекта, ".", "_") + "." + ИмяОбъекта;
                    Если ДанныеДрайвера.ВСоставеКонфигурации Тогда
                        Результат = ПодключитьВнешнююКомпоненту("ОбщийМакет." + ДанныеДрайвера.ИмяМакетаДрайвера, СтрЗаменить(ИмяОбъекта, ".", "_"));
                    Иначе
                        СсылкаНаДрайвер = ПолучитьНавигационнуюСсылку(ДанныеДрайвера.ДрайверОборудования, "ЗагруженныйДрайвер");
                        Результат = ПодключитьВнешнююКомпоненту(СсылкаНаДрайвер, СтрЗаменить(ИмяОбъекта, ".", "_"));
                    КонецЕсли;
                КонецЕсли;
                ОбъектДрайвера = Новый (ProgID2);
            КонецЕсли;
                
        Исключение
            Инфо = ИнформацияОбОшибке();
            ТекстОшибки = Инфо.Описание;
        КонецПопытки;
        
        Если ОбъектДрайвера <> Неопределено Тогда
            глПодключаемоеОборудование.ДрайвераПодключаемогоОборудования.Вставить(ДанныеДрайвера.ДрайверОборудования, ОбъектДрайвера);
            ОбъектДрайвера = глПодключаемоеОборудование.ДрайвераПодключаемогоОборудования[ДанныеДрайвера.ДрайверОборудования];
        КонецЕсли;
        
    КонецЕсли;   
        
    Возврат ОбъектДрайвера;
    
КонецФункции

//-----------------------------------------

&НаСервере
Процедура ТестПечатиНаСервере()
//Перем Идентификатор;    

ТипыПО = Неопределено;
Идентификатор = Неопределено;
РабочееМесто = Неопределено;
ТолькоАвтоматическаяФискализация = Ложь;
мсф = Справочники.ПодключаемоеОборудование.ОборудованиеПоПараметрам(ТипыПО, Идентификатор, РабочееМесто, ТолькоАвтоматическаяФискализация);    
дрв = Справочники.ДрайверыОборудования.НайтиПоНаименованию(мсф[0].ссылка.ДрайверОборудования).Ссылка;
ДанныеДрайвера = МенеджерОборудованияВызовСервера.ПолучитьДанныеДрайвера(дрв);    
ФР = ПолучитьОбъектДрайвера(ДанныеДрайвера);
ФР.BeginDocument(); <---- говорит, что нет такого метода
КонецПроцедуры