Skip to Content
author's profile photo Former Member
Former Member

Saving image using mobile into sap R/3

We are using sap mobile platform version 2.3 and our client requirement is to save images using mobile apps.

We already saved images in mime repository but for this we have to required client modifiable , but due to security reason we can't do this.

Please Help.

Add a comment
10|10000 characters needed characters exceeded

Assigned Tags

Related questions

2 Answers

  • Best Answer
    author's profile photo Former Member
    Former Member
    Posted on May 09, 2014 at 06:00 AM

    Hi Nilesh ,

    You can save images in GOS repository , SAP standard uses GOS for attaching images . Just do a small research and if you can use GOS in your scenario i can provide you the code .I did uploaded images into SAP ERP from mobile .

    Regards,

    Juneed Manha

    Add a comment
    10|10000 characters needed characters exceeded

    • Former Member Former Member

      Hi Nilesh ,

      I had a scenario to attach image to pr05 transaction from mobile, so that when click view attachment button in pr05 i can see the image . My code is based on that .

      it is the function module with import parameter base64 string and filename ,last three letters of the file name proceeding the . is the extension

      in your case you need to create custom object type instead of BUS2089 .

      Do research regarding that ..


      -->Local Workare declaration.
      DATA : ls_fol_id TYPE soodk,
      ls_obj_id TYPE soodk,
      ls_obj_data TYPE sood1,
      ls_content TYPE soli,
      ls_folmem_k TYPE sofmk,
      ls_note TYPE borident,
      ls_object TYPE borident.

      **--> Local internal table declaration.
      DATA : lt_content TYPE STANDARD TABLE OF soli,
      lt_url_tab TYPE STANDARD TABLE OF so_url,
      lt_objhead TYPE STANDARD TABLE OF soli.

      **--> Local variable declaration.
      DATA : lv_filename TYPE string,
      lv_file_name_with_path TYPE chkfile,
      lv_stripped_name TYPE string,
      lv_name TYPE char30,
      lv_url_tab_size TYPE sytabix,
      lv_ep_note TYPE borident-objkey.


      ls_object-objtype = 'BUS2089'.
      ls_object-objkey = '001095510000020022'.
      ls_obj_data-objdes = I_FILE_NAME.
      ls_obj_data-file_ext = I_FILE_EXT.


      CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
      EXPORTING
      buffer = I_FILE
      TABLES
      binary_tab = lt_content.

      CALL FUNCTION 'SO_CONVERT_CONTENTS_BIN'
      EXPORTING
      it_contents_bin = lt_content[]
      IMPORTING
      et_contents_bin = lt_content[].

      **--> Getting folder ID to save data
      CALL FUNCTION 'SO_FOLDER_ROOT_ID_GET'
      EXPORTING
      region = 'B'
      IMPORTING
      folder_id = ls_fol_id
      EXCEPTIONS
      communication_failure = 1
      owner_not_exist = 2
      system_failure = 3
      x_error = 4
      OTHERS = 5.
      IF sy-subrc = 0.

      ls_obj_data-objsns = 'O'.
      ls_obj_data-objla = sy-langu.
      ls_obj_data-objlen = LINES( lt_content ) * 255.

      CLEAR ls_content.
      CONCATENATE '&SO_FILENAME=' I_FILE_NAME '.' I_FILE_EXT INTO ls_content.
      APPEND ls_content TO lt_objhead.

      **-->To Create an Object and Move to a Folder
      CALL FUNCTION 'SO_OBJECT_INSERT'
      EXPORTING
      folder_id = ls_fol_id
      object_hd_change = ls_obj_data
      object_type = 'EXT'
      IMPORTING
      object_id = ls_obj_id
      TABLES
      objcont = lt_content
      objhead = lt_objhead
      EXCEPTIONS
      active_user_not_exist = 1
      communication_failure = 2
      component_not_available = 3
      dl_name_exist = 4
      folder_not_exist = 5
      folder_no_authorization = 6
      object_type_not_exist = 7
      operation_no_authorization = 8
      owner_not_exist = 9
      parameter_error = 10
      substitute_not_active = 11
      substitute_not_defined = 12
      system_failure = 13
      x_error = 14
      OTHERS = 15.

      IF sy-subrc = 0 AND ls_object-objkey IS NOT INITIAL.
      * COMMIT WORK AND WAIT.
      ls_folmem_k-foltp = ls_fol_id-objtp.
      ls_folmem_k-folyr = ls_fol_id-objyr.
      ls_folmem_k-folno = ls_fol_id-objno.
      ls_folmem_k-doctp = ls_obj_id-objtp.
      ls_folmem_k-docyr = ls_obj_id-objyr.
      ls_folmem_k-docno = ls_obj_id-objno.
      lv_ep_note = ls_folmem_k.
      ls_note-objtype = 'MESSAGE'.
      ls_note-objkey = lv_ep_note.

      **-->Link the object ID to trip No.
      CALL FUNCTION 'BINARY_RELATION_CREATE_COMMIT'
      EXPORTING
      obj_rolea = ls_object
      obj_roleb = ls_note
      relationtype = 'ATTA'
      EXCEPTIONS
      no_model = 1
      internal_error = 2
      unknown = 3
      OTHERS = 4.
      IF sy-subrc = 0.
      * COMMIT WORK AND WAIT.
      ENDIF.
      ENDIF. " SO_OBJECT_INSERT
      ENDIF. " SO_FOLDER_ROOT_ID_GET



      ENDFUNCTION.

  • author's profile photo Former Member
    Former Member
    Posted on May 09, 2014 at 04:19 AM

    Please Help Its Urgent.....................

    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.