How convert to jpg picture into bmp ?

Question

Hi experts,
I am trying to convert my jpg picture into bmp. for this i write one report but showing some
TRANSFER WA_MIME1 TO DSN1.
HERE IS MY FULL CODE PLZ HELP ME.
REPORT  ZSE78_7.
DATA: blob TYPE w3mimetabtype,
       blob_size TYPE w3param-cont_len,
       blob_type TYPE w3param-cont_type  .
DATA:
     p_color_scheme      TYPE char20  ,
     p_labels_groupid    TYPE igs_label_tab,
     p_labels_category   TYPE igs_label_tab  ,
     p_data     TYPE     igs_data_tab,
     p_charttype     TYPE     char20,
     p_legend     TYPE     char20,
     l_igs_chart TYPE  REF TO cl_igs_chart ,
     l_igs_chart_engine TYPE  REF TO cl_igs_chart_engine,
     i_igs_image_converter TYPE REF TO cl_igs_image_converter,
     mime TYPE  w3mimetabtype,
     html TYPE  w3htmltabtype,
     html_line TYPE  w3html,
     l_msg_text(72) TYPE  c,
     l_url TYPE  w3url,
     l_content_length TYPE  i,
     l_content_type TYPE  w3param-cont_type,
     l_content_subtype TYPE  w3param-cont_type.
CALL FUNCTION 'GUI_UPLOAD'
   EXPORTING
     filename                      = 'e:\katoch.jpg'
    filetype                      = 'BIN'
*      HAS_FIELD_SEPARATOR           = ' '
*      HEADER_LENGTH                 = 0
*      READ_BY_LINE                  = 'X'
*      DAT_MODE                      = ' '
*      CODEPAGE                      = ' '
*      IGNORE_CERR                   = ABAP_TRUE
*      REPLACEMENT                   = '#'
*      CHECK_BOM                     = ' '
IMPORTING
    filelength                    = l_content_length
*      HEADER                        =
   TABLES
     data_tab                      = mime
EXCEPTIONS
    file_open_error               = 1
    file_read_error               = 2
    no_batch                      = 3
    gui_refuse_filetransfer       = 4
    invalid_type                  = 5
    no_authority                  = 6
    unknown_error                 = 7
    bad_data_format               = 8
    header_not_allowed            = 9
    separator_not_allowed         = 10
    header_too_long               = 11
    unknown_dp_error              = 12
    access_denied                 = 13
    dp_out_of_memory              = 14
    disk_full                     = 15
    dp_timeout                    = 16
    OTHERS                        = 17
IF sy-subrc <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CREATE OBJECT i_igs_image_converter .
i_igs_image_converter->input = 'image/jpeg'.
i_igs_image_converter->output = 'image/x-ms-bmp'.
i_igs_image_converter->width = '100'.
i_igs_image_converter->height = '100'.
CALL METHOD i_igs_image_converter->set_image
   EXPORTING
     blob      = mime
     blob_size = l_content_length.
CALL METHOD i_igs_image_converter->execute
   EXCEPTIONS
     communication_error = 1
     internal_error      = 2
     external_error      = 3
     OTHERS              = 4.
IF sy-subrc = 0.
   CALL METHOD i_igs_image_converter->get_image
     IMPORTING
       blob      = blob
       blob_size = blob_size
       blob_type = blob_type.
   DATA dsn1(20) TYPE c VALUE 'E:\test.bmp'.
DATA wa_mime1 TYPE w3mime.
*DATA wa_mime1 TYPE w3mimetabtype.
   OPEN DATASET  dsn1   FOR OUTPUT IN BINARY MODE.
   LOOP AT blob INTO wa_mime1.
     TRANSFER wa_mime1 TO dsn1.
     CLEAR wa_mime1.
   ENDLOOP.
MESSAGE ' successfull' TYPE 'I'.
   CLOSE DATASET dsn1.
ELSE.
   DATA: num TYPE i, message TYPE string.
   CALL METHOD i_igs_image_converter->get_error
     IMPORTING
       number  = num
       MESSAGE = message.
MESSAGE 'not successfull' TYPE 'I'.
ENDIF.

Answer 1

HI
i already converted it in binary form but when i transferring it to binary mode it generate error.
the code is like this.
LOOP AT blob INTO wa_mime1.
     TRANSFER wa_mime1 TO dsn1.
     CLEAR wa_mime1.
   ENDLOOP.
   CLOSE DATASET dsn1.