Axapta и PDF417

[andrewK]

Чем закончились изыскания...

Решил использовать штрих-код PDF417. С QRCode не стал связываться, т.к. он формируется картинкой, а я не представляю как использовать картинки со штрих-кодом в отчетах Аксапты (именно встроенных отчетах Report).

Здесь нашел dll-ку, которая работает без 1С. У нее только один метод pdf417(_Chaine, _secu, _nbcol, _CodeErr), который возвращает закодированную информацию.
Затем для закодированного текста применяем шрифт PDF417 (см. вложение).
DLL-ку можно "прикрутить" в Аксапту с помощью мастера интерфейсных классов для объектов COM (COM Class Wrapper Wizard).

И затем получившимся классом пользоваться для кодирования текста и помещения его в отчеты.

[Link]

По теме, нашел свободный проект http://zint.github.com/
Есть командная строка, много опций, пакетная работа из файла, установщик и справка. Генерирует баркод в png нужного размера. Написан на С под VS, можно использовать в собственных разработках, там каждый код идет отдельным файлом. Для одного PDF417 может и слишком будет, но если нужна поддержка разных 2D штрихкодов - то что нужно.

Поддержка кодов:

PHP код:

Code 11, Standard Code 2 of 5, IATA Code 2 of 5, Industrial Code 2 of 5,
Interleaved Code 2 of 5, Code 2 of 5 Data Logic, ITF-14, Deutche Post
Leitcode, Deutche Post Identcode, UPC-A, UPC-E, EAN-2, EAN-5, EAN-8,
EAN-13, UK Plessey, MSI Plessey, Telepen Alpha, Telepen Numeric, Code 39,
Extended Code 39, Code 93, PZN, Code 23, LOGMARS, Codabar, Pharmacode, Code
128, EAN-128, NVE-18, Code 16k, PDF417, MicroPDF417, Two-Track Pharmacode,
PostNet, PLANET, Australia Post 4-State Symbols, RM4SCC, USPS OneCode, GS1
DataBar, DataBar-14, DataBar Limited, DataBar Extended, DataBar Stacked,
Composite Symbology, Data Matrix, QR Code, Maxicode, Aztec Code, EAN-13,
Micro QR, Korea Post Barcode, HIBC Code 128, HIBC Code 39, HIBC Data Matrix,
HIBC PDF417, HIBC MicroPDF417, HIBC QR Code, HIBC Aztec Code, Japanese Postal
Code, Code 49, Channel Code, Code One, Grid Matrix, FIM and Flattermarken. 


Распостраняется под лицензией GNU 3.0 (GPLv3)

[virhundo]

Вот ещё в догонку пара ссылок:
http://strokescribe.com - недорогой компонент от русскоязычного разработчика
www.barcodetools.com - одномерные штрихкоды можно получить из консольного приложения в виде картинки и просто обрезать ту область, где идёт надпись "демо". Полезно,например, для вставки штрихкода в Excel в виде картинки, если у конечного пользователя файла не установлены нужные шрифты.

[Pustik]

Цитата:

Сообщение от andrewK

Решил использовать штрих-код PDF417. С QRCode не стал связываться, т.к. он формируется картинкой, а я не представляю как использовать картинки со штрих-кодом в отчетах Аксапты (именно встроенных отчетах Report).

Вот готовое решение работы с матричным(двумерным) штрихкодированием в Аксапте (QRCode). В проекте подготовлен класс-обертка и пример работы QRCode на стандартном отчете.
1)Прикручиваем dll к \References.
2)Компилируем проект.
3)Запускаем отчет.
Сборка сделана на C#.

[someOne]

Цитата:

Сообщение от Pustik

Вот готовое решение работы с матричным(двумерным) штрихкодированием в Аксапте (QRCode). В проекте подготовлен класс-обертка и пример работы QRCode на стандартном отчете.
1)Прикручиваем dll к \References.
2)Компилируем проект.
3)Запускаем отчет.
Сборка сделана на C#.

Спасибо за пример! Решение прекрасно работает.

Но есть одна проблема.

Чтобы не устанавливать этот компонент на каждое клиенское рабочее место сделал исполнение кода класса на сервере.

Но так как класс Image работает только на клиенте, получить картинку с qr кодом в виде Аксаптовского е container оказалось не просто.

Сохранять картинку в виде временного файла, а затем читать его - не совсем производительное решение.

В итоге решение навеяло одна из последних тем форума.

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

static container encode(str _encoding)
{
    System.IO.MemoryStream  memoryStream;
    System.Drawing.Bitmap   bitmap;
    container               ret;
    str                     tmpBuffer;
    
    int encodeMode = 2;
    int scale =2;
    int version = 4;
    int errorCorrect = 3;
    
    ThoughtWorks.QRCode.Codec.QRCodeEncoder qrCodeEncoder;
    ;
    if (!_encoding)
        throw error('Нет данных для кодирования!');

    new InteropPermission(InteropKind::ClrInterop).assert();

    qrCodeEncoder = new ThoughtWorks.QRCode.Codec.QRCodeEncoder();

    try
    {
        qrCodeEncoder.set_QRCodeEncodeMode(EncodeMode);
        qrCodeEncoder.set_QRCodeScale(Scale);
        qrCodeEncoder.set_QRCodeVersion(Version);
        qrCodeEncoder.set_QRCodeErrorCorrect(ErrorCorrect);

        bitmap = QRCodeEncoder.Encode(_encoding);

        memoryStream = new System.IO.MemoryStream();

        bitmap.Save(memoryStream, System.Drawing.Imaging.ImageFormat::get_Bmp());

        
        tmpBuffer = CLRInterop::staticInvoke("System.Convert", "ToBase64String", memoryStream.GetBuffer());

        ret = binData::loadFromBase64(tmpBuffer);
        
        bitmap.Dispose();

        memoryStream.Close();
        memoryStream.Dispose();
    }
    catch (Exception::CLRError)
    {
        throw error(AifUtil::getClrErrorMessage());
    }

    return ret;
}