Генератор EAN13

Генерация полного номера EAN13

Генерирует полный номер EAN13 исходя из первых цифр (по сути, считает контрольную цифру).
Отчет можно вывести как просто на экран, так и сохранить в Excel.

Используется стандартная функция глКонтрольныйСимволEAN

Назрело это дело, так как маркетологи постоянно приставали с просьбами «нагенерить» номера дисконтных карт.

Может кому и сгодится.

11 Comments

  1. nikitan

    Господа, мне просто интересно — кому еще и зачем такая обработка нужна?

    А то я смотрю — качают.

    Reply ↓
  2. svsrus

    Просто для начала хотят посмотреть, т.к. никаких скриншотов не выложено (

    Reply ↓
  3. Abadonna

    Ага! Рассказал бы кто еще: вас ис дас EAN? 😉

    Reply ↓
  4. nikitan

    (3) http://www.retail.ru/biblio/code02.htm Кому интересно — читайте описание.

    Reply ↓
  5. nosferatu20913

    EAN это единная система штрих кодов европы 🙂

    Reply ↓
  6. Abadonna

    2 nosferatu20913

    Да уж посмотрел 🙂 только я не торгаш — мне без надобности ;))))

    Reply ↓
  7. vicher

    Вполне может пригодиться!

    Reply ↓
  8. nikitan

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

    На данный момент 864 просмотра и 241 скачивание.

    Ни за что не поверю что люди качают просто ради посмотреть…….

    Reply ↓
  9. coder1cv8

    (8) дык, это для тебя открытие?… Обсуждали же недавно, плюсуют здесь юмор, стихи или философию какую-нить, можно ещё статью написать на тему «Почему мне не ставят плюсов?», тож заплюсуют 🙂 Ещё здесь модно выкладывать чужие обработки или требовать плюс за скачивание, короче каждый добивается как может 🙂 Да и плюсование «своих-своими», чё греха таить, тож есть… Короче, как уже не раз говорилось, забей, не в рейтинге счастье! 🙂

    Reply ↓
  10. kykysk

    А для EAN 8 как то возможно ?

    Reply ↓
  11. kolombo_eburg

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

    было :

    ПечЦиф = СокрЛП(ПерЦ+ КонтрольнаяЦифра);

    в нужно:

    ПечЦиф = СокрЛП(Строка(ПерЦ) + Строка(КонтрольнаяЦифра));

    Reply ↓

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *