Перейти к содержимому


- - - - -

Печать штрих фр к Не определена длина строки


Сообщений в теме: 5

#1 SerzhM

    Участник


  • 209 сообщений

Отправлено 01 февраля 2012 - 19:38

Имеется ТИС 7.7 9.2. Подключили Штрих м фр к. В Номенклатуре измененна длина названия товара до 60 символов. Теперь ошибка следующая когда в док чек ккм присуствует строка наименование которой больше чем по умолчанию (42 символа по умолчанию было до изменения, 60 символов сейчас) Фискальник при проведении и распечатании чека пишет что Ошибка Фр; Не определена длина строки;
Но чек проводится а фискальник выдает чек где написанно что чек анулирован.

#2 Бухгалтерский угодник

    Ветеран


  • 13 289 сообщений

Отправлено 02 февраля 2012 - 04:57

Название обязательно таким длинным печатать?
"Любая проблема имеет Фамилию, Имя, Отчество....." (И. Сталин)
Жмакнувшим Изображение буду благодарен.

#3 SerzhM

    Участник


  • 209 сообщений

Отправлено 02 февраля 2012 - 07:47

Просмотр сообщенияБухгалтерский угодник (02 февраля 2012 - 04:57) писал:

Название обязательно таким длинным печатать?
В чеке не обязательно а в программе да

#4 SerzhM

    Участник


  • 209 сообщений

Отправлено 02 февраля 2012 - 10:10

Посмотрел на форуме Штриха по фр-к советовали попробывать обработку которая переносит символы. Попробывал не помогла. Тогда остается пробывать программно обрезать наименование при передаче в печать.

#5 SerzhM

    Участник


  • 209 сообщений

Отправлено 02 февраля 2012 - 11:05

Функция ПробитьЧекНаККМ()
    Перем НомерЧека;
    
    СписокТоваров = СоздатьОбъект("ТаблицаЗначений");
    СписокТоваров.НоваяКолонка("ТовНаим"   , "Строка");
    СписокТоваров.НоваяКолонка("Цена"	  , "Число");
    СписокТоваров.НоваяКолонка("Количество", "Число");
    
    ВыбратьСтроки();
    Пока ПолучитьСтроку() = 1 Цикл
        СписокТоваров.НоваяСтрока();
        СписокТоваров.ТовНаим    = Номенклатура.Наименование;
        СписокТоваров.Цена	   = Цена;
        СписокТоваров.Количество = Количество;
    КонецЦикла;
    
    ПризнВозврата = ?(ВидОперации = Перечисление.ВидыОперацийЧекККМ.Чек, 0, 1);
    ЧекПробитККМ  = глФРПечататьЧек(СписокТоваров, Итог("Сумма"), ?(Получено=0,Итог("Сумма"),Получено), Скидка.Процент, ПризнВозврата, Склад.НомерСекции, НомерЧека);

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


Либо вот тут СписокТоваров.НоваяКолонка("ТовНаим" , "Строка"); подправить что максимально символов 36 а остальное обрезается или СписокТоваров.ТовНаим = Номенклатура.Наименование; сократить до 36 символов
Как это сделать?

Сообщение отредактировал SerzhM: 02 февраля 2012 - 11:05


#6 SerzhM

    Участник


  • 209 сообщений

Отправлено 02 февраля 2012 - 12:29

Всем спасибо сам решил, обрезал длину
СписокТоваров.НоваяКолонка("ТовНаим" , "Строка", 36);





Количество пользователей, читающих эту тему: 1

0 пользователей, 1 гостей, 0 анонимных