Имя: Пароль:
1C
 
УТ 11.5 Печать последнего слип-чека
0 егаис
 
06.05.25
07:51
Не понимаю, как должна работать эта команда в РМК УТ 11.
Создали чек, оплатили картой. Документ не закрываем/закрываем (неважно), нажимаем команду получаем ошибку "Слип-чек отсутствует.
Возможно для данного сеанса еще не выполнялась эквайринговая операция."
Это вообще рабочий функционал?
1 егаис
 
06.05.25
08:58
У всех работает?
2 егаис
 
06.05.25
10:01
Типовой код "в топку", так работает

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

&НаКлиенте
Процедура реплНапечататьПоследнийСлипЧекПосле(Команда)
    
    ОчиститьСообщения();
    
    Если Не ИспользоватьПодключаемоеОборудование Тогда
        ТекстЗаголовка = НСтр("ru = 'Слип-чек не может быть напечатан.'");
        ТекстСообщения = НСтр("ru = 'Подключаемое оборудование не используется.'");
        ОбщегоНазначенияКлиент.СообщитьПользователю(ТекстСообщения);
        Возврат;
    КонецЕсли;
    
    ПоследнийСлипЧек = ОборудованиеПлатежныеСистемыКлиент.ПоследнийСлипЧек();
    Если Не ПустаяСтрока(ПоследнийСлипЧек) Тогда
        ЭтотОбъект.Доступность = Ложь;
        Оповещение = Новый ОписаниеОповещения("реплНапечататьПоследнийСлипЧекЗавершение", ЭтотОбъект);
        ПараметрыОперации = ОборудованиеЧекопечатающиеУстройстваКлиентСервер.ПараметрыПечатиТекста(ПоследнийСлипЧек);
        ОборудованиеЧекопечатающиеУстройстваКлиент.НачатьПечатьТекста(
            Оповещение, УникальныйИдентификатор, , ПараметрыОперации);
    Иначе
        ТекстСообщения = НСтр("ru = 'Нет последнего слип-чека.'");
        ОбщегоНазначенияКлиент.СообщитьПользователю(ТекстСообщения);
    КонецЕсли;


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