Модуль ККТ: онлайн-касса по сети

Демо-версия

В разделе "Файлы" доступна для скачивания демо-версия программы. Демо-версия позволяет:

1. Протестировать программу на вашем устройстве ККТ
2. Протестировать драйвера 1С "Клиент-ККТ" на вашей конфигурации
3. Использовать программу в качестве эмулятора ККТ
4. Записывать в файл лога все обращения к драйверу ККТ (можно использовать для отладки и тестирования)

Ограничение демо-версии: не более 5 чеков после запуска службы (если перезапустить службу, то можно снова печатать 5 чеков)

Пробный период (30 дней)

Пробный период – это бесплатный период использования программы, в течение которого можно понять, насколько она вам подходит. По истечении пробного периода программа автоматически вернётся в демо-режим.

Для активации пробно периода нужно запустить программу KKT_Server_Setting.exe и нажать кнопку "Ещё" – "Регистрация" – "Пробный период".

В программу встроен эмулятор ККТ, который может работать в следующих режимах:

1. В соответствии с «Требованиями к разработке драйверов подключаемого оборудования» версии 2.1
2. В соответствии с «Требованиями к разработке драйверов подключаемого оборудования» версии 2.2
3. В соответствии с «Требованиями к разработке драйверов подключаемого оборудования» версии 3.1
4. В соответствии с «Требованиями к разработке драйверов подключаемого оборудования» версии 3.2

Для использования эмулятора достаточно демо-версии программы

В программе есть возможность включить запись логов: вся информация о вызовах методов драйвера ККТ будет записываться в текстовой файл:

21.08.2019 10:47:25	Start on port 52111
Server mode: Native   InterfaceRevision: 2004   Dll: C:\Program Files\Modul\KKT\fptr10_1c_win32_10_4_2_0.dll

21.08.2019 10:50:02	ClientConnect 192.168.1.176

21.08.2019 10:50:02	Command Open
Параметр1=Неопределено

21.08.2019 10:50:03	Command completed

21.08.2019 10:50:03	Return
Параметр1="ATOL_KKT_1C83_V10#1"
Результат=Истина

21.08.2019 10:50:03	ClientDisconnect 192.168.1.176

21.08.2019 10:50:03	ClientConnect 192.168.1.176

21.08.2019 10:50:03	Command ProcessCheck
Параметр1="ATOL_KKT_1C83_V10#1"
Параметр2=Ложь
Параметр3="<?xml version="1.0" encoding="UTF-8"?>
<CheckPackage>
	<Parameters CashierName="Иванов Иван Иванович" PaymentType="1" SenderEmail="" CustomerPhone=""/>
	<Positions>
		<FiscalString Name="63155 Пакет-майка" Quantity="1" PriceWithDiscount="5" SumWithDiscount="5" Tax="none" SignCalculationObject="1"/>
		<Barcode BarcodeType="CODE39" Barcode="DA00-00032994210819"/>
	</Positions>
	<Payments Cash="5" ElectronicPayment="0" Credit="0" AdvancePayment="0" CashProvision="0"/>
</CheckPackage>"
Параметр4=0
Параметр5=0
Параметр6=""
Параметр7=""

21.08.2019 10:50:07	Command completed
Mode=work
21.08.2019 10:50:07	Return
Параметр1 без изменений
Параметр2 без изменений
Параметр3 без изменений
Параметр4=7435
Параметр5=97
Параметр6="4149700262"
Параметр7="www.nalog.ru"
Результат=Истина

21.08.2019 10:50:07	ClientDisconnect 192.168.1.176

21.08.2019 10:50:07	ClientConnect 192.168.1.176

21.08.2019 10:50:07	Command Close
Параметр1="ATOL_KKT_1C83_V10#1"

21.08.2019 10:50:07	Command completed

21.08.2019 10:50:07	Return
Параметр1 без изменений
Результат=Истина

21.08.2019 10:50:07	ClientDisconnect 192.168.1.176

Информация в файле лога ориентирована на программистов. В ней содержится:

• Имя вызываемого метода компоненты
• Входные параметры
• Выходные параметры (т.е. параметры после вызова метода)
• Признак успешности выполнения
• Возвращаемый результат

Для сбора логов с целью тестирования конфигурации достаточно демо-версии программы

Ограничения типовой конфигурации "1С:Управление Торговлей 10.3":
В документе "Кассовая смена" указывается экземпляр подключаемого устройства (реквизит "Фискальное­Устройство"). То есть нельзя получить информацию о кассовой смене на другом рабочем месте, т.к. на другом рабочем месте используется другой экземпляр подключаемого устройства.

Необходимые изменения:

1. В модуле объекта документа "Кассовая смена" в событии "Перед­Записью" очищать значение реквизита "Фискальное­Устройство".

   Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
   	Если ОбменДанными.Загрузка=Ложь Тогда
   		ФискальноеУстройство = Неопределено;
   	КонецЕсли;
   КонецПроцедуры

2. Изменить процедуру "ОбщийМодуль.­Кассовые­Смены­Вызов­Сервера.­Описание­Последней­Кассовой­Смены" таким образом, чтобы получать статус последней смены не по "Фискальному­Устройству" а по "КассеККМ".

   //Изменить запроc на:
   Запрос.Текст =
   "ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
   |	КассоваяСмена.Ссылка КАК КассоваяСмена,
   |	КассоваяСмена.ФискальноеУстройство,
   |	КассоваяСмена.НачалоКассовойСмены,
   |	КассоваяСмена.ОкончаниеКассовойСмены,
   |	ДОБАВИТЬКДАТЕ(КассоваяСмена.НачалоКассовойСмены, ДЕНЬ, 1) КАК ДатаИстеченияСрокаДействия,
   |	КассоваяСмена.Организация,
   |	КассоваяСмена.Статус,
   |	КассоваяСмена.ДатаСменыККТ,
   |	КассоваяСмена.НомерСменыККТ,
   |	КассоваяСмена.КассаККМ
   |ИЗ
   |	Документ.КассоваяСмена КАК КассоваяСмена
   |		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ТорговоеОборудование КАК Рег
   |		ПО КассоваяСмена.КассаККМ = Рег.КассаККМ
   |			И (Рег.Идентификатор = &ФискальноеУстройство)
   |			И (КассоваяСмена.Проведен)
   |
   |УПОРЯДОЧИТЬ ПО
   |	КассоваяСмена.НачалоКассовойСмены УБЫВ";

3. Изменить процедуру "Документ.­Кассовые­Смены.­Форма­Списка.­Закрыть­Кассовую­Смену" таким образом, чтобы получать ККТ не из документа, а из списка подключенных устройств.

   &НаКлиенте
   Процедура ЗакрытьКассовуюСмену(Команда)
   
   	Если Не КассовыеСменыВызовСервера.ЕстьПравоНаЗакрытиеСмены() Тогда
   		Предупреждение("Нарушение прав доступа");
   		Возврат;
   	КонецЕсли;
   
   	ОчиститьСообщения();
   
   	ТекущиеДанныеСписка = Элементы.Список.ТекущиеДанные;
   	Если ТекущиеДанныеСписка <> Неопределено Тогда
   		СтатусСмены = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ТекущиеДанныеСписка.Ссылка, "Статус");
   		Если СтатусСмены = ПредопределенноеЗначение("Перечисление.СтатусыКассовойСмены.Закрыта") Тогда
   			ОбщегоНазначения.СообщитьОбОшибке("Смена уже закрыта.");
   			Возврат;
   		КонецЕсли;
   	Иначе
   		ОбщегоНазначения.СообщитьИнформациюПользователю("Выберите смену, которую нужно закрыть.");
   		Возврат;
   	КонецЕсли;
   
   	КассаККМ = ТекущиеДанныеСписка.КассаККМ;
   	Если Не ЗначениеЗаполнено(КассаККМ) Тогда
   		Возврат;
   	КонецЕсли;
   	МассивФУ = ПолучитьСерверТО().ПолучитьСписокУстройств(Перечисления.ВидыТорговогоОборудования.ККТ, КассаККМ);
   
   	КоличествоФУ = МассивФУ.Количество();
   	Если КоличествоФУ = 0 Тогда
   		Возврат;
   	ИначеЕсли КоличествоФУ = 1 Тогда
   		ККТ = МассивФУ[0];
   	Иначе
   		СписокФУ = РаботаСТорговымОборудованием.ПолучитьСписокУстройствТОДляВыбора(МассивФУ);
   
   		х = СписокФУ.ВыбратьЭлемент("Необходимо выбрать фискальное устройство");
   		Если х=Неопределено Тогда
   			Возврат;
   		Иначе
   			ККТ = х.Значение;
   		КонецЕсли;
   	КонецЕсли;
   
   	КассовыеСменыКлиент.ЗакрытьКассовуюСмену(ККТ, ТекущиеДанныеСписка.Ссылка);
   
   	Элементы.Список.Обновить();
   
   КонецПроцедуры

1. В справочнике "Кассы ККМ" указывается экземпляр подключаемого устройства. Таким образом ККМ привязывается только к одному рабочему месту.
    
2. В документе "Кассовая смена" указывается экземпляр подключаемого устройства (реквизит "Фискальное­Устройство"). То есть нельзя получить информацию о кассовой смене на другом рабочем месте, т.к. на другом рабочем месте используется другой экземпляр подключаемого устройства.
    

Необходимые изменения:

1. В справочник "ПодключаемоеОборудование" добавить реквизит "Касса ККМ". Это позволить использовать одну ККМ на нескольких рабочих местах.
2. В модуле объекта документа "Кассовая смена" в событии "ПередЗаписью" очищать значение реквизита "ФискальноеУстройство".

   Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
   	Если ОбменДанными.Загрузка=Ложь Тогда
   		ФискальноеУстройство = Неопределено;
   	КонецЕсли;
   КонецПроцедуры

3. В справочник "КассыККМ" добавить табличную часть "ПараметрыРегистрации". Это позволить хранить параметры регисстрации ККТ без привязки к рабочему месту.
4. Изменить процедуры общих модулей таким образом, чтобы получать данные "ФискальномуУстройству" а по "КассеККМ":

   Кассовые­Смены­Вызов­Сервера.­Описание­Последней­Кассовой­Смены

   УстановитьПривилегированныйРежим(Истина);
   	
   	//++Было
   	//Запрос = Новый Запрос();
   	//Запрос.Текст =
   	//"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
   	//|	КассоваяСмена.Ссылка КАК КассоваяСмена,
   	//|    КассоваяСмена.ФискальноеУстройство КАК ФискальноеУстройство,
   	//|    КассоваяСмена.НачалоКассовойСмены КАК НачалоКассовойСмены,
   	//|    КассоваяСмена.ОкончаниеКассовойСмены КАК ОкончаниеКассовойСмены,
   	//|	ДОБАВИТЬКДАТЕ(КассоваяСмена.НачалоКассовойСмены, ДЕНЬ, 1) КАК ДатаИстеченияСрокаДействия,
   	//|    КассоваяСмена.Организация КАК Организация,
   	//|    КассоваяСмена.Статус КАК Статус
   	//|ИЗ
   	//|	Документ.КассоваяСмена КАК КассоваяСмена
   	//|ГДЕ
   	//|	КассоваяСмена.ФискальноеУстройство = &ФискальноеУстройство
   	//|	И КассоваяСмена.Проведен
   	//|
   	//|УПОРЯДОЧИТЬ ПО
   	//|    КассоваяСмена.НачалоКассовойСмены УБЫВ,
   	//|    КассоваяСмена.НомерСменыККТ УБЫВ";
   	//Запрос.УстановитьПараметр("ФискальноеУстройство", ФискальноеУстройство);
   	//Результат = Запрос.Выполнить().Выгрузить();
   	//--Было
   	
   	//++Стало
   	Запрос = Новый Запрос();
   	Запрос.Текст =
   	"ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1
   	|	КассоваяСмена.Ссылка КАК КассоваяСмена,
       |    КассоваяСмена.ФискальноеУстройство КАК ФискальноеУстройство,
       |    КассоваяСмена.НачалоКассовойСмены КАК НачалоКассовойСмены,
       |    КассоваяСмена.ОкончаниеКассовойСмены КАК ОкончаниеКассовойСмены,
   	|	ДОБАВИТЬКДАТЕ(КассоваяСмена.НачалоКассовойСмены, ДЕНЬ, 1) КАК ДатаИстеченияСрокаДействия,
       |    КассоваяСмена.Организация КАК Организация,
       |    КассоваяСмена.Статус КАК Статус
   	|ИЗ
   	|	Документ.КассоваяСмена КАК КассоваяСмена
   	|ГДЕ
   	|	КассоваяСмена.КассаККМ = &КассаККМ
   	|	И КассоваяСмена.Проведен
   	|
   	|УПОРЯДОЧИТЬ ПО
       |    КассоваяСмена.НачалоКассовойСмены УБЫВ,
       |    КассоваяСмена.НомерСменыККТ УБЫВ";
   	Запрос.УстановитьПараметр("КассаККМ", ФискальноеУстройство.СерверККТ_КассаККМ);
   	Результат = Запрос.Выполнить().Выгрузить();
   	//--Стало
   	
   	
   	Если Результат.Количество() = 0 Тогда
   		Возврат Неопределено;
   	Иначе
   		СтруктураРезультат = Новый Структура();
   		Для Каждого КолонкаРезультата Из Результат.Колонки Цикл
   			СтруктураРезультат.Вставить(КолонкаРезультата.Имя, Результат[0][КолонкаРезультата.Имя]);
   		КонецЦикла;
   		Возврат СтруктураРезультат;
   	КонецЕсли;

   УправлениеНебольшойФирмойПовтИсп.ПолучитьПараметрыКассыККМ

   	//++Было
   	//Запрос = Новый Запрос;
   	//Запрос.Текст = 
   	//"ВЫБРАТЬ РАЗРЕШЕННЫЕ
   	//|	ВЫБОР
   	//|		КОГДА КассыККМ.ТипКассы = ЗНАЧЕНИЕ(Перечисление.ТипыКассККМ.ФискальныйРегистратор)
   	//|			ТОГДА ИСТИНА
   	//|		ИНАЧЕ ЛОЖЬ
   	//|	КОНЕЦ КАК ЭтоФискальныйРегистратор,
   	//|	КассыККМ.Владелец КАК Организация,
   	//|	КассыККМ.СтруктурнаяЕдиница КАК СтруктурнаяЕдиница,
   	//|	КассыККМ.ПодключаемоеОборудование КАК ИдентификаторУстройства,
   	//|	КассыККМ.ИспользоватьБезПодключенияОборудования КАК ИспользоватьБезПодключенияОборудования,
   	//|	КассыККМ.ЭлектронныйЧекSMSПередаютсяПрограммой1С КАК ЭлектронныйЧекSMSПередаютсяПрограммой1С,
   	//|	КассыККМ.ЭлектронныйЧекEmailПередаютсяПрограммой1С КАК ЭлектронныйЧекEmailПередаютсяПрограммой1С,
   	//|	КассыККМ.СоздаватьВыемку КАК СоздаватьВыемку,
   	//|	КассыККМ.СоздаватьПоступлениеВКассу КАК СоздаватьПоступлениеВКассу,
   	//|	КассыККМ.КассаДляРозничнойВыручки КАК КассаДляРозничнойВыручки,
   	//|	КассыККМ.МинимальныйОстатокВКассеККМ КАК МинимальныйОстатокВКассеККМ
   	//|ИЗ
   	//|	Справочник.КассыККМ КАК КассыККМ
   	//|ГДЕ
   	//|	КассыККМ.Ссылка = &Ссылка";
   	//
   	//Запрос.УстановитьПараметр("Ссылка", КассаККМ);
   	//--Было
   	
   	//++Стало
   	ИдентификаторУстройства = Справочники.ПодключаемоеОборудование.ПустаяСсылка();
   
   	Запрос = Новый Запрос(
   	"ВЫБРАТЬ
   	|	Спр.Ссылка КАК Ссылка
   	|ИЗ
   	|	Справочник.ПодключаемоеОборудование КАК Спр
   	|ГДЕ
   	|	Спр.СерверККТ_КассаККМ = &КассаККМ И РабочееМесто=&РабочееМесто И УстройствоИспользуется=Истина И ПометкаУдаления=Ложь И ТипОборудования=Значение(Перечисление.ТипыПодключаемогоОборудования.ККТ)");
   	Запрос.УстановитьПараметр("КассаККМ",КассаККМ);
   	Запрос.УстановитьПараметр("РабочееМесто",МенеджерОборудованияВызовСервера.ПолучитьРабочееМестоКлиента());
   	
   	Табл = Запрос.Выполнить().Выгрузить();
   	Если Табл.Количество()=1 Тогда
   		ИдентификаторУстройства = Табл[0].Ссылка;
   	КонецЕсли;
   	
   	
   	Запрос = Новый Запрос;
   	Запрос.Текст = 
   	"ВЫБРАТЬ РАЗРЕШЕННЫЕ
   	|	ВЫБОР
   	|		КОГДА КассыККМ.ТипКассы = ЗНАЧЕНИЕ(Перечисление.ТипыКассККМ.ФискальныйРегистратор)
   	|			ТОГДА ИСТИНА
   	|		ИНАЧЕ ЛОЖЬ
   	|	КОНЕЦ КАК ЭтоФискальныйРегистратор,
   	|	КассыККМ.Владелец КАК Организация,
   	|	КассыККМ.СтруктурнаяЕдиница КАК СтруктурнаяЕдиница,
   	|	&ИдентификаторУстройства КАК ИдентификаторУстройства,
   	|	КассыККМ.ИспользоватьБезПодключенияОборудования КАК ИспользоватьБезПодключенияОборудования,
   	|	КассыККМ.ЭлектронныйЧекSMSПередаютсяПрограммой1С КАК ЭлектронныйЧекSMSПередаютсяПрограммой1С,
   	|	КассыККМ.ЭлектронныйЧекEmailПередаютсяПрограммой1С КАК ЭлектронныйЧекEmailПередаютсяПрограммой1С,
   	|	КассыККМ.СоздаватьВыемку КАК СоздаватьВыемку,
   	|	КассыККМ.СоздаватьПоступлениеВКассу КАК СоздаватьПоступлениеВКассу,
   	|	КассыККМ.КассаДляРозничнойВыручки КАК КассаДляРозничнойВыручки,
   	|	КассыККМ.МинимальныйОстатокВКассеККМ КАК МинимальныйОстатокВКассеККМ
   	|ИЗ
   	|	Справочник.КассыККМ КАК КассыККМ
   	|ГДЕ
   	|	КассыККМ.Ссылка = &Ссылка";
   	
   	Запрос.УстановитьПараметр("Ссылка", КассаККМ);
   	Запрос.УстановитьПараметр("ИдентификаторУстройства", ИдентификаторУстройства);
   	//--Стало
   	
   	
   	Результат = Запрос.Выполнить();
   	Выборка = Результат.Выбрать();
   	
   	Если Выборка.Следующий() Тогда
   		
   		Возврат Новый Структура(
   			"ИдентификаторУстройства,
   			|ИспользоватьБезПодключенияОборудования,
   			|ЭтоФискальныйРегистратор,
   			|Организация,
   			|СтруктурнаяЕдиница,
   			|ЭлектронныйЧекSMSПередаютсяПрограммой1С,
   			|ЭлектронныйЧекEmailПередаютсяПрограммой1С,
   			|СоздаватьВыемку,
   			|СоздаватьПоступлениеВКассу,
   			|КассаДляРозничнойВыручки,
   			|МинимальныйОстатокВКассеККМ",
   			Выборка.ИдентификаторУстройства,
   			Выборка.ИспользоватьБезПодключенияОборудования,
   			Выборка.ЭтоФискальныйРегистратор,
   			Выборка.Организация,
   			Выборка.СтруктурнаяЕдиница,
   			Выборка.ЭлектронныйЧекSMSПередаютсяПрограммой1С,
   			Выборка.ЭлектронныйЧекEmailПередаютсяПрограммой1С,
   			Выборка.СоздаватьВыемку,
   			Выборка.СоздаватьПоступлениеВКассу,
   			Выборка.КассаДляРозничнойВыручки,
   			Выборка.МинимальныйОстатокВКассеККМ
   		);
   		
   	Иначе
   		
   		Возврат Новый Структура(
   			"ИдентификаторУстройства,
   			|ИспользоватьБезПодключенияОборудования,
   			|ЭтоФискальныйРегистратор,
   			|Организация,
   			|СтруктурнаяЕдиница,
   			|ЭлектронныйЧекSMSПередаютсяПрограммой1С,
   			|ЭлектронныйЧекEmailПередаютсяПрограммой1С,
   			|СоздаватьВыемку,
   			|СоздаватьПоступлениеВКассу,
   			|КассаДляРозничнойВыручки,
   			|МинимальныйОстатокВКассеККМ",
   			Справочники.ПодключаемоеОборудование.ПустаяСсылка(),
   			Ложь,
   			Ложь,
   			Справочники.Организации.ПустаяСсылка(),
   			Справочники.СтруктурныеЕдиницы.ПустаяСсылка(),
   			Ложь,
   			Ложь,
   			Ложь,
   			Ложь,
   			Справочники.Кассы.ПустаяСсылка(),
   			0
   		);
   		
   	КонецЕсли;
   
   

5. В форме "Документ.­ЧекККМ.­Форма­Документа_РМК" изменить процедуру Получить­Ссылки­На­Оборудование

   	ФискальныйРегистратор = Справочники.ПодключаемоеОборудование.ПустаяСсылка();
   	
   	Если ИспользоватьПодключаемоеОборудование Тогда
   		Запрос = Новый Запрос(
   		"ВЫБРАТЬ
   		|	Спр.Ссылка КАК Ссылка
   		|ИЗ
   		|	Справочник.ПодключаемоеОборудование КАК Спр
   		|ГДЕ
   		|	Спр.СерверККТ_КассаККМ = &КассаККМ И РабочееМесто=&РабочееМесто И УстройствоИспользуется=Истина И ПометкаУдаления=Ложь И ТипОборудования=Значение(Перечисление.ТипыПодключаемогоОборудования.ККТ)");
   		Запрос.УстановитьПараметр("КассаККМ",Объект.КассаККМ);
   		Запрос.УстановитьПараметр("РабочееМесто",МенеджерОборудованияВызовСервера.ПолучитьРабочееМестоКлиента());
   	
   		Табл = Запрос.Выполнить().Выгрузить();
   		Если Табл.Количество()=1 Тогда
   			ФискальныйРегистратор = Табл[0].Ссылка;
   		КонецЕсли;
   	КонецЕсли;
   

1. Служба "Сервер ККТ" подключается к кассовому аппарату используя драйвера от производителя ККТ (например, драйвера выполненные по технологии Native API для 1С:8.3).
2. Далее служба "Сервер ККТ" открывает TCP-порт прослушивания входящий соединений.
3. Программа 1С:7.7 подключается к этому порту используя драйвер "Клиент-ККТ" (драйвер входит в дистрибутив "Сервера ККТ").
4. Далее 1С:7.7 и "Сервер ККТ" обмениваются данными по своему внутреннему протоколу. При этом для 1С скрыто, какой кассовый аппарат и какой драйвер используется.

Перем Объект;
Перем Параметр_Сервер;
Перем Параметр_Порт;


Процедура ПриОткрытии()
	
	Если ЗагрузитьВнешнююКомпоненту("v7plus.dll")<>1 Тогда
		Форма.Параметр.Установить("Результат", 0);
		Форма.Параметр.Установить("ОписаниеРезультата", "Компонента v7plus.dll не найдена!");
		СтатусВозврата(0);
		Возврат;
	КонецЕсли; 
	
	Компонента = "KKT_Client_3001_77.dll";
	Если ЗагрузитьВнешнююКомпоненту(Компонента)=0  Тогда
		Сообщить("Не удалось загрузить внешнюю компоненту """ + Компонента + """");
		СтатусВозврата(0);
		Возврат;
	Иначе
		Попытка
			Объект = СоздатьОбъект("AddIn.MKClient_3001_77");
		Исключение
		КонецПопытки;
		
		Если ПустоеЗначение(Объект)=1 Тогда
			Сообщить("Не удалось создать объект внешней компоненты");
			СтатусВозврата(0);
			Возврат;
		КонецЕсли;
	КонецЕсли;

	Параметр_Сервер = "192.168.0.61";
	Параметр_Порт = 52111;
КонецПроцедуры

Процедура Атрибут(хмлКорень,хмлЭлемент, ИмяАтрибута, ЗначениеАтрибута)   
	хмлАтрибут = хмлКорень.СоздатьУзел("attribute", ИмяАтрибута);
	хмлАтрибут.Значение = ЗначениеАтрибута;
	хмлЭлемент.ДобавитьПодчиненный(хмлАтрибут);	
КонецПроцедуры 


Функция Подключиться(Отказ,ОписаниеРезультата)
	
	Если ПустоеЗначение(Объект)=1 Тогда
		ОписаниеРезультата = "Объект внешней компоненты не создан";
		Отказ = 1;
		Возврат "";
	КонецЕсли;

	ф = Объект.УстановитьПараметр("Server", Параметр_Сервер);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат "";
	КонецЕсли;

	ф = Объект.УстановитьПараметр("Port", Параметр_Порт);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат "";
	КонецЕсли;
	
	ИДУстройства = "";
	ф = Объект.Подключить(ИДУстройства);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат "";
	КонецЕсли;

	Возврат ИДУстройства;
КонецФункции


Процедура ОткрытьСмену(ИДУстройства, Кассир, ИНН_Кассира, НомерСмены, Отказ, ОписаниеРезультата)
	
	XMLАнализатор = СоздатьОбъект("AddIn.XMLParser");
	
	// Создаем XML-файл
	XML	= XMLАнализатор.СоздатьДокумент();
	XML.Кодировка = "UTF-8";
	InputParameters	= XML.СоздатьПодчиненныйЭлемент("InputParameters");
	Parameters	= InputParameters.СоздатьПодчиненныйЭлемент("Parameters");
	Атрибут(XML, Parameters, "CashierName", Кассир);
	Атрибут(XML, Parameters, "CashierVATIN", ИНН_Кассира); 
	
	XML.Записать(КаталогПользователя() + "Modul_OpenShift.xml");
	
	// Читаем XML-файл в кодировке UTF-8 
	Поток = CreateObject("Adodb.Stream");
	Поток.Charset = "utf-8";
	Поток.Type = 2;
	Поток.Mode= 3;
	Поток.Open();
	Поток.LoadFromFile(КаталогПользователя() + "Modul_OpenShift.xml");
	ВходныеПараметры = Поток.ReadText();
	Поток.Close();
	
	НомерДокумента = "";
	ВыходныеПараметры = "";
	ф = Объект.ОткрытьСмену(ИДУстройства, ВходныеПараметры, ВыходныеПараметры);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат;
	КонецЕсли;

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


Процедура ЗакрытьСмену(ИДУстройства, Кассир, ИНН_Кассира, НомерСмены, Отказ, ОписаниеРезультата)
	
	XMLАнализатор	= СоздатьОбъект("AddIn.XMLParser");
	
	XML	= XMLАнализатор.СоздатьДокумент();
	XML.Кодировка = "UTF-8";
	InputParameters	= XML.СоздатьПодчиненныйЭлемент("InputParameters");
	Parameters	= InputParameters.СоздатьПодчиненныйЭлемент("Parameters");
	Атрибут(XML, Parameters, "CashierName", Кассир);
	Атрибут(XML, Parameters, "CashierVATIN", ИНН_Кассира); 
	
	XML.Записать(КаталогПользователя() + "Modul_CloseShift.xml");
	
	Поток = CreateObject("Adodb.Stream");
	Поток.Charset = "utf-8";
	Поток.Type = 2;
	Поток.Mode= 3;
	Поток.Open();

	Поток.LoadFromFile(КаталогПользователя() + "Modul_CloseShift.xml");
	ВходныеПараметры = Поток.ReadText();
	Поток.Close();
	
	
	НомерДокумента = "";
	ВыходныеПараметры = "";
	ф = Объект.ЗакрытьСмену(ИДУстройства, ВходныеПараметры, ВыходныеПараметры);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат;
	КонецЕсли;

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


Функция ПечататьЧек(ИДУстройства, Кассир, СписокТоваров, СуммаНал, СуммаБезнал, Отказ, ОписаниеРезультата)
	
	XMLАнализатор	= СоздатьОбъект("AddIn.XMLParser");
	
	XML = XMLАнализатор.СоздатьДокумент();
	XML.Кодировка = "UTF-8";
	CheckPackage = XML.СоздатьПодчиненныйЭлемент("CheckPackage");
	Parameters = CheckPackage.СоздатьПодчиненныйЭлемент("Parameters");
	Атрибут(XML, Parameters, "OperationType", 1);  //Приход денежных средств
	Атрибут(XML, Parameters, "TaxationSystem", 3); //ЕНВД
	Атрибут(XML, Parameters, "CashierName", Кассир); 

	Positions = CheckPackage.СоздатьПодчиненныйЭлемент("Positions");
	
	СписокТоваров.ВыбратьСтроки();
	Пока СписокТоваров.ПолучитьСтроку()=1 Цикл
		FiscalString = Positions.СоздатьПодчиненныйЭлемент("FiscalString");
		Атрибут(XML, FiscalString, "Name", СписокТоваров.Наименование);
		Атрибут(XML, FiscalString, "Quantity", СписокТоваров.Количество);
		Атрибут(XML, FiscalString, "PriceWithDiscount", СписокТоваров.Цена); 
		Атрибут(XML, FiscalString, "AmountWithDiscount", СписокТоваров.Сумма);
		Атрибут(XML, FiscalString, "VATRate", СписокТоваров.СтавкаНДС); 
	КонецЦикла;	
	
	Payments = CheckPackage.СоздатьПодчиненныйЭлемент("Payments");
	Атрибут(XML, Payments, "Cash", СуммаНал); 
	Атрибут(XML, Payments, "ElectronicPayment", СуммаБезнал);
    
	XML.Записать(КаталогПользователя() + "Modul_ProcessCheck.xml");
	
	Поток = CreateObject("Adodb.Stream");
	Поток.Charset = "utf-8";
	Поток.Type = 2;
	Поток.Mode= 3;
	Поток.Open();
	
	Поток.LoadFromFile(КаталогПользователя() + "Modul_ProcessCheck.xml");
	ВходныеПараметры = Поток.ReadText();
	Поток.Close();
	
	ВыходныеПараметры = ""; 
	ф = Объект.СформироватьЧек(ИДУстройства, 0, ВходныеПараметры, ВыходныеПараметры);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
	КонецЕсли;
		
КонецФункции


Процедура Отключиться(ИДУстройства,Отказ,ОписаниеРезультата)

	ф = Объект.Отключить(ИДУстройства);
	Если ПустоеЗначение(ф)=1 Тогда
		Объект.GetLastError(ОписаниеРезультата);
		Отказ = 1;
		Возврат;
	КонецЕсли;

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


Процедура КнопкаОткрытьСмену()
	Отказ = 0;
	ОписаниеРезультата = "";
	ИДУстройства = Подключиться(Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;
	
	ОткрытьСмену(ИДУстройства,"ФИО кассира","ИНН кассира",1,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
	КонецЕсли;
	
	Отказ = 0;
	Отключиться(ИДУстройства,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;

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

Процедура КнопкаЧек()
	Отказ = 0;
	ОписаниеРезультата = "";
	ИДУстройства = Подключиться(Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;
	
	//Пример табличной части
	СписокТоваров = СоздатьОбъект("ТаблицаЗначений");
	СписокТоваров.НоваяКолонка("Наименование","Строка");
	СписокТоваров.НоваяКолонка("Количество","Число",10,3);
	СписокТоваров.НоваяКолонка("Цена","Число",15,2);
	СписокТоваров.НоваяКолонка("Сумма","Число",15,2);
	СписокТоваров.НоваяКолонка("СтавкаНДС","Строка");
	
	СписокТоваров.НоваяСтрока();
	СписокТоваров.Наименование = "Булка сдобная";
	СписокТоваров.Количество = 2;
	СписокТоваров.Цена = 15;
	СписокТоваров.Сумма = СписокТоваров.Количество*СписокТоваров.Цена;
	СписокТоваров.СтавкаНДС = "none"; //Без НДС

	
	ПечататьЧек(ИДУстройства,"ФИО кассира",СписокТоваров,СписокТоваров.Итог("Сумма"),0,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
	КонецЕсли;
	
	Отказ = 0;
	Отключиться(ИДУстройства,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;

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


Процедура КнопкаЗакрытьСмену()
	Отказ = 0;
	ОписаниеРезультата = "";
	ИДУстройства = Подключиться(Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;
	
	ЗакрытьСмену(ИДУстройства,"ФИО кассира","ИНН кассира",1,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
	КонецЕсли;
	
	Отказ = 0;
	Отключиться(ИДУстройства,Отказ,ОписаниеРезультата);
	Если Отказ=1 Тогда
		Сообщить(ОписаниеРезультата);
		Возврат;
	КонецЕсли;

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

Скачать пример использования компоненты "ККТ-клиент" на 1С:7.7 можно в разделе "Файлы"

Для того, чтобы включить http-сервер, нужно установить галку «Использовать http-сервер» в настройках:

Для проверки http-сервера можно использовать GET-запрос /, например http://192.168.0.61:8080/

где 192.168.0.61 – адрес компьютера, на котором запущен «Сервер ККТ»
  

Для передачи команды на ККТ нужно использовать POST-запрос по адресу /addin
В качестве тела запроса нужно передать XML-пакет следующего образца:

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="DeviceTest" Function="true">
   <Parameter1 xsi:type="string"></Parameter1>
   <Parameter2 xsi:type="string"></Parameter2>
</Request>

Здесь:
Атрибут Method указывет имя метода драйвера в соответствии со стандартом «Требования к разработке драйверов подключаемого оборудования».

Атрибут Function указывает, является ли метод функцией, и, соответственно, нужно ли возвращать значение.
Элементы Parameter1, Parameter2 и т.д. служат для передачи параметров в вызываемый метод. Допустимые типы: string, decimal, boolean, datetime, date, time. Если тип не указан, то параметр считается равным Неопределено. Количество и типы передаваемых параметров для каждого метода указаны в требованиях к разработке драйверов.

Если в качестве параметра нужно передать XML-пакет, то нужно использовать следующий алгоритм:

1. XML-пакет преобразуется в строку с кодировкой UTF-8
2. В этой строке символы & " ' < > должны быть соответственно заменены на &amp; &quot; &apos; &lt; &gt; (стандартное экранирование для XML)
3. Полученную строку передать в виде параметра с типом string

В качестве ответа «Сервер ККТ» вернет XML-пакет следующего образца:

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter1 xsi:type="string"></Parameter1>
   <Parameter2 xsi:type="string"></Parameter2>
   <Result xsi:type="string"></Result>
</Response>

Элемент ParameterN может отсутствовать, если его значение не поменялось.
Элемент Result будет присутствовать только для функций.

Для проверки связи с «Сервером ККТ» можно использовать GET-запрос /ping или POST-запрос /ping. В ответ сервер должен вернуть строку «pong».

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="Open" Function="true">
   <Parameter1 xsi:type="string"></Parameter1>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter1 xsi:type="string">KKT_3002#1</Parameter1>
   <Result xsi:type="boolean">true</Result>
</Response>

<?xml version="1.0" encoding="UTF-8"?>
<InputParameters>
   <Parameters CashierName="Иванов И.П." CashierINN="324562345234"/>
</InputParameters>

<?xml version="1.0" encoding="UTF-8"?>
   <Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="GetCurrentStatus" Function="true">
   <Parameter1 xsi:type="string">KKT_3002#1</Parameter1>
   <Parameter2 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;&lt;InputParameters&gt;&lt;Parameters CashierName=&quot;Иванов И.П.&quot; CashierINN=&quot;324562345234&quot;/&gt;&lt;/InputParameters&gt;</Parameter2>
   <Parameter3 xsi:type="string"></Parameter3>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter3 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt; &lt;OutputParameters&gt;&lt;Parameters ShiftNumber=&quot;5&quot; CheckNumber=&quot;2&quot; ShiftState=&quot;1&quot; CashBalance=&quot;3242.00&quot; BacklogDocumentsCounter=&quot;&quot; BacklogDocumentFirstNumber=&quot;&quot; BacklogDocumentFirstDateTime=&quot;&quot;/&gt;&lt;/OutputParameters&gt;</Parameter3>
   <Result xsi:type="boolean">true</Result>
</Response>

<?xml version="1.0" encoding="UTF-8"?>
<OutputParameters>
   <Parameters ShiftNumber="5" CheckNumber="2" ShiftState="1" CashBalance="3242.00" BacklogDocumentsCounter="" BacklogDocumentFirstNumber="" BacklogDocumentFirstDateTime=""/>
</OutputParameters>

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="OpenShift" Function="true">
   <Parameter1 xsi:type="string">KKT_3002#1</Parameter1>
   <Parameter2 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;&lt;InputParameters&gt;&lt;Parameters CashierName=&quot;Иванов И.П.&quot; CashierINN=&quot;324562345234&quot;/&gt;&lt;/InputParameters&gt;</Parameter2>
   <Parameter3 xsi:type="string"></Parameter3>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter3 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt; &lt;OutputParameters&gt;&lt;Parameters ShiftNumber=&quot;7&quot; DateTime=&quot;2020-05-20T15:51:04&quot; ShiftState=&quot;2&quot; FNError=&quot;false&quot; FNOverflow=&quot;false&quot; FNFail=&quot;false&quot;/&gt;&lt;/OutputParameters&gt;</Parameter3>
   <Result xsi:type="boolean">true</Result>
</Response>

<?xml version="1.0" encoding="UTF-8"?>
<OutputParameters>
   <Parameters ShiftNumber="7" DateTime="2020-05-20T15:51:04" ShiftState="2" FNError="false" FNOverflow="false" FNFail="false"/>
</OutputParameters>

<?xml version="1.0" encoding="UTF-8"?>
<CheckPackage>
   <Parameters OperationType="1" TaxationSystem="2" CashierName="Иванов И.П. " />
   <Positions>
      <FiscalString Name="Товар 1" Quantity="2" PriceWithDiscount="5084.64" AmountWithDiscount="10169.28" DiscountAmount="0" ExciseAmount="0" VATRate="20" VATAmount="1694.88" PaymentMethod="4" CalculationSubject="1"/>
   </Positions>
   <Payments Cash="0" ElectronicPayment="10169.28"/>
</CheckPackage>

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="ProcessCheck" Function="true">
   <Parameter1 xsi:type="string">KKT_3002#1</Parameter1>
   <Parameter2 xsi:type="boolean">true</Parameter2>
   <Parameter3 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;UTF-8&quot;?&gt;&lt;CheckPackage&gt; &lt;Parameters OperationType=&quot;1&quot; TaxationSystem=&quot;2&quot; CashierName=&quot;Иванов И.П. &quot; /&gt; &lt;Positions&gt; &lt;FiscalString Name=&quot;Товар 1&quot; Quantity=&quot;2&quot; PriceWithDiscount=&quot;5084.64&quot; AmountWithDiscount=&quot;10169.28&quot; DiscountAmount=&quot;0&quot; ExciseAmount=&quot;0&quot; VATRate=&quot;20&quot; VATAmount=&quot;1694.88&quot; PaymentMethod=&quot;4&quot; CalculationSubject=&quot;1&quot;/&gt;   &lt;/Positions&gt; &lt;Payments Cash=&quot;0&quot; ElectronicPayment=&quot;10169.28&quot;/&gt; &lt;/CheckPackage&gt;</Parameter3>
   <Parameter4 xsi:type="string"></Parameter4>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter4 xsi:type="string">&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-8&quot;?&gt; &lt;DocumentOutputParameters&gt;&lt;Parameters ShiftNumber=&quot;9&quot; CheckNumber=&quot;4&quot; ShiftClosingCheckNumber=&quot;2&quot; AddressSiteInspections=&quot;&quot; FiscalSign=&quot;1950921&quot; DateTime=&quot;2020-05-20T16:34:18&quot;/&gt;&lt;/DocumentOutputParameters&gt;</Parameter4>
   <Result xsi:type="boolean">true</Result>
</Response>

<?xml version="1.0" encoding="utf-8"?>
<DocumentOutputParameters>
   <Parameters ShiftNumber="7" CheckNumber="4" ShiftClosingCheckNumber="2" AddressSiteInspections="" FiscalSign="1950921" DateTime="2020-05-20T16:34:18"/>
</DocumentOutputParameters>

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="Close" Function="true">
   <Parameter1 xsi:type="string">KKT_3002#1</Parameter1>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Result xsi:type="boolean">true</Result>
</Response>

<?xml version="1.0" encoding="UTF-8"?>
<Request xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" Method="GetLastError" Function="true">
   <Parameter1 xsi:type="string"></Parameter1>
</Request>

<?xml version="1.0" encoding="UTF-8"?>
<Response xmlns="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
   <Parameter1 xsi:type="string">Смена уже открыта!</Parameter1>
   <Result xsi:type="decimal">1</Result>
</Response>

Примеры на языках VBA (Excel), Delphi7 и C++ можно скачать в разделе "Файлы" 

Программа "Модуль ККТ" позволяет печатать чеки на основании данных из текстовых файлов. Для включения этой функции нужно в настройках установить галку "Использовать печать из файла":

Настройки:

• Каталог - папка, в которой "Модуль ККТ" будет искаль файлы *.txt для печати.
• Открывать смену:
  • Нет – не открывать смену.
  • При пробитии чека – программа проверит статус смены,  если смена еще не открыта, то программа откроет смену.
  • В указанное время – программа откроет смену в указанное время.
• Закрывать смену:
  • Нет – не закрывать смену
  • В указанное время – программа закроет смену в указанное время
• Кассир: ФИО кассира (для операций открытия и закрытия кассовых смен).

Для печати чека нужно подготовить текстовой файл, содержащий строки вида «реквизит=значение». Пример текстового файла:

Encoding=UTF-8
;Чек не электнонный, а бумажный
Electronically=False
;Тип операции - приход денежных средств
OperationType=1
;Система налогообложения - общая
TaxationSystem=0
CashierName=Иванов И.И.
;Оплата безналичными
ElectronicPayment=438

;Добавляем первую строку
FiscalString
;Cпособ расчета - полный расчет
PaymentMethod=4
;Предмет расчета - товар
CalculationSubject=1
Name=Товар 1
Quantity=4
PriceWithDiscount=105
AmountWithDiscount=420
;Ставка НДС - 20%
VATRate=20
;Сумма НДС
VATAmount=70
;первый вариант данных маркировки - через base64
MarkingCode=RE0CozWKae1rIlhpLDJGaEpUQWdO

;Добавляем вторую строку
FiscalString
PaymentMethod=4
CalculationSubject=1
Name=Товар 2
Quantity=1
PriceWithDiscount=18
AmountWithDiscount=18
VATRate=20
VATAmount=3
;второй вариант данных маркировки - через GTIN и серийный номер
GTIN=02900001188333
SerialNumber=k"Xi,2FhJTAgN

Имена реквизитов перечислены в таблице:

Алгоритм работы

1. При запуске служба "Сервер ККТ" будет отслеживать появление новых файлов *.txt в указанном каталоге.

2. При появлении нового файла программа переименовывает его в файл *.pro и отправляет на печать.

3. При успешной печати программа переименовывает файл *.pro в файл *.ok и добавляет в файл следующие реквизиты:

• Result - True
• CheckNumber -Номер фискального документа
• ShiftNumber - Номер кассовой смены
• ShiftClosingCheckNumber - Номер чека за смену
• AddressSiteInspections - Адрес сайта проверки
• FiscalSign - Фискальный признак
• DateTime - Дата и время формирования документа

4. При возникновении ошибки программа переименовывает файл *.pro в файл *.err и добавляет в файл следующие реквизиты:

• Result - False
• ErrorText - Описание ошибки

5. Служба "Сервер ККТ" не удаляет файлы *.ok и *.err.

Примечание: файлы *.txt должны иметь уникальные имена.

При использовании ФФД 1.2 программа "Сервер КТТ" автоматически выполнит проверку маркированного товара с помощью вызова методов драйвера: 

• ОткрытьСессиюРегистрацииКМ()
• ЗапросКМ()
• ПолучитьРезультатыЗапросаКМ()
• ПодтвердитьКМ()

Если у вас возникли проблемы с запуском службы "Сервер ККТ" или с тестом драйвера "Клиент ККТ", то мы предлагаем воспользоваться небольшой утилитой TCP_test.exe, которую можно скачать в разделе "Файлы".

Утилита TCP_test.exe предназначена для тестирования TCP-соединений. Может использоваться для тестирования не только "Сервера ККТ", но и любых других программ.

Методика тестирования

1. Остановите службу "Сервер ККТ" (если она запущена)
2. Запустите TCP_test.exe на том компьютере, к которому подключен кассовый аппарат
3. В группе Сервер укажите порт 52111 и нажмите "Старт". Должна появиться надпись "Активен"
   
   
   Если "Активен" не появилось, а выдалось сообщение об ошибке, то, скорее всего, указанный порт уже используется другой программой. Попробуйте указать другой порт (от 2000 до 65535) и повторите попытку.
4. В группе Клиент укажите адрес 127.0.0.1, порт 52111 и нажмите "Старт". Также должна появиться надпись "Активен", а у сервера должно появиться сообщение "connect from: 127.0.0.1"
   
   
   Если "Активен" не появилось, попробуйте отключить брандмауэр, файрволы, антивирусы и т.д. (или добавить в них разрешение на TCP-порт 52111)
5. Далее запустите TCP_test.exe на втором компьютере (где не будет подключен кассовый аппарат, но будет запускаться 1С). В группе Клиент укажите ip-адрес первого компьютера, порт 52111 и нажмите "Старт". Также должна появиться надпись "Активен", а у сервера (на первом компьютере) должно появиться сообщение "connect from: х.х.х.х" (адрес второго компьютера)
   
   
   
   
   Если "Активен" не появилось, то нужно проверять настройки брандмауэра, файрвола, антивирусов на первом компьютере. В этих настройках нужно разрешить входящие TCP-соединения на порт 52111
6. Далее на обоих компьютерах нажмите Стоп в группе Сервер и в группе Клиент
7. KKT_Server_Setting.exe на том компьютере, к которому подключен кассовый аппарат. Включите запись файла лога и режим эмулятора. Нажмите кнопку "Сохранить настройки". Должен создаться файл kkt_server.ini с указанными настройкамиЕсли файл kkt_server.ini не создался, то нужно разбираться с правами пользователя на папку, откуда запускается KKT_Server_Setting.exe
8. Запустите службу "Сервер ККТ". Должен создаться файл лога

   22.08.2019 18:28:54	Emulation Start on port 52111
   Server version: 2.0.8.10   Server mode: Emulation version 2.5   ServerInterfaceRevision: 2005

   Если служба не запустилась, в файле лога будет указана причина ошибки. Если файл лога не создался, то нужно разбираться с правами службы на запись в ту папку, откуда она запускается.

9. В программе TCP_test.exe на первом и на втором компьютере нажмите Старт в группе Клиент. Должны появиться надписи "Активен", а в файле лога должны появиться строки:

   22.08.2019 18:35:37	Emulation ClientConnect 127.0.0.1
   22.08.2019 18:37:05	Emulation ClientConnect 192.168.1.48
   

   Если надпись "Активен" в TCP_test не появилась, тогда нужно искать причину, используя описание ошибки в TCP_test.
10. Если все эти действия выполнены успешно, то проблем с сетевыми подключениями не должно быть.