Upload data from omronbp9112t

can't upload from Omron bp911T monitor into health vault.

Hello,
The best way to resolve this issue would be to contact Omron directly. Here is the contact information that they provided to us:
Please contact Omron at: 1-866.216.1333 and ask for
Glenna, who is the supervisor of our customer assistance team.
thanks
Tomas
MS HealthVault Support

Similar Messages

DB Connect Load - "Unknow error while uploading data from the DB Table"

Hi Experts,
We have our BI7 system connected to Oracle DB based third party tool. The loads are performing quite well in DEV environment.
I would like to know, how we transport DB Connect datasources to Quality systems? Any different process to be followed for DB Connect datasources?
At present the connections between BI Quality and the third party quality systems are established. We transported the DataSource from BI DEV system to BI quality system, but on trigerring an infopackage we are not able to perform loads. It prompts - "Unknow error while uploading data from the DB Table".
Also on comparing the DataSources in DEV system and Quality system there are no fields in "Proposal" tab of datasource in Quality system. Also I cannot change or activate Datasource in Quality system as we dont have change access in quality.
Please advice.
Thanks,
Abhijit

Hi,
Sorry for bumping an old thread ....
Did this issue get ever get resolved?
I am facing the same one. The loads work successfully in Dev. The transport for DBConnect DS also moved in successfully.
One strange this is that DB User for dev did not automatically change to db user from quality when I transported the DBConnect datasource. DBCon DS still shows me the DB User from Dev in Quality system
I get "Unknown Error" whenever I trigger the data package.
Advait

Error while uploading data from a flat file to the hierarchy

Hi guys,
after i upload data from a flat file to the hierarchy, i get a error message "Please select a valid info object" am loading data using PSA, having activated all external chars still get the problem..some help on this please..
regards
Sri

there is o relation of infoobject name in flat file and infoobjet name at BW side.
please check with the object in the BW and their lengths and type of the object and check your flat file weather u have the same type there,
now check the sequence of the objects in the transfer rules and activate them.
there u go.

How to upload data from flat to ztables with in the same client by idocs

Hi Experts,
I have a requirement in IDOCS, I need to create a custom IDOC .I am working on IDES 4.6c. The reqirement is , there are ztables with header and item data. say for example Authors and Books. I need to upload data from flat file which is available in presentation server of the same client, which will updated in ztables by using idocs. For this i need to do ale settings also. The client is 800. There is no other client available. With in the same client i need to do the above stuff.
For this requirement how to approach (step by step) to accomplish.
Thanks in Advance.
Regards
J.S.Varma

Hi,
This is the procedure.
create segments using we31. don't forget to relaese it
create idoc using above segments using we30 don't forget to relaese it
create message type using we81
create function module to upload data using se37
maintain process code using we42
create partner profiles we20.
In the fm module itself write the code for downloading the data from presentation server by GUI_DOWNLOAD.
Then update the database tables directly by insrt through other internal table in the same client itself.
Thanks
Manju

Upload data from excel to Ztable with statistics

Hi,
I have a requirement to upload data from excel sheet to ztable .
Here i need tp provide the user with the execution statistics like
1.Number of records read from the Excel spread-sheet
2. Number records processed successfully
3. Number records with Error
4. Name and location of Error Log-file (text-file format)
5. Name and location of the file containing error records (Excel spread-sheet format)
I would appreciate if any of you have code written for the same

See the below example code to upload from xl file to sap
REPORT ZLWMI151_UPLOAD no standard page heading
 line-size 100 line-count 60.
*tables : zbatch_cross_ref.
data : begin of t_text occurs 0,
 werks(4) type c,
 cmatnr(15) type c,
 srlno(12) type n,
 matnr(7) type n,
 charg(10) type n,
 end of t_text.
data: begin of t_zbatch occurs 0,
 werks like zbatch_cross_ref-werks,
 cmatnr like zbatch_cross_ref-cmatnr,
 srlno like zbatch_cross_ref-srlno,
 matnr like zbatch_cross_ref-matnr,
 charg like zbatch_cross_ref-charg,
 end of t_zbatch.
data : g_repid like sy-repid,
 g_line like sy-index,
 g_line1 like sy-index,
 $v_start_col type i value '1',
 $v_start_row type i value '2',
 $v_end_col type i value '256',
 $v_end_row type i value '65536',
 gd_currentrow type i.
data: itab like alsmex_tabline occurs 0 with header line.
data : t_final like zbatch_cross_ref occurs 0 with header line.
selection-screen : begin of block blk with frame title text.
parameters : p_file like rlgrap-filename obligatory.
selection-screen : end of block blk.
initialization.
g_repid = sy-repid.
at selection-screen on value-request for p_file.
CALL FUNCTION 'F4_FILENAME'
 EXPORTING
 PROGRAM_NAME = g_repid
 IMPORTING
 FILE_NAME = p_file.
start-of-selection.
Uploading the data into Internal Table
perform upload_data.
perform modify_table.
top-of-page.
CALL FUNCTION 'Z_HEADER'
EXPORTING
 FLEX_TEXT1 =
 FLEX_TEXT2 =
 FLEX_TEXT3 =
*& Form upload_data
 text
FORM upload_data.
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 = itab
 EXCEPTIONS
 INCONSISTENT_PARAMETERS = 1
 UPLOAD_OLE = 2
 OTHERS = 3.
IF SY-SUBRC <> 0.
 write:/10 'File '.
ENDIF.
if sy-subrc eq 0.
 read table itab index 1.
 gd_currentrow = itab-row.
 loop at itab.
 if itab-row ne gd_currentrow.
 append t_text.
 clear t_text.
 gd_currentrow = itab-row.
 endif.
 case itab-col.
 when '0001'.
 t_text-werks = itab-value.
 when '0002'.
 t_text-cmatnr = itab-value.
 when '0003'.
 t_text-srlno = itab-value.
 when '0004'.
 t_text-matnr = itab-value.
 when '0005'.
 t_text-charg = itab-value.
 endcase.
 endloop.
endif.
append t_text.
ENDFORM. " upload_data
*& Form modify_table
 Modify the table ZBATCH_CROSS_REF
FORM modify_table.
loop at t_text.
 t_final-werks = t_text-werks.
 t_final-cmatnr = t_text-cmatnr.
 t_final-srlno = t_text-srlno.
 t_final-matnr = t_text-matnr.
 t_final-charg = t_text-charg.
 t_final-erdat = sy-datum.
 t_final-erzet = sy-uzeit.
 t_final-ernam = sy-uname.
 t_final-rstat = 'U'.
 append t_final.
 clear t_final.
endloop.
delete t_final where werks = ''.
describe table t_final lines g_line.
sort t_final by werks cmatnr srlno.
Deleting the Duplicate Records
perform select_data.
describe table t_final lines g_line1.
modify zbatch_cross_ref from table t_final.
if sy-subrc ne 0.
 write:/ 'Updation failed'.
else.
 Skip 1.
 Write:/12 'Updation has been Completed Sucessfully'.
 skip 1.
 Write:/12 'Records in file ',42 g_line .
 write:/12 'Updated records in Table',42 g_line1.
endif.
delete from zbatch_cross_ref where werks = ''.
ENDFORM. " modify_table
*& Form select_data
 Deleting the duplicate records
FORM select_data.
select werks
 cmatnr
 srlno from zbatch_cross_ref
 into table t_zbatch for all entries in t_final
 where werks = t_final-werks
 and cmatnr = t_final-cmatnr
 and srlno = t_final-srlno.
sort t_zbatch by werks cmatnr srlno.
loop at t_zbatch.
 read table t_final with key werks = t_zbatch-werks
 cmatnr = t_zbatch-cmatnr
 srlno = t_zbatch-srlno.
 if sy-subrc eq 0.
 delete table t_final .
 endif.
 clear: t_zbatch,
 t_final.
endloop.
ENDFORM. " select_data
Reward Points if it is helpful
Thanks
Seshu

Upload data from excel to screen

Hi
I have created one Table Maintanence Generator with only one screen (Table control ). Here i have to upload data from excel to table control. How to upload data from excel to table control.

Hi,
Use this code to get data from excel to internal table. Later put the logic in PBO of the screen to fill the table control from internal table.
PARAMETERS: po_file TYPE rlgrap-filename DEFAULT 'E:test.xls'.
TYPES: BEGIN OF t_final,
          empno(10) TYPE c,
          name(30) TYPE c,
          state(25) TYPE c,
       END OF t_final.
PARAMETERS: po_file TYPE rlgrap-filename.
DATA: i_tab    TYPE STANDARD TABLE OF alsmex_tabline,
      i_final TYPE STANDARD TABLE OF t_final,
      wa_tab   TYPE alsmex_tabline,
      wa_final TYPE t_final.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR po_file.
PERFORM open_folder.
START-OF-SELECTION.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
     EXPORTING
          filename                = po_file
          i_begin_col             = 1
          i_begin_row             = 1
          i_end_col               = 3
          i_end_row               = 65256
     TABLES
          intern                  = i_tab
     EXCEPTIONS
          inconsistent_parameters = 1
          upload_ole              = 2
          OTHERS                  = 3.
CHECK NOT i_tab[] IS INITIAL.
LOOP AT i_tab INTO wa_tab.
CASE wa_tab-col.
    WHEN 1.
      wa_final-empno = wa_tab-value.
    WHEN 2.
      wa_final-name = wa_tab-value.
    WHEN 3.
      wa_final-state = wa_tab-value.
ENDCASE.
AT END OF row.
    APPEND wa_final TO i_final.
    CLEAR wa_final.
ENDAT.
ENDLOOP.
FORM open_folder .
DATA: li_file TYPE TABLE OF sdokpath,
        lwa_file TYPE sdokpath.
CLEAR: p_fname, lwa_file.
REFRESH li_file[].
CALL FUNCTION 'TMP_GUI_FILE_OPEN_DIALOG'
       TABLES
            file_table = li_file
       EXCEPTIONS
            cntl_error = 1
            OTHERS     = 2.
IF sy-subrc IS INITIAL.
    READ TABLE li_file INTO lwa_file INDEX 1.
    IF sy-subrc IS INITIAL.
     p_fname = lwa_file-pathname.
    ENDIF.
ENDIF.
ENDFORM.                    " open_folder
Thanks,
Vinod.
Edited by: Vinod Reddy Vemuru on Jul 28, 2008 4:50 PM

Upload data from excel to oracle table

Hi,
if i'm user and using an application and i want to upload data from excel to oracle table on button click . Is it possible by using sql loader.
If yes then please clarify it .
is it possible from client end.
thanks
kam

Yes it is possible using SQL*LDR, External tables and ORCL Export Utility. Though I didn't try Export Utility to load the external files.
SQLLdr sysntax:
Create a control file.
It looks like this
Load data
Infile 'source.dat'
Into Table tablename
Fields terminated by ',' optionally enclosed by '"'
{code}
then use sqlldr command from your OS.
{code}
sqlldr userid/password@sid control = filename.ctl, data = source.dat, log = logname.log, bad = badname.log, discard = discardname.discard
{code}

Upload data from excel to application server

Hi all,
Is there any process to upload data from excel to application server other than reading the data from excel to z program through gui_upload and transferring the data to application server.
I want to run background job for a BDC program with the data present in the excel file.
Thanks & regards
sreehari p.

Hi Sreehari,
Please use the tcode - CG3Z, where you can transfer the file from presentation server to the application server.
Regards,
Selva K.

Upload data from EXCEL to ALV

Hi,
I have a requirement to upload data from EXCEL to ALV. I could not find any standard functionality which does the same. Any pointers in this regard would be of great help.
Thanks & Regards,
Nirupamaa.

Hi,
I have a requirement to upload data from EXCEL to ALV. I could not find any standard functionality which does the same. Any pointers in this regard would be of great help.
Thanks & Regards,
Nirupamaa.

Upload data from Excel to Sap-Crm

Hi All,
I need to upload data from EXCEL to SAP-CRM system.The problem is in crm there is no ALSM_EXCEL_INTO_INTERNAL_TABLE or corresponding function modules exist.Using GUI_UPLOAD I can upload data from excel to CRM but the main problem with this is it supports only 255 chars for entire line, in my excel file it contains more than 255 chars.Please help me out.

Try the following :
Class: CL_GUI_FRONTEND_SERVICES
Method: GUI_UPLOAD
Thanks
Allot points if this helps!

Upload data from excel to crm using BDOC possible or not

Hi all,
I need to upload data from excel to crm(opportunity management) .is it possible using bdoc or not. Please provide the list of methods to upload data from EXCEL and also provide the best method for this scenario .

BDocs are used to transfer data from one SAP system to another like from CRM to ECC or R3.
If u want to upload data from excel to CRM, this can be done with the help of idocs and not bdocs (method 1 - using LSMW).
Take help of a crm technical consultant and define lsmw projects. The project will take care of field mapping and conversion. Once that is done, 4 steps need to be done.
1. Read data
2. Convert data
3. Generate idocs
4. Post idocs
Once the posting of idocs happen error-free, the data will be available in crm system.
Another method will be using transaction SECATT.
Here u can define test scripts and record what all activities are done in a transaction. Then define ur test configs which will contain the excel sheet data and then upload the data.
Reward with points if this helps.

Upload data from excel:can we upload from .csv only?

Hi Experts,
Can we upload data from .CSV file only? Is this a limitation in ABAP? What if i have an excel sheet with multiple worksheets and I want to pick data from one of the worksheet. Is this scenario possible?
Thanks and Regards,
Rohit

Hi Rohit.
In CRM , it works somewhat differently. Following code snippet will help u.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_infile.
CALL FUNCTION 'WS_FILENAME_GET'
 EXPORTING
 DEF_FILENAME = 'p_infile'
 DEF_PATH = ' '
 MASK = '*.txt'
 MODE = '0'
 TITLE = 'UPLOAD TAB DELIMITED FILE'(078)
 IMPORTING
 FILENAME = p_infile
* RC =
 EXCEPTIONS
 INV_WINSYS = 1
 NO_BATCH = 2
 SELECTION_CANCEL = 3
 SELECTION_ERROR = 4
 OTHERS = 5.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*START-OF-SELECTION
START-OF-SELECTION.
gd_file = p_infile.
CALL FUNCTION 'GUI_UPLOAD'
 EXPORTING
 FILENAME = gd_file
* FILETYPE = 'ASC'
 HAS_FIELD_SEPARATOR = 'X'
* HEADER_LENGTH = 0
* READ_BY_LINE = 'X'
* DAT_MODE = ' '
* CODEPAGE = ' '
* IGNORE_CERR = ABAP_TRUE
* REPLACEMENT = '#'
* CHECK_BOM = ' '
* VIRUS_SCAN_PROFILE =
* NO_AUTH_CHECK = ' '
* IMPORTING
* FILELENGTH =
* HEADER =
 TABLES
 DATA_TAB = it_record
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.
 write: 'Error' , sy-subrc .
 skip.
ENDIF.

Upload data from Excel.

Hello Experts,
I gotta a question regarding upload data from the excel to the sap. Does anybody know how do i have to procede ??? I was trying through transactions KP65 and KP34 but i got really confuse.
A documentation step by step will be very helpful !
Thank´s in advance!

Hi,
If you don't want to program, you can either use LSMW or you can use CATT.
Regards
Mark

Upload data from excel with vba by calling a function module

Hello all,
i have a problem with the function module "ALSM_EXCEL_TO_INTERNAL_TABLE". I will call this function module with vba to load data from excel to sap with a Buttonclick. I have copied this function module and set it remotable. But i can´t call it from excel.
Can you give me some tips how can i
upload data from excel with vba by click a button.
The problem seems the function: call method cl_gui_frontend_services=>clipboard_import in the function module, because when i comment this function call the vba-call is true but no results.
How can I call the function module correct with vba?
Thanks a lot for your tips!!!!
Chris
Message was edited by:
 Christoph Kirschner

HI
Uploading data directly from Excel file format
* Upload data direct from excel.xls file to SAP
REPORT ZEXCELUPLOAD.
PARAMETERS: filename LIKE rlgrap-filename MEMORY ID M01,
 begcol TYPE i DEFAULT 1 NO-DISPLAY,
 begrow TYPE i DEFAULT 1 NO-DISPLAY,
 endcol TYPE i DEFAULT 100 NO-DISPLAY,
 endrow TYPE i DEFAULT 32000 NO-DISPLAY.
* Tick don't append header
PARAMETERS: kzheader AS CHECKBOX.
DATA: BEGIN OF intern OCCURS 0.
 INCLUDE STRUCTURE alsmex_tabline.
DATA: END OF intern.
DATA: BEGIN OF intern1 OCCURS 0.
 INCLUDE STRUCTURE alsmex_tabline.
DATA: END OF intern1.
DATA: BEGIN OF t_col OCCURS 0,
 col LIKE alsmex_tabline-col,
 size TYPE i.
DATA: END OF t_col.
DATA: zwlen TYPE i,
 zwlines TYPE i.
DATA: BEGIN OF fieldnames OCCURS 3,
 title(60),
 table(6),
 field(10),
 kz(1),
 END OF fieldnames.
* No of columns
DATA: BEGIN OF data_tab OCCURS 0,
 value_0001(50),
 value_0002(50),
 value_0003(50),
 value_0004(50),
 value_0005(50),
 value_0006(50),
 value_0007(50),
 value_0008(50),
 value_0009(50),
 value_0010(50),
 value_0011(50),
 value_0012(50),
 value_0013(50),
 value_0014(50),
 value_0015(50),
 value_0016(50),
 value_0017(50),
 value_0018(50),
 value_0019(50),
 value_0020(50),
 value_0021(50),
 value_0022(50),
 value_0023(50),
 value_0024(50),
 value_0025(50),
 value_0026(50),
 value_0027(50),
 value_0028(50),
 value_0029(50),
 value_0030(50),
 value_0031(50),
 value_0032(50),
 value_0033(50),
 value_0034(50),
 value_0035(50),
 value_0036(50),
 value_0037(50),
 value_0038(50),
 value_0039(50),
 value_0040(50),
 value_0041(50),
 value_0042(50),
 value_0043(50),
 value_0044(50),
 value_0045(50),
 value_0046(50),
 value_0047(50),
 value_0048(50),
 value_0049(50),
 value_0050(50),
 value_0051(50),
 value_0052(50),
 value_0053(50),
 value_0054(50),
 value_0055(50),
 value_0056(50),
 value_0057(50),
 value_0058(50),
 value_0059(50),
 value_0060(50),
 value_0061(50),
 value_0062(50),
 value_0063(50),
 value_0064(50),
 value_0065(50),
 value_0066(50),
 value_0067(50),
 value_0068(50),
 value_0069(50),
 value_0070(50),
 value_0071(50),
 value_0072(50),
 value_0073(50),
 value_0074(50),
 value_0075(50),
 value_0076(50),
 value_0077(50),
 value_0078(50),
 value_0079(50),
 value_0080(50),
 value_0081(50),
 value_0082(50),
 value_0083(50),
 value_0084(50),
 value_0085(50),
 value_0086(50),
 value_0087(50),
 value_0088(50),
 value_0089(50),
 value_0090(50),
 value_0091(50),
 value_0092(50),
 value_0093(50),
 value_0094(50),
 value_0095(50),
 value_0096(50),
 value_0097(50),
 value_0098(50),
 value_0099(50),
 value_0100(50).
DATA: END OF data_tab.
DATA: tind(4) TYPE n.
DATA: zwfeld(19).
FIELD-SYMBOLS: <fs1>.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR filename.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
 EXPORTING
 mask = '*.xls'
 static = 'X'
 CHANGING
 file_name = filename.
START-OF-SELECTION.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
 EXPORTING
 filename = filename
 i_begin_col = begcol
 i_begin_row = begrow
 i_end_col = endcol
 i_end_row = endrow
 TABLES
 intern = intern
 EXCEPTIONS
 inconsistent_parameters = 1
 upload_ole = 2
 OTHERS = 3.
IF sy-subrc <> 0.
 WRITE:/ 'Upload Error ', SY-SUBRC.
ENDIF.
END-OF-SELECTION.
LOOP AT intern.
 intern1 = intern.
 CLEAR intern1-row.
 APPEND intern1.
ENDLOOP.
SORT intern1 BY col.
LOOP AT intern1.
 AT NEW col.
 t_col-col = intern1-col.
 APPEND t_col.
 ENDAT.
 zwlen = strlen( intern1-value ).
 READ TABLE t_col WITH KEY col = intern1-col.
 IF sy-subrc EQ 0.
 IF zwlen > t_col-size.
 t_col-size = zwlen.
* Internal Table, Current Row Index
 MODIFY t_col INDEX sy-tabix.
 ENDIF.
 ENDIF.
ENDLOOP.
DESCRIBE TABLE t_col LINES zwlines.
SORT intern BY row col.
IF kzheader = 'X'.
 LOOP AT intern.
 fieldnames-title = intern-value.
 APPEND fieldnames.
 AT END OF row.
 EXIT.
 ENDAT.
 ENDLOOP.
ELSE.
 DO zwlines TIMES.
 WRITE sy-index TO fieldnames-title.
 APPEND fieldnames.
 ENDDO.
ENDIF.
SORT intern BY row col.
LOOP AT intern.
 IF kzheader = 'X'
 AND intern-row = 1.
 CONTINUE.
 ENDIF.
 tind = intern-col.
 CONCATENATE 'DATA_TAB-VALUE_' tind INTO zwfeld.
 ASSIGN (zwfeld) TO <fs1>.
 <fs1> = intern-value.
 AT END OF row.
 APPEND data_tab.
 CLEAR data_tab.
 ENDAT.
ENDLOOP.
CALL FUNCTION 'DISPLAY_BASIC_LIST'
 EXPORTING
 file_name = filename
 TABLES
 data_tab = data_tab
 fieldname_tab = fieldnames.
*-- End of Program
Excel Upload Alternative - KCD_EXCEL_OLE_TO_INT_CONVERT
*Title : Excel Uploading
TYPES: BEGIN OF t_datatab,
 col1(25) TYPE c,
 col2(30) TYPE c,
 col3(30) TYPE c,
 col4(30) TYPE c,
 col5(30) TYPE c,
 col6(30) TYPE c,
 col7(30) TYPE c,
 col8(30) TYPE c,
 col9(30) TYPE c,
 col10(30) TYPE c,
 col11(30) TYPE c,
 END OF t_datatab.
DATA: it_datatab TYPE STANDARD TABLE OF t_datatab INITIAL SIZE 0,
 wa_datatab TYPE t_datatab.
Data : p_table type t_datatab occurs 0 with header line.
DATA : gd_scol TYPE i VALUE '1',
 gd_srow TYPE i VALUE '1',
 gd_ecol TYPE i VALUE '256',
 gd_erow TYPE i VALUE '65536'.
DATA: it_tab TYPE filetable,
 gd_subrc TYPE i.
field-symbols : <fs>.
*Selection screen definition
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS: p_file LIKE rlgrap-filename
 DEFAULT 'c:test.xls' OBLIGATORY. " File Name
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
REFRESH: it_tab.
CALL METHOD cl_gui_frontend_services=>file_open_dialog
 EXPORTING
 window_title = 'Select File'
 default_filename = '*.xls'
 multiselection = ' '
 CHANGING
 file_table = it_tab
 rc = gd_subrc.
LOOP AT it_tab INTO p_file.
* so_fpath-sign = 'I'.
* so_fpath-option = 'EQ'.
* append so_fpath.
ENDLOOP.
START-OF-SELECTION.
PERFORM upload_excel_file TABLES it_datatab
 USING p_file
 gd_scol
 gd_srow
 gd_ecol
 gd_erow.
* END-OF-SELECTION.
END-OF-SELECTION.
LOOP AT it_datatab INTO wa_datatab.
 WRITE:/ wa_datatab-col1,
 wa_datatab-col2,
 wa_datatab-col3,
 wa_datatab-col4,
 wa_datatab-col5,
 wa_datatab-col6,
 wa_datatab-col7,
 wa_datatab-col8,
 wa_datatab-col9,
 wa_datatab-col10,
 wa_datatab-col11.
ENDLOOP.
*& Form UPLOAD_EXCEL_FILE
* upload excel spreadsheet into internal table
* -->P_TABLE Table to return excel data into
* -->P_FILE file name and path
* -->P_SCOL start column
* -->P_SROW start row
* -->P_ECOL end column
* -->P_EROW end row
FORM upload_excel_file TABLES p_table
 USING p_file
 p_scol
 p_srow
 p_ecol
 p_erow.
DATA : lt_intern TYPE kcde_cells OCCURS 0 WITH HEADER LINE.
* Has the following format:
* Row number | Colum Number | Value
* i.e. 1 1 Name1
* 2 1 Joe
DATA : ld_index TYPE i.
* Note: Alternative function module - 'ALSM_EXCEL_TO_INTERNAL_TABLE'
CALL FUNCTION 'KCD_EXCEL_OLE_TO_INT_CONVERT'
 EXPORTING
 filename = p_file
 i_begin_col = p_scol
 i_begin_row = p_srow
 i_end_col = p_ecol
 i_end_row = p_erow
 TABLES
 intern = LT_INTERN
 EXCEPTIONS
 inconsistent_parameters = 1
 upload_ole = 2
 OTHERS = 3.
IF sy-subrc <> 0.
 FORMAT COLOR COL_BACKGROUND INTENSIFIED.
 WRITE:/ 'Error Uploading file'.
 EXIT.
ENDIF.
IF lt_intern[] IS INITIAL.
 FORMAT COLOR COL_BACKGROUND INTENSIFIED.
 WRITE:/ 'No Data Uploaded'.
 EXIT.
ELSE.
 SORT lt_intern BY row col.
 LOOP AT lt_intern.
 MOVE lt_intern-col TO ld_index.
 assign component ld_index of structure
 p_table to <fs>.
move : lt_intern-value to <fs>.
* MOVE lt_intern-value TO p_table.
 AT END OF row.
 APPEND p_table.
 CLEAR p_table.
 ENDAT.
 ENDLOOP.
ENDIF.
ENDFORM. "UPLOAD_EXCEL_FILE
Regards
Pavan

Upload data from excel (not the excle file) into SAP

Guys,
how can we upload data from excel sheet into SAP? I mean just the data not the entire file,
I have a requirement where user press a button in excel sheet and the data in the sheet will get uploaded into SAP.
I am sure we have to use BAPI and some VB programming for macros, I will really appriciate if anyone can help how to achive this.
some sample code exampe will help.
Cheers!

I think u r writing BDC for Uploading the data from excel flile to sap. for this is the code I am sending u can use then for Uploading data from excel to sap.
DATA: lv_filename TYPE rlgrap-filename.
FIELD-SYMBOLS : <fs>.
DATA : l_intern TYPE alsmex_tabline OCCURS 0 WITH HEADER LINE.
DATA : l_index TYPE i.
PARAMETERS : startcol TYPE i ,
 startrow TYPE i ,
 endcol TYPE i ,
 endrow TYPE i .
PARAMETERS: p_flnam LIKE rlgrap-filename.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_flnam.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
 program_name = sy-repid
FIELD_NAME = ' '
 IMPORTING
 file_name = p_flnam .
MOVE p_flnam TO lv_filename.
Uploading the flat file from the desktop
START-OF-SELECTION.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
 EXPORTING
 filename = lv_filename
 i_begin_col = startcol
 i_begin_row = startrow
 i_end_col = endcol
 i_end_row = endrow
 TABLES
 intern = l_intern
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.
SORT l_intern BY row col.
LOOP AT l_intern.
 MOVE l_intern-col TO l_index.
 ASSIGN COMPONENT l_index OF STRUCTURE itab TO <fs>.
 MOVE l_intern-value TO <fs>.
 AT END OF row.
 APPEND itab.
 CLEAR itab.
 ENDAT.
ENDLOOP.
I hope it will help u.
Regards
Nayan

Upload data from omronbp9112t

Similar Messages

Maybe you are looking for