• Ласкаво просимо на Спільнота для обміну досвідом між користувачами програм УкрБланк, УкрСклад, УкрЗарплата.
 

Печатная Форма -> штрихкод

Автор monakov, Квітень 15, 2011, 16:37:08

Попередня тема - Наступна тема

0 Користувачі і 1 Гість дивляться цю тему.

monakov

Доброго Времени суток.
Столкнулся с проблемой.
При выводе в стандартной печатной форме Штрихкод не отображается. (shtrihk1.JPG)
Хотя в базе все Ок и поиск по коду происходит  (shtrihk.JPG)
Пробовал генерировать внутренний Баркод и о чудо он виден корректно в печатной форме.
Объясните в чем проблема и можно ли так сделать что Внутренний код Выводился только в случае отсутствии кода Производителя ?

DILEMMA

В дизайнере замените там где BarCode, Товар.ШтрихКод.Внутренний на Товар.ШтрихКод.Производителя
Бизнесом занимается тот - кому нечего сдать в аренду.

monakov

#2
Спасибо.
Сделал   почти так же но чуток по другому.
в Элементе BarCode1  поле  DataField поставил  TOV_SCANCODE.

А Есть ли возможность поставить условие: Если Штрихкод внутренний пустое поле, то  брать Штрихкод Внутренний.

Это бы  Очень пригодилось не только мне но и другим.




И еще Тем у кого товар с Штрихкодом UPC (американский 12 цифр)  Для преобразования в EAN13  надо снаять галочку с CalcCheckSum.    Тогда спереди в печатной форме будут добавляться 0 что позволит избежать путаницы.



monakov

Все   Ответил сам на свой вопрос ) Кому интересно то нужно

Вставить в Раздел КОД



после всего что увас там уже есть

void BarCode1OnBeforePrint(TfrxComponent Sender)
{
if (<Товар.ШтрихКод.Производителя> == "")

  BarCode1.Expression = <Товар.ШтрихКод.Внутренний>;                                         

else

  BarCode1.Expression = <Товар.ШтрихКод.Производителя>; 
 
}

{

}


Это позволит Выводить в Печатной форме Код Производителя если он есть если же нету то Внутренний код

Павло

#4
Дякую. Спробував, але не вийшло. В розділі КОД є тільки:
begin

end.

Можете описати більш детально?

gnat

Я для себя эту проблему так решил:
Если товар не имеет штрих-кода, генерирую внутренний, копирую, вставляю его в код производителя.
при поставке распечатываю штрих-кода и клею.
Раньше тоже думал делать как вы, но столкнулся с тем,
что при работе со сканером нужно менять условия поиска
«штрих-код производителя» на «штрих-код внутренний» , а это не удобно.

gnat

Я  еще себе сделал в распечатке штрих-код  номера документа
Ускоряет поиск.
Еще проще искать ели не требовалось бы выбирать группу документов, а по номеру  сразу находилась и группа и док.(при условии не совпадении номеров в разных группах, а это позволяет укрсклад)

monakov

Цитата: gnat від Квітень 19, 2011, 20:42:08
Раньше тоже думал делать как вы, но столкнулся с тем,
что при работе со сканером нужно менять условия поиска
«штрих-код производителя» на «штрих-код внутренний» , а это не удобно.

Напугали вы меня и побежал проверять.
Странно,  проверил.   У меня Товар имеет и Ш-К Производителя и Внутренний, в режиме кассы ищет и добавляет все без переключений.
Так что все ок





Creat

А ещё тогда вопрос не совсем в тему - распечатанный на лазерном принтере штрих-код нормально прочитается сканером?

AVDcomp


Creat

Цитата: AVDcomp від Жовтень 13, 2011, 21:44:42
да, я распечатываю и всё ок
Спасибо!
А ответь ещё в теме http://www.softbalance.com.ua/forum/index.php?topic=780.45 какой сканер используешь и каков опыт использования?

DILEMMA

у нас штрих код читается с бумажных распечатаных накладных нормально
Бизнесом занимается тот - кому нечего сдать в аренду.

Creat


Скажите, что неправильно в коде

Без последнего if печатает ценники даже там где нет штрихкода.


void MasterData1OnBeforePrint(TfrxComponent Sender)
{
  if(<Товар.Колво> > 1)                                     
    DetailData.RowCount = <Товар.Колво>;
  else
    DetailData.RowCount = 1;
     
if (<Товар.ШтрихКод.Производителя> == "")
   BarCode1.Expression = <Товар.ШтрихКод.Внутренний>;
else
   BarCode1.Expression = <Товар.ШтрихКод.Производителя>;
 
  if ((<Товар.ШтрихКод.Производителя> == "") && (<Товар.ШтрихКод.Внутренний>== "")) 
  DetailData.RowCount = 0 ;             
               
}
]

admin

Цитата: Creat від Травень 12, 2012, 23:34:39
Скажите, что неправильно в коде

А что не так? Ошибку выдает или что?

Creat

В зависимости от того какой товар в накладной первый - выдаёт чистый лист, или до товара у которого нет кода и внутреннего и производителя, а дальше не выдаёт.
У меня была логика - если у товара нет штрих-кода то такой штрих код и не печатать, а то печатает код 12345678.