Генератор 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 не будет опубликован. Обязательные поля помечены *