Имя: Пароль:
1C
 
Вывод Чека ККМ по нескольким видам оплаты.
0 1S_User
 
15.04.15
11:33
Здравствуйте!
Возникла следующая проблема. Стандартная обработка 1с для обслуживания атолловского фискального регистратора позволяет печатать в чеке только 2 вида оплаты: нал и безнал. А нужно еще выводить бонусы, сертификаты и т.д.
Достаточно быстро нагуглил, что можно реализовать кодом типа
**********************************
Если СуммаНал > 0 Тогда
                               Драйвер.Summ       = СуммаНал;
                               Драйвер.TypeClose = 0;
                               Драйвер.Payment();
                               Ответ =  Драйвер.Результат;
                КонецЕсли;

                Если Ответ = 0 Тогда
                               Если СуммаПлатежнойКартой > 0 Тогда
                                   Драйвер.Summ       = СуммаПлатежнойКартой;
                                   Драйвер.TypeClose = 1;
                                   Драйвер.Payment();
                                   Ответ = Драйвер.Результат;
                               КонецЕсли;
                КонецЕсли;                
                            Если Ответ = 0 Тогда
                               Если СуммаБонусами > 0 Тогда
                                   Драйвер.Summ       = СуммаБонусами;
                                   Драйвер.TypeClose = 2;
                                   Драйвер.Payment();
                                   Ответ = Драйвер.Результат;
                               КонецЕсли;
                КонецЕсли;
                                 Если Ответ = 0 Тогда
                               Если СуммаСертификатом > 0 Тогда
                                   Драйвер.Summ       = СуммаСертификатом;
                                   Драйвер.TypeClose = 3;
                                   Драйвер.Payment();
                                   Ответ = Драйвер.Результат;
                               КонецЕсли;
                КонецЕсли;      

                Если Ответ = 0 Тогда
                                Объект.Драйвер.CloseCheck(); // Закрыть чек
                                                           Ответ = Драйвер.Результат;
                КонецЕсли;

                Если Ответ <> 0 Тогда
                               Результат = мОшибкаНеизвестно;
                                                   Объект.ОписаниеОшибки =  Драйвер.ОписаниеРезультата;
                               ОтменитьЧек(Объект);
                КонецЕсли;
                             Возврат Результат;

***************************
Но проблема в том, что стандартный 1с-совский интерфейс вообще не позволяет обращаться к суммам, поэтому предлагается (уточнил о поддержки "Атолла") использовать отдельный интефейс, подгружаемый из библиотеки FPrnM1C.dll.

Возник вопрос. Какими приветами может обернуться использование нестандартного для 1С интерфейса? Кто-нибудь делал? В тесте-то все отработает, но боюсь неожиданных приветов.
1 Галахад
 
гуру
15.04.15
11:48
(0) Для 1С нестандартный, а для ККМ как раз таки стандартный.
Т.е. если руки из нужного места растут, то проблем не будет.
2 dima-zgr
 
15.04.15
12:32
на штрих мфрк делал доп.строчку сертификаты!