1С 8.3 Пример кассового чека в 1С - Программист 1С Минск. Автоматизация бизнеса.

Перейти к контенту

1С 8.3 Пример кассового чека в 1С

Данные > Примеры кода 1С > 1С 8.3 Текстовый документ
Реклама:
Перейти в раздел примеры кода 1С 8.3:
Данный пример позволяет печатать и сохранять чеки из 1С в простом текстовом формате практически на любом оборудовании всех типов розничных сетей. В коде 1С кажется, что колонки/строки сдвинуты, однако в текстовом файле и при выводе на печать, информация будет отображаться визуально ровно (как на изображении).
визуальное изображение чека
Пример кода для чека сдедствами 1С 8.3:
&НаКлиенте
Процедура ПримерЧекаИз1С()

   КаталогДляЧеков = "C:\Temp1C\";
   //СоздатьКаталог(КаталогДляЧеков); // Имя каталога (путь)
   //прим.асинхр.вызов
   НачатьСозданиеКаталога(Новый ОписаниеОповещения("СоздатьКаталогЗавершение", ЭтотОбъект), КаталогДляЧеков);

   Текст_Чека = Новый ТекстовыйДокумент;

   // Наполнение чека содержимым
   Текст_Чека.УстановитьТекст("
                                               |==============================================
                                               |              ДОБРО ПОЖАЛОВАТЬ!
                                               |                 КАССОВЫЙ ЧЕК
                                               |ПРИХОД
                                               |                              09.06.2021 09:12
                                               |----------------------------------------------
                                               |
                                               |Робот-пылесос Roidmi Eve Plus арт. 1001.52.108
                                               | (для уборки пола, 50 Вт (+ 850 Вт - станция)
                                               |                     1.000 х 1195.00 = 1195.00
                                               |НДС 20%= 199.17                 СКИДКА= 130.00
                                               |ТОВАР
                                               |----------------------------------------------
                                               |ИТОГ                                 = 1065.00
                                               |----------------------------------------------
                                               |ОПЛАТА
                                               | НАЛИЧНЫМИ                           = 1065.00
                                               |СНО:                          УСН доход-расход
                                               | СУММА С НДС                          =1065.00
                                               | В ТОМ ЧИСЛЕ НДС 20%                   =177.50
                                               |КАССИР: Администратор
                                               |
                                               |ПОДПИСЬ:______________________________________
                                               |             СПАСИБО ЗА ПОКУПКУ!
                                               |==============================================");

   // Запись/перезапись файла (C:\Temp1C\receipt.txt) на диск
   // Параметры: путь, кодировка, разделитель строк
   //Текст_Чека.Записать(КаталогДляЧеков + "\receipt.txt",
   //КодировкаТекста.UTF8, Символы.ВК + Символы.ПС);

   Текст_Чека.НачатьЗапись(новый ОписаниеОповещения, КаталогДляЧеков + "\receipt.txt"); //прим.асинхр.вызов

   // Открытие созданного файла в блокноте
   //ЗапуститьПриложение(КаталогДляЧеков + "\receipt.txt");
   //НачатьЗапускПриложения(); //прим.асинхр.вызов

КонецПроцедуры

&НаКлиенте
Процедура СоздатьКаталогЗавершение(КаталогДляЧеков, Дополнительно)

   Сообщ = Новый СообщениеПользователю;
   Сообщ.Текст = "Каталог для чеков: " + КаталогДляЧеков + " создан";
   Сообщ.Сообщить();

КонецПроцедуры
Поиск кода
0
комментарии
____________________
Copyright by 1Cnik.by©, «Программист 1С в г.Минске», 09.06.2021
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник
Защищенное соединение ssl
visa
mastercard
Maestro
Яндекс деньги
Назад к содержимому