Печать дополнительных строк в кассовом чеке из 1С УТ11

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

1С:Управление торговлей 11

1. remeslo1C 24.11.23 13:20 Сейчас в теме

Подскажите как из УТ 11 на печать кассового чека вывести дополнительные строки? В самом чеке или отдельной печатью. Хоть как то. Не из драйвера а именно из 1с.

Пробовал в процедуре СформироватьXMLПакетДляФискализацияЧека

#Вставка
ДопСтрока="ТЕКСТ ДОПОЛНИТЕЛЬНЫЙ1";
ЗаписьXML.ЗаписатьАтрибут("AdditionalAttribute", XMLСтрока(ДопСтрока));
#КонецВставки

Выдает ошибку:
При печати чека произошла ошибка.
Чек не напечатан на фискальном устройстве.
Дополнительное описание:
33h, Ошибка передачи тега 1192: Некорректные параметры в команде

По теме из базы знаний

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

4. remeslo1C 27.11.23 11:46 Сейчас в теме

Вот так печатает после основного чека

Прикрепленные файлы:

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

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

Свернуть все

2. independ 1556 24.11.23 14:46 Сейчас в теме

В 11.4.5.63 использовал

//МенеджерОборудованияКлиентПереопределяемый
&Вместо("СформироватьШаблонЧека")
Функция Расш_Остатки_СформироватьШаблонЧека(ВходныеПараметры, ДополнительныйТекст, СтандартнаяОбработка, ТипОборудования)
	ШаблонЧека = МенеджерОборудованияВызовСервераПереопределяемый.ПолучитьСтруктуруШаблонаЧека(ВходныеПараметры, ДополнительныйТекст, ТипОборудования);
	Если ШаблонЧека <> Неопределено Тогда
		СтандартнаяОбработка = Ложь;
		Возврат ШаблонЧека;
	КонецЕсли;
КонецФункции

//МенеджерОборудованияВызовСервераПереопределяемый

&Вместо("ПолучитьСтруктуруШаблонаЧека")
Функция Расш_Остатки_ПолучитьСтруктуруШаблонаЧека(ПараметрыШаблонаЧека, ДополнительныйТекст, ТипОборудования)
	
	ОбщиеПараметры = ПараметрыШаблонаЧека[0];
	
	НаименованиеКассы=""+ОбщиеПараметры.ДокументОснование.КассаККМ;
	
	Продавец="";
	ТЗ=ОбщиеПараметры.ДокументОснование.Товары.Выгрузить();
	ТЗ.Свернуть("Продавец");
	Для каждого стр из ТЗ Цикл
		Продавец=Продавец+стр.Продавец+" ";
	КонецЦикла;	
	
	струкДоп = Новый Структура("ТекстоваяСтрока,Текст,Выравнивание");
	струкДоп.Выравнивание = "Лево";
	струкДоп.Текст = НаименованиеКассы;
	ОбщиеПараметры.ПозицииЧека.Вставить(0,струкДоп);
	
	струкДоп = Новый Структура("ТекстоваяСтрока,Текст,Выравнивание");
	струкДоп.Выравнивание = "Лево";
	струкДоп.Текст = Продавец;
	ОбщиеПараметры.ПозицииЧека.Вставить(1,струкДоп);
	
	струкДоп = Новый Структура("ТекстоваяСтрока,Текст,Выравнивание");
	струкДоп.Выравнивание = "Лево";
	струкДоп.Текст = "-------------------------------";
	ОбщиеПараметры.ПозицииЧека.Вставить(2,струкДоп);
	
	Возврат Неопределено;	
	
КонецФункции

Показать

3. remeslo1C 24.11.23 15:42 Сейчас в теме

Управление торговлей, редакция 11 (11.5.12.102)

&ИзменениеИКонтроль("ПодготовитьДанныеОперации")
Функция югЗамок_ПодготовитьДанныеОперации(ПараметрыПодключения, Команда, ПараметрыОперации)

#Вставка
СтрокаЧека = ОборудованиеЧекопечатающиеУстройстваКлиентСервер.ПараметрыТекстовойСтрокиЧека("доп текст1");
СтрокаЧека.Выравнивание = "Центр";
ПараметрыОперации.ПозицииЧека.Добавить(СтрокаЧека);
СтрокаЧека = ОборудованиеЧекопечатающиеУстройстваКлиентСервер.ПараметрыТекстовойСтрокиЧека("доп текст2");
СтрокаЧека.Выравнивание = "Центр";
ПараметрыОперации.ПозицииЧека.Добавить(СтрокаЧека);
#КонецВставки

Получилось, но остался вопрос как это добавить в подвал чека? как поместить "доп строки" после всего?

Прикрепленные файлы:

4. remeslo1C 27.11.23 11:46 Сейчас в теме

Вот так печатает после основного чека

Прикрепленные файлы:

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

E-mail: