0
егаис
06.05.25
✎
07:51
|
Не понимаю, как должна работать эта команда в РМК УТ 11.
Создали чек, оплатили картой. Документ не закрываем/закрываем (неважно), нажимаем команду получаем ошибку "Слип-чек отсутствует.
Возможно для данного сеанса еще не выполнялась эквайринговая операция."
Это вообще рабочий функционал?
|
|
2
егаис
06.05.25
✎
10:01
|
Типовой код "в топку", так работает
&НаКлиенте
Процедура реплНапечататьПоследнийСлипЧекЗавершение(РезультатВыполнения, Параметры) Экспорт
ЭтотОбъект.Доступность = Истина;
Если НЕ РезультатВыполнения.Результат Тогда
ЗаголовокИнформации = НСтр("ru = 'Печать последнего слип чека'");
ОбщегоНазначенияКлиент.СообщитьПользователю(ЗаголовокИнформации);
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура реплНапечататьПоследнийСлипЧекПосле(Команда)
ОчиститьСообщения();
Если Не ИспользоватьПодключаемоеОборудование Тогда
ТекстЗаголовка = НСтр("ru = 'Слип-чек не может быть напечатан.'");
ТекстСообщения = НСтр("ru = 'Подключаемое оборудование не используется.'");
ОбщегоНазначенияКлиент.СообщитьПользователю(ТекстСообщения);
Возврат;
КонецЕсли;
ПоследнийСлипЧек = ОборудованиеПлатежныеСистемыКлиент.ПоследнийСлипЧек();
Если Не ПустаяСтрока(ПоследнийСлипЧек) Тогда
ЭтотОбъект.Доступность = Ложь;
Оповещение = Новый ОписаниеОповещения("реплНапечататьПоследнийСлипЧекЗавершение", ЭтотОбъект);
ПараметрыОперации = ОборудованиеЧекопечатающиеУстройстваКлиентСервер.ПараметрыПечатиТекста(ПоследнийСлипЧек);
ОборудованиеЧекопечатающиеУстройстваКлиент.НачатьПечатьТекста(
Оповещение, УникальныйИдентификатор, , ПараметрыОперации);
Иначе
ТекстСообщения = НСтр("ru = 'Нет последнего слип-чека.'");
ОбщегоНазначенияКлиент.СообщитьПользователю(ТекстСообщения);
КонецЕсли;
КонецПроцедуры
|
|