Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Open data set

Former Member
0 Likes
519

hi experts,

i want to upload excel file from application server through open dataset .

what code should i use.

please take your time replying. No hurry.

Thanks & Rgds

Zeba

Edited by: Matt on Feb 3, 2009 1:22 PM

4 REPLIES 4
Read only

Former Member
Read only

GauthamV
Active Contributor
0 Likes
496

Plz SEARCH in SCN you will get so many posts like these.

[upload excel file to application server using open dataset |https://forums.sdn.sap.com/click.jspa?searchID=21772322&messageID=5782605]

take your time for searching.No hurry .

Read only

Former Member
0 Likes
496

Hi,


CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
*    I_FIELD_SEPERATOR          = 'X'
     i_line_header              = 'X'
      i_tab_raw_data             = it_raw
      i_filename                 = p_file
    TABLES
      i_tab_converted_data       = it_final[]
   EXCEPTIONS
     conversion_failed          = 1
     OTHERS                     = 2
            .
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

Hope it will help you.

Thanks

Arun Kayal

Read only

Former Member
0 Likes
496

Hi,

Hope the below sample code helps u.



**&---------------------------------------------------------------------*
**&      Form  f_read_from_server
**&---------------------------------------------------------------------*
*
form f_read_from_server.

  perform f_fname_print.

  open dataset lv_filename for input in text mode encoding default.

  if sy-subrc = 0.

    perform f_file_server.

  endif.

endform.                    "f_read_from_server
*
**&---------------------------------------------------------------------*
**&      Form  f_file_server
**&---------------------------------------------------------------------*
*
form f_file_server .

  n_filedata = 0.

  if sy-subrc = 0.

    message s102.

    do.

      n_1 = n_1 + 1.

      read dataset lv_filename into wa_file_as.

      if sy-subrc = 0.

        if n_1 <> 1.

          split wa_file_ps at c_separ into lv_plant
                                           lv_costelt
                                           lv_fixcost
                                           lv_varcost.

          wa_data2-zplant = lv_plant.
          wa_data2-zcost_element = lv_costelt.
          wa_data2-zfixed_cost = lv_fixcost.
          wa_data2-zvariable_cost = lv_varcost.

          translate wa_data2-zcost_element to upper case.

          n_filedata = n_filedata + 1.

          wa_data2-counter = count + 1.

          append wa_data2 to it_file_data.

          count = count + 1.

        endif.

        perform f_validation2.

      else.

        exit.

      endif.

    enddo.

  else.

    perform f_error_msg
        using text-003.
  endif.

  close dataset lv_filename.

 
endform.                    " f_file_server

Thanks.