How to handle QR code in adobeform through driver program?

[Former Member]

Dear All,

First i would like Sorry for my bad English.

Well i have an assignment to make QR code in adobe form and change its values dynamically through driver program.

For Example:

At output screen i have 3 input parameters.

I will give values and in result i will get 3 QR codes and each QR code will be bigger in size than the other.

Please guide me on this.

Regards,

Mehmood

[Former Member]

Hi Mehmood,

Did you try to pass QR code values through Function module 'FP_FUNCTION_MODULE_NAME' from driver program to adobeform.

Thanks & Regards,

Polu

[Former Member]

Hi Mehmood,

Please check the below link. may be it will help you.

http://wiki.scn.sap.com/wiki/display/ABAP/An+sample+Report+program+for+Printing+Adobe+forms+Configur...

Thansk & Regards,

Polu

[former_member192023]

Hi Mehmood,

The QR code are type of "XSTRING".

If you have got the Xstring value of QR code.

Then you can display it in ADOBE form as dynamic image.

Regards.

[Former Member]

Can i get the all values of internal table through one QR code?

[former_member192023]

What I did before it use clasee CL_HTTP_CLIENT to get the QR code value in a xstring.

After get the xstring, then display it as a local picture in windows PC.

Below is the code just FYI.

*&---------------------------------------------------------------------*

*&      Form  DISPLAY_BARCODE_IMAGE

*&---------------------------------------------------------------------*

*       DISPLAY_BARCODE_IMAGE

*----------------------------------------------------------------------*

FORM display_barcode_image USING uv_code type xstring.

  DATA: BEGIN OF lt_graphic_table OCCURS 0,

          line(255) TYPE x,

        END OF lt_graphic_table.

  DATA: l_graphic_xstr TYPE xstring,

        l_graphic_conv TYPE i,

        l_graphic_offs TYPE i.

  DATA: lv_graphic_size TYPE i.

  l_graphic_xstr = uv_code.

  lv_graphic_size = xstrlen( l_graphic_xstr ).

  CHECK lv_graphic_size > 0.

  l_graphic_conv = lv_graphic_size.

  l_graphic_offs = 0.

  WHILE l_graphic_conv > 255.

    lt_graphic_table-line = l_graphic_xstr+l_graphic_offs(255).

    APPEND lt_graphic_table.

    l_graphic_offs = l_graphic_offs + 255.

    l_graphic_conv = l_graphic_conv - 255.

  ENDWHILE.

  lt_graphic_table-line = l_graphic_xstr+l_graphic_offs(l_graphic_conv).

  APPEND lt_graphic_table.

  CALL FUNCTION 'WS_DOWNLOAD'

    EXPORTING

      codepage = '8400'

      filename = 'C:\BARCODE\1.PNG'

      filetype = 'BIN'

    TABLES

      data_tab = lt_graphic_table.

  CALL FUNCTION 'CALL_INTERNET_ADRESS'

    EXPORTING

      pi_adress     = 'C:\BARCODE\1.PNG'

    EXCEPTIONS

      no_input_data = 1

      OTHERS        = 2.

  LEAVE LIST-PROCESSING.

ENDFORM.                    " DISPLAY_BARCODE_IMAGE