Доброго времени суток. Есть 77 ТИС с атоловской обработкой. Надо сменить систему налогообложения на патент. В драйвере (драйвер 8й) установил по умолчанию, не реагирует. Погуглил посмотрел код обработки, надо передавать 32, народ это делает в переменной ПУП которая у меня в обработке при печати чека никак не используется. Чек пробивается командой [1C-CODE]Объект.СформироватьЧек(глФРИДУстройства, Кассир, Электронно, ТекстАдоДБСтрим, НомерЧека, НомерСмены, ФискальныйПризнак, АдресСайтаПроверки)[/1C-CODE] Никак не учитывая систему налогообложения. Как исправить эту проблему, где почитать(в описании 8го драйвера искал не нашел) что передать, где установить признак?

1с77 установить патент в чеке

Форум Программирование Общие вопросы программирования (Dev)

1. webester 26 14.01.21 03:22 Сейчас в теме

Доброго времени суток. Есть 77 ТИС с атоловской обработкой. Надо сменить систему налогообложения на патент. В драйвере (драйвер 8й) установил по умолчанию, не реагирует. Погуглил посмотрел код обработки, надо передавать 32, народ это делает в переменной ПУП которая у меня в обработке при печати чека никак не используется. Чек пробивается командой

Объект.СформироватьЧек(глФРИДУстройства, Кассир, Электронно, ТекстАдоДБСтрим, НомерЧека, НомерСмены, ФискальныйПризнак, АдресСайтаПроверки)

Никак не учитывая систему налогообложения. Как исправить эту проблему, где почитать(в описании 8го драйвера искал не нашел) что передать, где установить признак?

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
webester (3.00 $m)

Получили:

user1135816 (3 $m)

Показать полностью

Найденные решения

7. user1135816 4 03.02.21 10:31 Сейчас в теме +2 $m

Необходимо параметр TaxVariant передавать 5.

0: Общая ОСН
1: Упрощенная УСН (Доход)
2: Упрощенная УСН (Доход минус Расход)
3: Единый налог на вмененный доход ЕНВД
4: Единый сельскохозяйственный налог ЕСН
5: Патентная система налогообложения

Посмотрите процедуру отправки чека на печать (ото всех документов) и возвратного чека и там добавьте параметр в процедуру, чтобы при формировании XML чека параметр TaxVariant отправлялся со значением Патента

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. user783001 14.01.21 16:58 Сейчас в теме

(1) а кассу на патент перерегистрировали? в настройках кассы СНО по умолчанию на патент поставили?

3. webester 26 22.01.21 12:00 Сейчас в теме

(2)Да, перегистрировали, все поставили. Но ЕНВД как было в чеке так и есть. что делать и куда бежать?

4. user783001 22.01.21 13:18 Сейчас в теме

ну если в кассе по умолчанию стоит патент а в чек идет енвд значит всетаки из 1 с этот параметр приходит.. смотрите отладчиком где и кто подсовывает СНО в кассу

5. webester 26 22.01.21 13:25 Сейчас в теме

(4) в (0) команда которая отправляет готовый xml на печать, сам xml собирается так:

XMLДанныеЧека = XMLАнализатор.СоздатьДокумент();
XMLДанныеЧека.Кодировка = "UTF-8";
XMLCheckPackage = XMLДанныеЧека.СоздатьПодчиненныйЭлемент("CheckPackage");
XMLParameters = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Parameters");
Атрибут(XMLParameters, "PaymentType", ТипРасчета);
Атрибут(XMLParameters, "TaxVariant", 3);
XMLPositions = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Positions");

СписокТоваров.ВыбратьСтроки();
Пока СписокТоваров.ПолучитьСтроку() = 1 Цикл
XMLFiscalString = XMLPositions.СоздатьПодчиненныйЭлемент("FiscalString");
Атрибут(XMLFiscalString, "Name", СписокТоваров.ТовНаим);
Атрибут(XMLFiscalString, "Quantity", СписокТоваров.Количество);
Атрибут(XMLFiscalString, "Price", СписокТоваров.Цена);
Атрибут(XMLFiscalString, "Amount", СписокТоваров.Сумма);
// Атрибут(XMLFiscalString, "Tax", СписокТоваров.СтавкаНДС);
Атрибут(XMLFiscalString, "Tax",18);

КонецЦикла;

XMLPayments = XMLCheckPackage.СоздатьПодчиненныйЭлемент("Payments");
//Атрибут(XMLPayments, "Cash", Макс(СуммаЧека, Получено));
//Атрибут(XMLPayments, "CashLessType1", "0");
Атрибут(XMLPayments, "Cash", "0");
Атрибут(XMLPayments, "CashLessType1", "0");

//+++
СуммаОплачено = Макс(СуммаЧека, Получено);
Атрибут(XMLPayments, "Cash", ?(Наличка = 1, СуммаОплачено, "0"));
Атрибут(XMLPayments, "CashLessType2", ?(Наличка = 1, "0", СуммаОплачено));
//---

Атрибут(XMLPayments, "CashLessType3", "0");

Показать

6. Grek2000 02.02.21 23:26 Сейчас в теме

ФР.AttrNumber = 1055;
ФР.AttrValue = 32;
ФР.AttrPrint = 1;
ФР.WriteAttribute();

7. user1135816 4 03.02.21 10:31 Сейчас в теме +2 $m

8. webester 26 03.02.21 10:36 Сейчас в теме

(7) куда в (0) это передавать?

9. user1135816 4 03.02.21 10:51 Сейчас в теме +1 $m

в параметр
СистемаНалогообложения = ПУП;

В параметры

Атрибут(XMLParameters, "TaxVariant", СистемаНалогообложения);

В обработку в функцию
Функция ПечататьЧек(Объект, Пароль, СписокТоваров, СуммаЧека, ПолученоНаличных, ПолученоБезнал, Скидка, ПризнВозврата, ПУП, Кассир, НомерСекции, НомерЧека, ДлинаСтроки)

Вместо параметра "ПУП"

В глобальном модуле в функцию
Функция глФРПечататьЧек(СписокТоваров, СуммаЧека, ПолученоНаличных, ПолученоБезнал, Скидка, ПризнВозврата, НомерСекции, НомерЧека, ПУП, Кассир) Экспорт

И везде где вызывается эта экспортная функция. например РеализацияРозница

Если глФРПечататьЧек(СписокТоваров, СуммаЧека, ПолученоНаличных, ПолученоБезнал, Скидка, ПризнВозврата, НомерСекции, НомерЧека, ПУП, Кассир) = 1 Тогда

10. webester 26 03.02.21 10:59 Сейчас в теме

Отлично. Спасибо! Проверю отпишусь

11. user1135816 4 11.02.21 14:59 Сейчас в теме

(10) Помогло?

12. webester 26 21.02.21 08:29 Сейчас в теме

(11)Да. Все хорошо. Спасибо. На самом деле ответ был действительно в (7) и если глянуть в (5) то там видно, что TaxVariant там есть и он установлен в 3, что согласно табличке из (7) означает ЕНВД . Но я чот это проморгал. Ваш ответ помог, тем, что я полез встраивать это поле(вся эта шелуха с пупами и процедурами конечно не нужна) и обнаружил где ЕНВД передается в чек. Поставил нужное значение все заработало. Так, что спасибо и вам и (7)

Оставьте свое сообщение

E-mail: