UPLOADING EXCEL FILE INTO PRESENTATION SERVER

hi guys,
any one can provide the function module to upload an EXCEL file fromt he presentation server into SAP-CRM system.
regards
viswa guntha

Hi Viswa,
you should try to use the SDN Search. I've searched for "Excel upload" and the second link was:
Uploading Data From Excel Sheet to SAP Database Tables
Regards
Gregor

Similar Messages

Help Required:How Upload Excel file Into Oracle Table Using PLSQL Procedure

Please Help , Urgent Help Needed.
Requirement is to Upload Excel file Into Oracle Table Using PLSQL Procedure/Package.
Case's are :
1. Excel File is On Users/ Client PC.
2. Application is on Remote Server(Oracle Forms D2k).
3. User Is Using Application Using Terminal Server LogIn.
4. So If User Will Use to GET_FILE_NAME() function of D2K to Get Excel File , D2k Will Try to pick File from That Remote Server(Bcs User Logind from Terminal Server Option).
5. Cannot Use Util_File Package Or Oracle Directory to Place That File on Server.
6. we are Using Oracle 8.7
So Need Some PL/SQL Package or Fuction/ Procedure to Upload Excel file on User's Pc to Oracle Table.
Please Guide me wd some Code. or with Some Pl/SQL Package, or With SOme Hint. Or any Link ....
Jus help to Sort This Issue ........
you can also write me on :
[email protected], [email protected]

TEXT_IO is a PL/SQL package available only in Forms (you'll want to post in the Forms forum for more information). It is not available in a stored procedure in the database (where the equivalent package is UTL_FILE).
If the Terminal Server machine and the database machine do not have access to the file system on the client machine, no application running on either machine will have access to the file. Barring exceptional setups (like the FTP server on the client machine), your applications are not going to have more access to the client machine than the operating system does.
If you map the client drives from the Terminal Server box, there is the potential for your Forms application to access those files. If you want the files to be accessible to a stored procedure in the database, you'll need to move the files somewhere the database can access them.
Justin

Uploading & Downloading Files into DMS Server using Web Dynpro Java

Hello Friends,
      I want to Upload a file from Portal to Document Management Server and to Download a file from Document Management Server to Portal, In short, I want to give the user the facility to Upload a File into DMS Sever via Portal and also to download the file from DMS Sever via Portal.
Can anybody give me a Input for the same from Both Java Development End as well as ABAP End, more inputs are required from ABAP end, since i have a very less ABAP Experience on working with DMS. Few Questions i have in my mind?
1. How to actually access the file contents with the help of Document Number?
2. With the help of Doc-Number we can extract the file from DMS sever but to provide a option for downloading in portal, the   RFC should convert the File Contents into X-String or is there some other way?
+3. While Uploading the Data should be given in Which format to RFC? Are there any limitation with respect to size or formats. Is there any Standard RFC i can use directly in WD4 Java application to upload the file into DMS Server and which will return me the Document Number? +
Please give me your valuable inputs.
Thank You.
Edited by: TusharShinde on Feb 21, 2011 11:13 AM
Now, I am able to download the File in Portal via my WD4 Java Application from DMS Server by passing the Document Number, but I am facing the problem in downloading the PDF files, Its not working for PDF files. Please give me inputs for the same.
Thank You.
Edited by: TusharShinde on Feb 22, 2011 10:13 AM

HI,
Thanks for reply.
I am able to download the file From DMS server but I am still not able to Upload the File to DMS Server via Portal. For Download also it is working for all file formats but not for PDF any specific reason for the same.
function zhrf_rfc_dms_download_document.
*"*"Local Interface:
*" IMPORTING
*"     VALUE(LV_DOCUMENT) TYPE DOKNR
*" EXPORTING
*"     VALUE(LV_FADA) TYPE XSTRING
*" TABLES
*"      LT_DOC STRUCTURE BAPI_DOC_FILES2
*"      LT_OUT STRUCTURE ZST_DMS_FILE_XSTRING
data: ls_docfiles type bapi_doc_files2,
         ls_dms type dms_doc_files,
         lt_docfiles type standard table of bapi_doc_files2.
*      data: LT_OUT type table of ZST_DMS_FILE_XSTRING.
data :wa_out like line of lt_out.
select single * from dms_doc_files
    into ls_dms
    where doknr = lv_document."Retrieve file
if sy-subrc = 0.
    ls_docfiles-documenttype = ls_dms-dokar.
    ls_docfiles-documentnumber = lv_document.
    ls_docfiles-documentpart = ls_dms-doktl.
    ls_docfiles-documentversion = ls_dms-dokvr.
*    ls_docfiles-documenttype = '321'.
*    ls_docfiles-documentnumber = LV_DOCUMENT.
*    ls_docfiles-documentpart = '000'.
*    ls_docfiles-documentversion = 'A0'.
endif.
call function 'BAPI_DOCUMENT_CHECKOUTVIEW2'
    exporting
      documenttype    = ls_docfiles-documenttype
      documentnumber = ls_docfiles-documentnumber
      documentpart    = ls_docfiles-documentpart
      documentversion = ls_docfiles-documentversion
      documentfile    = ls_docfiles
      getstructure    = '1'
      getcomponents   = 'X'
      getheader       = 'X'
*      pf_http_dest    = 'SAPHTTPA'
      pf_ftp_dest     = 'SAPFTPA'
    tables
      documentfiles   = lt_docfiles.
data: i_bin type standard table of sdokcntbin,
        i_info type standard table of scms_acinf,
        v_info type scms_acinf,
        v_id type sdok_phid,
        v_cat type sdok_stcat.
if sy-subrc = 0.
    loop at lt_docfiles into ls_docfiles.
      v_id = ls_docfiles-docfile.
      v_cat = ls_docfiles-storagecategory.
      call function 'SCMS_DOC_READ'
        exporting
          stor_cat              = v_cat
          doc_id                = v_id
          phio_id               = ls_docfiles-file_id
        tables
          access_info           = i_info
          content_bin           = i_bin
        exceptions
          bad_storage_type      = 1
          bad_request           = 2
          unauthorized          = 3
          comp_not_found        = 4
          not_found             = 5
          forbidden             = 6
          conflict              = 7
          internal_server_error = 8
          error_http            = 9
          error_signature       = 10
          error_config          = 11
          error_format          = 12
          error_parameter       = 13
          error                 = 14
          others                = 15.
    endloop.
    if sy-subrc <> 0.
    else.
      data: v_xstring type xstring.
      read table i_info into v_info index 1.
      call function 'SCMS_BINARY_TO_XSTRING'
        exporting
          input_length = v_info-comp_size
        importing
          buffer       = v_xstring
        tables
          binary_tab   = i_bin
        exceptions
          failed       = 1
          others       = 2.
      if sy-subrc <> 0.
      endif.
    endif.
    wa_out-file_name = ls_docfiles-docfile.
    wa_out-binary = v_xstring.
    lv_fada = v_xstring.
    append wa_out to lt_out.
endif.
endfunction.
The above is the RFC Code, I am using in my WD4Java app for downloading the file From DMS Server, Is there any Improvement suggested for above RFC to make it work in more efficient way. Please give me input for my Upload RFC.
Thank You.

Uploading excel files into Web UI

We are following the blog http://wiki.sdn.sap.com/wiki/display/CRM/CRMWebUI-UploadingdatafromExcelfiles
to upload excel files into Web UI.
The problem which we are facing is that the values are not getting populated in the text are and in the
event handler EH_ONSERVEREVENT, no values are being populated in lt_items table.
It would be great if someone could help us with this.

Hi Nidhi,
I have tried the blog but due to some reason, could not get it worked out.
But, If U are ok to use CSV input files, instead of excel, U can use the standard component "GS_FILE_UPLOAD" as a popup and upload the files into the required assignment blocks.

How to upload excel file in application server??

Hi,
How to upload an excel file into internal table in background mode from application server?
Thanks

Hi vipin,
check this it may help you...
hope below links helps you
Export the report list to Excel Sheet
http://www.sapdevelopment.co.uk/file/file_updown.htm
or below is a sample programme which helps you upload and download
REPORT ytest5 LINE-SIZE 80
                LINE-COUNT 65
                NO STANDARD PAGE HEADING.
TABLES: dd02l, dd03l.
* selection screen
SELECTION-SCREEN BEGIN OF BLOCK b00 WITH FRAME TITLE text-b00.
SELECTION-SCREEN BEGIN OF BLOCK b01 WITH FRAME TITLE text-b01.
PARAMETERS: tabname     LIKE dd02l-tabname OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b01.
SELECTION-SCREEN BEGIN OF BLOCK b03 WITH FRAME TITLE text-b03.
PARAMETERS: path(30)    TYPE c DEFAULT 'C:SAPWorkdir'.
SELECTION-SCREEN END OF BLOCK b03.
SELECTION-SCREEN BEGIN OF BLOCK b04 WITH FRAME TITLE text-b04.
PARAMETERS: p_exp RADIOBUTTON GROUP radi,
            p_imp RADIOBUTTON GROUP radi,
            p_clear     AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK b04.
SELECTION-SCREEN END OF BLOCK b00.
* data
DATA: q_return     LIKE syst-subrc,
      err_flag(1) TYPE c,
      answer(1)    TYPE c,
      w_text1(62) TYPE c,
      w_text2(40) TYPE c,
      winfile(128) TYPE c,
      w_system(40) TYPE c,
      winsys(7)    TYPE c,
      zname(8)     TYPE c,
      w_line(80)   TYPE c.
* internal tables
DATA : BEGIN OF textpool_tab OCCURS 0.
        INCLUDE STRUCTURE textpool.
DATA : END OF textpool_tab.
* table for subroutine pool
DATA : itab(80) OCCURS 0.
* events
INITIALIZATION.
PERFORM check_system.
AT SELECTION-SCREEN ON tabname.
PERFORM check_table_exists.
START-OF-SELECTION.
PERFORM init_report_texts.
PERFORM request_confirmation.
END-OF-SELECTION.
IF answer = 'J'.
    PERFORM execute_program_function.
ENDIF.
TOP-OF-PAGE.
PERFORM process_top_of_page.
* forms
*       FORM CHECK_TABLE_EXISTS                                      *
FORM check_table_exists.
SELECT SINGLE * FROM dd02l
INTO CORRESPONDING FIELDS OF dd02l
WHERE tabname = tabname.
CHECK syst-subrc NE 0.
MESSAGE e402(mo) WITH tabname.
ENDFORM.
*       FORM INIT_REPORT_TEXTS                                        *
FORM init_report_texts.
READ TEXTPOOL syst-repid
INTO textpool_tab LANGUAGE syst-langu.
LOOP AT textpool_tab
WHERE id EQ 'R' OR id EQ 'T'.
    REPLACE '&1............................'
    WITH tabname INTO textpool_tab-entry.
    MODIFY textpool_tab.
ENDLOOP.
ENDFORM.
*       FORM REQUEST_CONFIRMATION                                     *
FORM request_confirmation.
* import selected, confirm action
IF p_imp = 'X'.
*   build message text for popup
    CONCATENATE 'Data for table'
                 tabname
                 'will be imported' INTO w_text1 SEPARATED BY space.
*   check if delete existing selected, and change message text
    IF p_clear = ' '.
      w_text2 = 'and appended to the end of existing data'.
    ELSE.
      w_text2 = 'Existing Data will be deleted'.
    ENDIF.
    CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
         EXPORTING
              defaultoption = 'N'
              textline1      = w_text1
              textline2      = w_text2
              titel          = 'Confirm Import of Data'
              cancel_display = ' '
         IMPORTING
              answer         = answer
         EXCEPTIONS
              OTHERS         = 1.
ELSE.
*   export selected, set answer to yes so export can continue
    answer = 'J'.
ENDIF.
ENDFORM.
*       FORM EXECUTE_PROGRAM_FUNCTION                                 *
FORM execute_program_function.
PERFORM build_file_name.
CLEAR: q_return,err_flag.
IF p_imp = 'X'.
    PERFORM check_file_exists.
    CHECK err_flag = ' '.
    PERFORM func_import.
ELSE.
    PERFORM func_export.
ENDIF.
ENDFORM.
*       FORM BUILD_FILE_NAME                                          *
FORM build_file_name.
MOVE path TO winfile.
WRITE '' TO winfile+30.
WRITE tabname TO winfile+31.
WRITE '.TAB' TO winfile+61(4).
CONDENSE winfile NO-GAPS.
ENDFORM.
*       FORM CHECK_FILE_EXISTS                                        *
FORM check_file_exists.
CALL FUNCTION 'WS_QUERY'
       EXPORTING
            filename = winfile
            query    = 'FE'
       IMPORTING
            return   = q_return
       EXCEPTIONS
            OTHERS   = 1.
IF syst-subrc NE 0 OR q_return NE 1.
    err_flag = 'X'.
ENDIF.
ENDFORM.
*     FORM func_export                                              *
FORM func_export.
CLEAR itab. REFRESH itab.
APPEND 'PROGRAM SUBPOOL.' TO itab.
APPEND 'FORM DOWNLOAD.' TO itab.
APPEND 'DATA: BEGIN OF IT_TAB OCCURS 0.' TO itab.
CONCATENATE 'INCLUDE STRUCTURE'
              tabname
              '.' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'DATA: END OF IT_TAB.' TO itab.
CONCATENATE 'SELECT * FROM'
              tabname
              'INTO TABLE IT_TAB.' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'CALL FUNCTION ''WS_DOWNLOAD''' TO itab.
APPEND 'EXPORTING' TO itab.
CONCATENATE 'filename = ' ''''
              winfile '''' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'filetype = ''DAT''' TO itab.
APPEND 'TABLES' TO itab.
APPEND 'DATA_TAB = IT_TAB.' TO itab.
APPEND 'DESCRIBE TABLE IT_TAB LINES sy-index.' TO itab.
APPEND 'FORMAT COLOR COL_NORMAL INTENSIFIED OFF.' TO itab.
APPEND 'WRITE: /1 syst-vline,' TO itab.
APPEND '''EXPORT'',' TO itab.
APPEND '15 ''data line(s) have been exported'',' TO itab.
APPEND '68 syst-index,' TO itab.
APPEND '80 syst-vline.' TO itab.
APPEND 'ULINE.' TO itab.
APPEND 'ENDFORM.' TO itab.
GENERATE SUBROUTINE POOL itab NAME zname.
PERFORM download IN PROGRAM (zname).
ENDFORM.
*       FORM func_import                                              *
FORM func_import.
CLEAR itab. REFRESH itab.
APPEND 'PROGRAM SUBPOOL.' TO itab.
APPEND 'FORM UPLOAD.' TO itab.
APPEND 'DATA: BEGIN OF IT_TAB OCCURS 0.' TO itab.
CONCATENATE 'INCLUDE STRUCTURE'
              tabname
              '.' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'DATA: END OF IT_TAB.' TO itab.
APPEND 'DATA: BEGIN OF IT_TAB2 OCCURS 0.' TO itab.
CONCATENATE 'INCLUDE STRUCTURE'
              tabname
              '.' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'DATA: END OF IT_TAB2.' TO itab.
APPEND 'CALL FUNCTION ''WS_UPLOAD''' TO itab.
APPEND 'EXPORTING' TO itab.
CONCATENATE 'filename = ' ''''
              winfile '''' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'filetype = ''DAT''' TO itab.
APPEND 'TABLES' TO itab.
APPEND 'DATA_TAB = IT_TAB.' TO itab.
IF p_clear = 'X'.
    CONCATENATE 'SELECT * FROM'
                tabname
                'INTO TABLE IT_TAB2.' INTO w_line SEPARATED BY space.
    APPEND w_line TO itab.
    APPEND 'LOOP AT IT_TAB2.' TO itab.
    CONCATENATE 'DELETE'
                tabname
                'FROM IT_TAB2.' INTO w_line SEPARATED BY space.
    APPEND w_line TO itab.
    APPEND 'ENDLOOP.' TO itab.
    APPEND 'COMMIT WORK.' TO itab.
ENDIF.
APPEND 'LOOP AT IT_TAB.' TO itab.
CONCATENATE 'MODIFY'
              tabname
              'FROM IT_TAB.' INTO w_line SEPARATED BY space.
APPEND w_line TO itab.
APPEND 'ENDLOOP.' TO itab.
APPEND 'DESCRIBE TABLE IT_TAB LINES sy-index.' TO itab.
APPEND 'FORMAT COLOR COL_NORMAL INTENSIFIED OFF.' TO itab.
APPEND 'WRITE: /1 syst-vline,' TO itab.
APPEND '''IMPORT'',' TO itab.
APPEND '15 ''data line(s) have been imported'',' TO itab.
APPEND '68 syst-index,' TO itab.
APPEND '80 syst-vline.' TO itab.
APPEND 'ULINE.' TO itab.
APPEND 'ENDFORM.' TO itab.
GENERATE SUBROUTINE POOL itab NAME zname.
PERFORM upload IN PROGRAM (zname).
ENDFORM.
*       Form CHECK_SYSTEM
*            Check users workstation is running
*            WINDOWS 95, or WINDOWS NT.
*            OS/2 uses 8.3 file names which are no good for
*            this application as filenames created are 30 char
*            same as table name.
*            You could change the logic to only use the first 8 chars
*            of the table name for the filename, but you could possibly
*            get problems if users had exported already with a table
*            with the same first 8 chars.
*            As an alternate method you could request the user to input
*            the full path including filename and remove the logic to
*            build the path using the table name.
FORM check_system.
CALL FUNCTION 'WS_QUERY'
       EXPORTING
            query = 'WS'
       IMPORTING
            return = winsys.
IF winsys NE 'WN32_95'.
    WRITE: 'Windows NT or Windows 95/98 is required'.
    EXIT.
ENDIF.
ENDFORM.                               " CHECK_SYSTEM
*       FORM PROCESS_TOP_OF_PAGE                                      *
FORM process_top_of_page.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
ULINE.
CONCATENATE syst-sysid
              syst-saprl
              syst-host INTO w_system SEPARATED BY space.
WRITE : AT /1(syst-linsz) w_system CENTERED.
WRITE : AT 1 syst-vline, syst-uname.
syst-linsz = syst-linsz - 11.
WRITE : AT syst-linsz syst-repid(008).
syst-linsz = syst-linsz + 11.
WRITE : AT syst-linsz syst-vline.
LOOP AT textpool_tab WHERE id EQ 'R'.
    WRITE : AT /1(syst-linsz) textpool_tab-entry CENTERED.
ENDLOOP.
WRITE : AT 1 syst-vline, syst-datum.
syst-linsz = syst-linsz - 11.
WRITE : AT syst-linsz syst-tcode(004).
syst-linsz = syst-linsz + 11.
WRITE : AT syst-linsz syst-vline.
LOOP AT textpool_tab WHERE id EQ 'T'.
    WRITE : AT /1(syst-linsz) textpool_tab-entry CENTERED.
ENDLOOP.
WRITE : AT 1 syst-vline, syst-uzeit.
syst-linsz = syst-linsz - 11.
WRITE : AT syst-linsz 'Page', syst-pagno.
syst-linsz = syst-linsz + 11.
WRITE : AT syst-linsz syst-vline.
ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
LOOP AT textpool_tab WHERE id EQ 'H'.
    WRITE : AT /1(syst-linsz) textpool_tab-entry.
ENDLOOP.
ULINE.
ENDFORM.
if it helps you reward with points.
regards,
venu
regards,
venu.

Uploading Excel File in application server

Hi,
I am uploading data from internal table to excel file in application server.I am using Open dataset to put in appln server.(background job).But the problem is it is not sitting in different colums,all data goes to single column.I want every field in separate columns.Please suggest to proceed.

Hi,
save the internal table as a desktop file and then use CG3Z transaction to put the data from desktop to application server.
then to read the application file use the logic given below:
DATA: wa_file_data TYPE text4096,
lv_app_server_file TYPE string.
lv_app_server_file = pa_afile.
To read file from Application server
OPEN DATASET lv_app_server_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
DO.
    READ DATASET lv_app_server_file INTO wa_file_data.
    IF sy-subrc = 0.
      APPEND wa_file_data TO gi_file_data.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
CLOSE DATASET lv_app_server_file.
DATA: lv_file_separator TYPE c.
lv_file_separator = cl_abap_char_utilities=>horizontal_tab.
To upload file in other formats(CSV, Tab delimited etc)
CALL FUNCTION 'TEXT_CONVERT_TEX_TO_SAP'
    EXPORTING
      i_field_seperator    = lv_file_separator
      i_tab_raw_data       = gi_file_data
    TABLES
      i_tab_converted_data = gi_zhralcon_file
    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 helps.
Regards,
Rajesh Kumar

Uploading a file into XI server

Hi,
I am using SXDA_TOOLS transaction code in XI ABAP Stack to upload the file into AL11 directory....
there it is asking so many things .
what are the necessary inputs we need to provide there to upload the file into AL11 dir
Regards
Suman

Hi
go to sxda_tools transaction
give object type as DXPROJECT
Program Type as BAPI
Program as Create
then clicjk on COPY button
in the source column
select the presentation server radio button and give the file name by selecting the help button.
in this u will take the file name form ur desktop.
in the target column select the application server raio button
click on ther remote server check box and selecvt the remote server by pressing F4(this will be ur XI server)
select the file type as P Physical File Name
file name fiels value willbr ur directory name that u havedefine in the sender soap adapter + ur file name that u also define in ur file sender adapter.
for example:
directory/urfilename
if u still face the problem please reply me back.
Thanks
Rinku

Uploading excel file into internal table

Hi,
Any function module is there to upload an excel file into internal table in CRM 7.0 system?
Thanks.

Hi Ginger,
If u have access to ECC R/3 make use FM 'TEXT_CONVERT_XLS_TO_SAP' source code which is existing to convert to Excel to Internal table. It will work in CRM also.
As of Now I don't have access to SAP S/m. Mean while u can try as above said.
Regards,
Lokesh B

Populate existing excel file in presentation server

Hi,
My requirement is to populate an existing excel file in the presentation server. After the data has been uploaded the file needs to be saved in another name .
Could someone help me out on this.
thanks

hi,
check this sample code...
hope it works..
data: begin of itab occurs 0,
      vbeln like vbak-vbeln,
      posnr like vbap-posnr,
      end of itab.
select vbeln
       posnr
       from vbap
       up to 20 rows
       into table itab.
* EXCEL sheet using OLE automation.
INCLUDE OLE2INCL.
* handles for OLE objects
DATA: H_EXCEL TYPE OLE2_OBJECT,        " Excel object
      H_WORK TYPE OLE2_OBJECT,
      H_SHEET TYPE OLE2_OBJECT,
      H_CELL TYPE OLE2_OBJECT,
      V_COL   LIKE SY-TABIX.     " column number of the cell
DATA:
V_STEP(30),
V_FILE LIKE RLGRAP-FILENAME.
* tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
     EXPORTING
*           PERCENTAGE = 0
           TEXT       = 'Creating Excel...'
       EXCEPTIONS
            OTHERS     = 1.
* start Excel
V_STEP = 'Starting Excel'.
CREATE OBJECT H_EXCEL 'EXCEL.APPLICATION'.
PERFORM ERR_HDL.
SET PROPERTY OF H_EXCEL 'Visible' = 1.
CALL METHOD OF H_EXCEL 'APPEND'
    EXPORTING #1 = 'D:SappdfABAP Trainingsheettr.xls'.
* PERFORM ERR_HDL.
* tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
     EXPORTING
*           PERCENTAGE = 0
           TEXT       = 'Adding Data to Excel...'
       EXCEPTIONS
            OTHERS     = 1.
* Get the list of workbooks
V_STEP = 'Preaparing Excel'.
CALL METHOD OF H_EXCEL 'WORKBOOKS' = H_WORK.
PERFORM ERR_HDL.
** Add new workbook (create a file)
CALL METHOD OF H_WORK 'ADD'.
PERFORM ERR_HDL.
* Get the created worksheet
************************Sheet Number
CALL METHOD OF H_EXCEL 'WORKSHEETS' = H_SHEET EXPORTING #1 = 3.
************************Sheet Number
PERFORM ERR_HDL.
* Activate (select) the first sheet
CALL METHOD OF H_SHEET 'ACTIVATE'.
PERFORM ERR_HDL.
* tell user what is going on
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
     EXPORTING
*           PERCENTAGE = 0
           TEXT       = 'Adding Data to Excel...'
       EXCEPTIONS
            OTHERS     = 1.
* output column headings to active Excel sheet
V_STEP = 'Adding data to Excel'.
LOOP AT ITAB.
    V_COL = SY-TABIX.
    PERFORM FILL_CELL USING 1 V_COL ITAB-vbeln.
    PERFORM FILL_CELL USING 2 V_COL ITAB-posnr.
ENDLOOP.
V_STEP = 'Releasing Excel'.
FREE OBJECT H_EXCEL.
PERFORM ERR_HDL.
H_EXCEL-HANDLE = -1.
*&      Form ERR_HDL
*       text
* --> p1        text
FORM ERR_HDL.
IF SY-SUBRC <> 0.
    WRITE: / 'Error in processing Excel File:', V_STEP.
    STOP.
ENDIF.
ENDFORM.                    " ERR_HDL
*&      Form FILL_CELL
*       text
*      -->P_1      text
*      -->P_1      text
*      -->P_1      text
FORM FILL_CELL USING ROW COL VAL.
CALL METHOD OF H_EXCEL 'Cells' = H_CELL
                 EXPORTING #1 = ROW #2 = COL.
PERFORM ERR_HDL.
SET PROPERTY OF H_CELL 'Value' = VAL .
PERFORM ERR_HDL.
regards
satesh

Uploading Excel file in SRM server

Dear Gurus,
I am trying to upload the excel file in SRM 5.0 server. But the function modules that are present in R/3 like 'TEXT_CONVERT_XLS_TO_SAP',
'KCD_EXCEL_DATE_CONVERT' and also ALSM_EXCEL_TO_INTERNAL_TABLE but these function modules are not present on SRM server.
I need to upload a simple excel file and write an bdc on that.
Is there any way.
Thanka in advance,
Saurabh Chhatre

Hi,
save the internal table as a desktop file and then use CG3Z transaction to put the data from desktop to application server.
then to read the application file use the logic given below:
DATA: wa_file_data TYPE text4096,
lv_app_server_file TYPE string.
lv_app_server_file = pa_afile.
To read file from Application server
OPEN DATASET lv_app_server_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.
DO.
    READ DATASET lv_app_server_file INTO wa_file_data.
    IF sy-subrc = 0.
      APPEND wa_file_data TO gi_file_data.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
CLOSE DATASET lv_app_server_file.
DATA: lv_file_separator TYPE c.
lv_file_separator = cl_abap_char_utilities=>horizontal_tab.
To upload file in other formats(CSV, Tab delimited etc)
CALL FUNCTION 'TEXT_CONVERT_TEX_TO_SAP'
    EXPORTING
      i_field_seperator    = lv_file_separator
      i_tab_raw_data       = gi_file_data
    TABLES
      i_tab_converted_data = gi_zhralcon_file
    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 helps.
Regards,
Rajesh Kumar

How to Upload Excel file to Application Server

Hi Friends,
ALSM_EXCEL_TO_INTERNAL_TABLE this F.M is to upload the excel format into internal table , The problem here is after uploading the excel file the format has been changed according to the F.M ... so Im not able to compare the value with my final internal table because the structure is different ... even if I could match with the values Im not able to upload it to my application server ... is there any F.M which doesn't change the excel format and upload it to the internal table ? ... Or is there any other way of doing it other than using at new , case endcase. ? ...
Thanks in advance ...
Cheers

Hi friend,
Simply use GUI_UPLOAD function to get data from excel, txt etc.., into internal table in program.
Try this program.. It performs downloading and uploading functions in both excel and .txt format.
*& Report ZAWI_DEMODOWNLOAD                                           *
REPORT zawi_demodownload                       .
*Types
TYPES: BEGIN OF g_r_mara,
       matnr LIKE mara-matnr,
       ersda LIKE mara-ersda,
       laeda LIKE mara-laeda,
       mtart LIKE mara-mtart,
       mbrsh LIKE mara-mbrsh,
       END OF g_r_mara.
TYPES: BEGIN OF g_r_mara1,
       matnr TYPE string,
       ersda TYPE string,
       laeda TYPE string,
       mtart TYPE string,
       mbrsh TYPE string,
       END OF g_r_mara1.
*Data
DATA: g_t_mara TYPE TABLE OF g_r_mara,
      g_t_mara1 TYPE TABLE OF g_r_mara,
      g_t_mara2 TYPE TABLE OF g_r_mara1,
      filename TYPE string,
      f1 TYPE string,
      f2 TYPE string,
      x TYPE string,
      x1 TYPE string,
      x2 TYPE string,
      x3 TYPE strng,
      c TYPE string,
      g_r_wa TYPE g_r_mara,
      g_r_wa1 TYPE g_r_mara1,
      g_r_wa2 TYPE g_r_mara1,
     g_t_mara2 TYPE TABLE OF g_r_mara1,
      str TYPE string.
*Tables
TABLES: mara.
*Selection Screen
SELECT-OPTIONS: s_matnr FOR mara-matnr.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 10(20) text-001 FOR FIELD p1.
PARAMETERS:p1 RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 10(20) text-002 FOR FIELD p2.
PARAMETERS p2 RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF LINE.
*Input validation.
DATA: s_high TYPE mara-matnr,
      s_low TYPE mara-matnr.
AT SELECTION-SCREEN ON s_matnr.
IF NOT s_matnr-high IS INITIAL.
    s_high = s_matnr-high.
    SELECT SINGLE * FROM mara WHERE matnr = s_high.
    IF sy-subrc <> 0.
     IF NOT s_matnr-low IS INITIAL.
      s_low = s_matnr-low.
      SELECT SINGLE * FROM mara WHERE matnr = s_low.
      IF sy-subrc <> 0.
        MESSAGE e012(zawi_demo).
      ELSE.
        MESSAGE e011(zawi_demo).
      ENDIF.
    ENDIF.
ENDIF.
AT SELECTION-SCREEN.
SELECT SINGLE * FROM mara WHERE matnr IN s_matnr.
IF sy-subrc <> 0.
    IF s_matnr-low IS INITIAL.
      str = s_matnr-high.
    ELSE.
      str = s_matnr-low.
    ENDIF.
    MESSAGE e010(zawi_demo) WITH str..
ENDIF.
START-OF-SELECTION.
*Data retrival
SELECT matnr ersda laeda mtart mbrsh
    INTO CORRESPONDING FIELDS OF TABLE g_t_mara
    FROM mara
    WHERE matnr IN s_matnr.
IF p1 = 'X'.
    filename = 'C:\Testing.xls'.
   Downloading data from internal table to excel or txt
    f1 = filename.
    CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
        filename              = filename
        filetype              = 'ASC'
     append                = 'X'
        write_field_separator = 'X'
     col_select = 'X'
      TABLES
        data_tab              = g_t_mara.
ELSE.
    filename = 'C:\Testing.txt'.
    f2 = filename.
    LOOP AT g_t_mara INTO g_r_wa.
      CONCATENATE g_r_wa-matnr ';' INTO g_r_wa1-matnr.
      CONCATENATE g_r_wa-ersda ';' INTO g_r_wa1-ersda.
      CONCATENATE g_r_wa-laeda ';' INTO g_r_wa1-laeda.
      CONCATENATE g_r_wa-mtart ';' INTO g_r_wa1-mtart.
      CONCATENATE g_r_wa-mbrsh ';' INTO g_r_wa1-mbrsh.
      APPEND g_r_wa1 TO g_t_mara2.
    ENDLOOP.
    CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
        filename              = filename
        filetype              = 'ASC'
     append                = 'X'
     write_field_separator = 'X'
     col_select = 'X'
      TABLES
        data_tab              = g_t_mara2.
ENDIF.
   Uploading data from excel to internal table 1
IF filename = f1.
    CALL FUNCTION 'GUI_UPLOAD'
      EXPORTING
        filename            = filename
        filetype            = 'ASC'
        has_field_separator = 'X'
      TABLES
        data_tab            = g_t_mara1.
    WRITE: / 'Uploaded data' COLOR = 1.
    WRITE:/.
    CLEAR g_r_wa.
    LOOP AT g_t_mara1 INTO g_r_wa.
      WRITE:/ g_r_wa-matnr, g_r_wa-ersda, g_r_wa-laeda, g_r_wa-mtart, g_r_wa-mbrsh.
    ENDLOOP.
ELSE.
    IF filename = f2.
                       IF sy-subrc <> 0.
                       ENDIF.
      CALL FUNCTION 'GUI_UPLOAD'
        EXPORTING
          filename            = filename
          filetype            = 'ASC'
          has_field_separator = 'X'
          replacement         = ''
        TABLES
          data_tab            = g_t_mara2.
      WRITE: / 'Uploaded data' COLOR = 1.
      WRITE:/.
      CLEAR g_r_wa1.
      LOOP AT g_t_mara2 INTO g_r_wa1.
        g_r_wa2-matnr = g_r_wa1-matnr.
        TRANSLATE g_r_wa2-matnr USING '; ' .
        WRITE:/ g_r_wa2-matnr, g_r_wa2-ersda, g_r_wa2-laeda, g_r_wa2-mtart, g_r_wa2-mbrsh.
        CLEAR g_r_wa2.
      ENDLOOP.
    ENDIF.
ENDIF.
                                                                                OR
Use T-codes:
CG3Y - Download file               - Download file from Application server
CG3Z - Upload file                    - Upload file to Application server

How to upload multiple files into a server location at a single time

Hi All,
In my application i need to send multiple files from a particular page into the server location. In this page there will be an option to upload a file and after selecting the file , we will have an option asking if we were interested to send another file. It works just similar to google mail where we can multiple files at the same time. Right now though i had coded the uploading files concept i am facing some problems when trying to upload multiple files. All the files are being appended to a single file but i want them to be placed as different files at the specified location. Plz help me in this regard...
Thanks in advance................,,

Hi,
i am sending the code in my prg. Have a look at it.
var multi_selector = new MultiSelector( document.getElementById( 'files_list' ),3);
In the above line i am specyfying that the maximum no. of files to be uploaded is 3. So if i upload less than 3 files, the program doesn't work and is not reading the uploaded files. If i upload 3 files it works fine. So please suggest me how to make this work irrespective of the no. of files uploaded using apache commons.
My code is as follows:
<form action="./servlet/Sample" method = "post" enctype="multipart/form-data">
     
     <input id="my_file_element" type="file" name="file_1" >
     <input type="submit" name="submit1" value="submit">
</form>
Files:

<div id="files_list"></div>
<script>
     
     var multi_selector = new MultiSelector( document.getElementById( 'files_list' ),3);
     
     multi_selector.addElement( document.getElementById( 'my_file_element' ) );
</script>

How to create an EXCEL file in Presentation server

hello experts,
please suggest me a solution for the following problem :
I have an internal table with some data.
how can i create an excel file with that data in Presentation Server.
Thanks & Regards
sasi.

hi,
    u can use FM: 'DOWNLOAD'.
it will prompt u for destination - just give the requd filename and extension.
Ex:
    call function 'DOWNLOAD'
         exporting
             filename                =
              filetype                = 'DAT'
         tables
              data_tab                = tb_output
              fieldnames              = tb_fld_nam
         exceptions
              invalid_filesize        = 1
              invalid_table_width     = 2
              invalid_type            = 3
              no_batch                = 4
              unknown_error           = 5
              gui_refuse_filetransfer = 6
              customer_error          = 7
              others                  = 8.
where,
         tb_output = internal table having the fields which u want in the O/P
Ex:
         data: begin of tb_output occurs 0,
                           name_1(20)      type c,
                           name_2(20)      type c,
                   end of tb_output.
         tb_fld_nam = Field headings :
Ex:
         data: begin of tb_fld_nam occurs 0,
                        name(25)              type c,
                  end of tb_fld_nam.
                 tb_fld_nam-name = 'Name 1'.
                 append tb_fld_nam.
                 tb_fld_nam-name = 'Name 2'.
                 append tb_fld_nam.
Thanx & Regards,
Ajoy

Uploading excel file into internal table with field length more than 255

I am trying to upload the data from an excel file through function module 'TEXT_CONVERT_XLS_TO_SAP'.
I have tested by changing the field type from string, and char2000.
But it is accepting only 255 chars from the cell content.
How to get the total content of the field if it is more than 255 char.

hi,
you can use any of the following procedures:
For uploading data from excel to internal table refer standard report RC1TCG3Z in se38 :
                                           or
You can use the FM 'ALSM_EXCEL_TO_INTERNAL_TABLE' itself. Please check if you have done it this way . But, this FM can be a little time consuming if the excel has large data, so you can use the FM u2018GUI_UPLOADu2019.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
        EXPORTING
          filename                = p_file1
          i_begin_col          = l_b1
          i_begin_row        = l_c1
         i_end_col               = l_b2
         i_end_row             = l_c2
       TABLES
          intern                  = lt_data
        EXCEPTIONS
         inconsistent_parameters = 1
        upload_ole              = 2
          OTHERS                  = 3.
      IF sy-subrc <> 0.
        MESSAGE e018 DISPLAY LIKE 'i'.
     ENDIF.
*---Removing the first heading fields from the file.
      IF NOT lt_data[] IS INITIAL.
        LOOP AT lt_data INTO lwa_data WHERE row = '0001'.
          DELETE lt_data.
          CLEAR lwa_data.
        ENDLOOP.
*---Inserting the data from file the internal table
        LOOP AT lt_data INTO lwa_data.
          CASE lwa_data-col.
            WHEN 1.
              wa_file_wicopa-serial = lwa_data-value.
            WHEN 2.
              wa_file_wicopa-blart = lwa_data-value.
            WHEN 3.
              wa_file_wicopa-bldat = lwa_data-value.
            WHEN 4.
              wa_file_wicopa-budat = lwa_data-value.
          ENDCASE.
          AT END OF row.
            APPEND wa_file_wicopa TO gt_file_wicopa.
            CLEAR wa_file_wicopa.
          ENDAT.
          CLEAR lwa_data.
        ENDLOOP.
      ENDIF.
    ENDIF.
                                            or
DATA: it_test TYPE STANDARD TABLE OF alsmex_tabline WITH HEADER LINE.
DATA :v_start_col TYPE i VALUE '1',
      v_start_row TYPE i VALUE '1',
      v_end_col TYPE i VALUE '256',
      v_end_row TYPE i VALUE '65536',
      v_text TYPE repti.
* Funtion Module to upload values from excel to the Internal table
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      filename                = p_file
      i_begin_col             = v_start_col
      i_begin_row             = v_start_row
      i_end_col               = v_end_col
      i_end_row               = v_end_row
    TABLES
      intern                  = it_test
    EXCEPTIONS
      inconsistent_parameters = 1
      upload_ole              = 2
      OTHERS                  = 3.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
                         Or
You can use FM u201CTEXT_CONVERT_XLS_TO_SAPu201D.
DATA : i_raw TYPE truxs_t_text_data.
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
      i_field_seperator          = 'X'
      i_tab_raw_data             = i_raw
      i_filename                 = p_path
    TABLES
      i_tab_converted_data       = itab
EXCEPTIONS
   conversion_failed          = 1
   OTHERS                     = 2
hope it will help u
regards
rahul

Uploading excel file into the program

Hi,
My excel file contains four sheets inside. Each sheet contains data.
When i upload this file using Function "UPLOAD" and data format of "DAT", how is the data transferred into internal table.
How is the data in various sheets of excel file is transfered into the internal table of the ABAP program.
Thanks for the response.

also check this...
TO UPLOAD DATA FROM 2 EXCEL SHEETS INTO TWO INTERNAL TABLES
the Above is In OLE
Regards
vijay

UPLOADING EXCEL FILE INTO PRESENTATION SERVER

Similar Messages

Maybe you are looking for