Имя: Пароль:
1C
 
1с 8 штрих м распределение безналичной оплаты на наличными и картой
0 DenisVich
 
08.08.17
19:31
Здравствуйте столкнулся с такой проблемой. Штрихм онлайн распределяет сумму чека пополам. Т.е. если пробили 100 рублей, то 50 рублей у нас наличными, 50 картой. в коде кроме как . Вот что в коде:
Объект.CheckType = 0;//Продажа
Процедура ПродажаЧекШтрих(НомерПоз, Цена,Количество,Название) Экспорт;
    ФискальныйРегистраторОбъект.Password=30;
    ФискальныйРегистраторОбъект.Quantity=Количество;
    ФискальныйРегистраторОбъект.Price=Цена;        
    //ФискальныйРегистраторОбъект.Department=Секция;
    ФискальныйРегистраторОбъект.StringForPrinting=Строка(НомерПоз)+". "+Название;
    ФискальныйРегистраторОбъект.Sale();
    ОтветДрайвера();
КонецПроцедуры


Процедура ЗакрытьЧекПоКарте(Сумма,ПечатьСтроки) Экспорт
    ФискальныйРегистраторОбъект.Password=30;
    ФискальныйРегистраторОбъект.Summ4=Сумма;
    ФискальныйРегистраторОбъект.StringForPrinting=ПечатьСтроки;
    ФискальныйРегистраторОбъект.CloseCheck();
    ОтветДрайвера();    
КонецПроцедуры


Функция ОтветДрайвера() Экспорт;
    //НеПечататьЧек=0;
    ResultCode=ФискальныйРегистраторОбъект.ResultCode;
    ОшибкаПараметра=ФискальныйРегистраторОбъект.ResultCodeDescription;
    Если (СокрЛП(Строка(ОшибкаПараметра))<>"Ошибок нет")
        ИЛИ (СокрЛП(ОшибкаПараметра)="Нет связи") Тогда
        Предупреждение("Штрих "+Строка(ОшибкаПараметра),10,"Сообщение от фискального регистратора");
    Иначе
    КонецЕсли;
    Возврат ОшибкаПараметра;      
КонецФункции
1 DenisVich
 
08.08.17
19:32
Притом если печать наличными то все нормально. Нет никакого распредления.
2 DenisVich
 
08.08.17
19:38
Может можно так:
ФискальныйРегистраторОбъект.Summ1=0
ФискальныйРегистраторОбъект.Summ4=Сумма;
указать что наличными ноль.
3 DenisVich
 
09.08.17
07:29
Как можно убрать распределение оплаты 50/50 нал./безнал.?
4 DenisVich
 
09.08.17
09:22
Это будет правильным:
ФискальныйРегистраторОбъект.Summ1=0;
ФискальныйРегистраторОбъект.Summ4=100;
5 DenisVich
 
09.08.17
11:26
Работает