Эмулятор фискального регистратора

1С v8

14.02.17

✎

07:27

Доброе утро народ, подскажите пожалуйста можно ли распечатать текст который выводится в окно служебных сообщений у эмулятора фискального регистратора...

ps: понимаю что легче сделать макет и его печатать, но ради интереса

1 nordbox

14.02.17

✎

07:35

Можно.
Благословения ждешь?

2 mataranga

14.02.17

✎

08:01

нет, подскажи как реализовать? это надо dll допиливать?

3 nordbox

14.02.17

✎

08:06

Для начала надо определиться куда ты его хочешь напечатать? потом надо определиться Зачем?
потом надо открыть обормотку эмулятора и винимательно посмотреть ее )

4 mataranga

14.02.17

✎

08:09

на принтер
очень хочется

в обработке эмулятора

Функция НапечататьОтчетБезГашения(ОбъектДрайвера, Параметры, ПараметрыПодключения, ВыходныеПараметры)

    Результат = Истина;

    Попытка
        Ответ = ОбъектДрайвера.НапечататьОтчетБезГашения(ПараметрыПодключения.ИДУстройства);
        Если НЕ Ответ Тогда
            Результат = Ложь;
            ВыходныеПараметры.Очистить();
            ВыходныеПараметры.Добавить(999);
            ВыходныеПараметры.Добавить("");
            ОбъектДрайвера.ПолучитьОшибку(ВыходныеПараметры[1]);
        Иначе
            ВыходныеПараметры.Очистить();
            ВыходныеПараметры.Добавить(0);
            ВыходныеПараметры.Добавить(0);
            ВыходныеПараметры.Добавить(0);
            ВыходныеПараметры.Добавить(МенеджерОборудованияКлиентПереопределяемый.ДатаСеанса());
        КонецЕсли;
    Исключение
        Результат = Ложь;
        ВыходныеПараметры.Очистить();
        ВыходныеПараметры.Добавить(999);
        ВыходныеПараметры.Добавить(НСтр("ru='Ошибка вызова метода <ОбъектДрайвера.НапечататьОтчетБезГашения>:'") + ОписаниеОшибки());
    КонецПопытки;

    Возврат Результат;

КонецФункции

или я не туда смотрю

5 nordbox

14.02.17

✎

08:10

Функция ОткрытьЧек(Объект, Пароль, ЭтоВозврат, НомерЧека, НомерСмены, ФискальныйЧек = Истина) Экспорт

    Результат = мНетОшибки;
    мФискальныйЧек = ФискальныйЧек;

    Если Не мСменаОткрыта Тогда
        Сообщить("+++++++++++++++++++ Смена Открыта ++++++++++++++++++" + Символы.ПС);
        мСменаОткрыта = Истина;
        мНомерСмены = мНомерСмены + 1;
    КонецЕсли;

    Если мЧекОткрыт Тогда
        ОтменитьЧек(Объект);
    КонецЕсли;

    мНомерЧека = мНомерЧека + 1;

    Сообщить("=================== Открытие чека ==================");
    Если ЭтоВозврат Тогда
        Сообщить("====================== возврата ====================");
    Иначе
        Сообщить("====================== продажи =====================");
    КонецЕсли;
    Сообщить("================" + ?(ФискальныйЧек, "== Фискальный", " Нефискальный") + " режим ================");

    Сообщить("№ чека: " + Формат(мНомерЧека, "ЧЦ=4; ЧВН=") + "    № смены: " + Формат(мНомерСмены, "ЧЦ=4; ЧВН="));
    НомерСмены = мНомерСмены;
    НомерЧека  = мНомерЧека;
    мЧекОткрыт = Истина;
    мИтогЧека  = 0;

    Возврат Результат;

КонецФункции // ОткрытьЧек()

6 nordbox

14.02.17

✎

08:11

Из окна сообщений Чек можешь скопировать в блокнот и распечатать ))

7 nordbox

14.02.17

✎

08:12

/ Функция осуществляет построчную печать нефискального чека из переданного массива строк.
// (API v2.0)
//
// Параметры:
//  Объект                         - <*>
//                                 - Объект драйвера ФР.
//
//  МассивСтрок                    - <Массив>
//                                 - Массив строк для печати.
//
//  Ширина                         - <Число>
//                                 - Ширина чековой ленты.
//
// Возвращаемое значение:
//  <ПеречислениеСсылка.ТООшибки*> - Результат выполнения операции.
//
Функция НапечататьСтроки(Объект, МассивСтрок, Ширина) Экспорт

    Результат = мНетОшибки;

    Для Каждого Строка Из МассивСтрок Цикл
        Если СтрДлина(Строка) > Ширина Тогда
            Пока СтрДлина(Строка) > Ширина Цикл
                Сообщить(Лев(Строка, Ширина));
                Строка = Сред(Строка, Ширина + 1);
            КонецЦикла;

            Сообщить(Лев(Строка, Ширина));
        Иначе
            Сообщить(Лев(Строка, Ширина));
        КонецЕсли;
    КонецЦикла;

    Возврат Результат;

КонецФункции