Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
14 Июн 2021, 09:31
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
МультиВход
 
collapse

Автор Тема: Как доработать обработку frATOL54_comm.ert что бы на чеке печатался тип платежа электронно?  (Прочитано 6645 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Azelle

  • *
  • Регистрация: 2016-12-14
  • Сообщений: 7
  • РЕПУТАЦИЯ: 0
  • Профессия: Программист 1С
Подскажите пожалуйста! Имеем на фирме ТИС 7.7 и  кассу АТОЛ 30Ф, отдельно стоит терминал для оплаты по карточкам, терминал и касса никак не связаны. Для электронной оплаты в 1с установлен отдел отличный от оплаты наличными. Как доработать обработку frATOL54_comm.ert что бы на чеке печатался тип платежа электронно, в зависимости от выбранного отдела в чеке 1С? Раньше такая доработка была сделана в обработке fr_comm.ert для старых касс.


Оффлайн Azelle

  • *
  • Регистрация: 2016-12-14
  • Сообщений: 7
  • РЕПУТАЦИЯ: 0
  • Профессия: Программист 1С
В общем удалось разобраться, ответ такой, в обработке есть параметры XMLPayments

XMLPayments   = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Payments");
   Атрибут(XMLPayments, "Cash", Макс(СуммаЧека, Получено));
   Атрибут(XMLPayments, "CashLessType1", "0");
   Атрибут(XMLPayments, "CashLessType2", "0");
   Атрибут(XMLPayments, "CashLessType3", "0");
XMLДанныеЧека.Записать(КаталогПользователя() + "FRAtol_001.xml");

Cash - это наличные, CashLessType1 - тип оплаты 1, который можно настроить в драйвере, CashLessType2 - это 2 тип оплаты, CashLessType3 - это третий.
   
Пример кода:
   Если НомерСекции = 5 Тогда  //оплата электронными 
      XMLPayments   = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Payments");
      Атрибут(XMLPayments, "Cash", "0");
      Атрибут(XMLPayments, "CashLessType1", Макс(СуммаЧека, Получено));
      Атрибут(XMLPayments, "CashLessType2", "0");
      Атрибут(XMLPayments, "CashLessType3", "0");
      XMLДанныеЧека.Записать(КаталогПользователя() + "FRAtol_001.xml");
    Иначе  //оплата наличными
      XMLPayments   = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Payments");
      Атрибут(XMLPayments, "Cash", Макс(СуммаЧека, Получено));
      Атрибут(XMLPayments, "CashLessType1", "0");
      Атрибут(XMLPayments, "CashLessType2", "0");
      Атрибут(XMLPayments, "CashLessType3", "0");
      XMLДанныеЧека.Записать(КаталогПользователя() + "FRAtol_001.xml");
    КонецЕсли;
   


 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Последние вакансии

* Том 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
72 Сообщений
LexaK
62 Сообщений
antoneus antoneus
31 Сообщений
Ивашка
27 Сообщений
KATERINA 861
23 Сообщений
neek666
22 Сообщений
SSC
15 Сообщений
alexandr_ll
15 Сообщений
Алексей_1985_06
11 Сообщений
pouyo
8 Сообщений

* Кто онлайн

  • Точка Гостей: 219
  • Точка Скрытых: 0
  • Точка Пользователей: 1
  • Точка Сейчас на форуме:

* Облако тэгов

* Инструменты

* Дополнительно

Поиск