topic Re: EXCEL Integration in Application Development and Automation Discussions

EXCEL Integration

Former Member — Tue, 17 Jan 2006 15:43:16 GMT

Greetings, The requirement needs an excel file to be populated with data and then be presented to the user for simulation of an installment plan, I am doing this using OLE and then calling the FM SAP_STARTS_EXCEL to present the information. However, all changes made to the file while open inside the GUI are ignored and when the file is re-opened for data retrieval the correct data is not there.

Does anyone know how can I implement this kind of interaction for data presentation and retrieval using Excel.

Re: EXCEL Integration

RichHeilman — Tue, 17 Jan 2006 15:44:37 GMT

The user would have to "SAVE" the excel sheet after making changes. Then when in re-import it, it would have the updated changes.

Regards,

Rich Heilman

Re: EXCEL Integration

Former Member — Tue, 17 Jan 2006 15:58:02 GMT

Thanks Rich for the prompt reply, however I don't see the changes reflected in the original file after saving it, is there anything else I should do to see the changes reflected?

Re: EXCEL Integration

RichHeilman — Tue, 17 Jan 2006 16:00:07 GMT

Is it important that the excel sheet is embedded into the dynpro? Can you please post your code.

Regards,

Rich Heilman

Re: EXCEL Integration

Former Member — Tue, 17 Jan 2006 16:36:31 GMT

Here it is:

* Initialize
DATA:
    EXCELAPP TYPE OLE2_OBJECT, "Aplicación Excel
    EXCELWBK TYPE OLE2_OBJECT. "Hoja de trabajo

  CREATE OBJECT EXCELAPP 'EXCEL.Application'.
  SET PROPERTY OF EXCELAPP 'Visible' = 0.

  CALL METHOD OF EXCELAPP 'Workbooks' = EXCELWBK.

  CALL METHOD OF EXCELWBK 'Open'
    EXPORTING
      #1 = FNAME.

  CALL METHOD OF EXCELAPP 'Run'
    EXPORTING
      #1 = 'SelectWBK'
      #2 = 'Parametros'.

  CALL METHOD OF EXCELAPP 'Run'
    EXPORTING
      #1 = 'EscribirCelda'
      #2 = 'C5'
      #3 = PARTNERDATA-CONT_ACCT.

.....
* This call saves the file
  CALL METHOD OF EXCELAPP 'Run'
    EXPORTING
      #1 = 'SaveWBK'
      #2 = ''.

* Everything OK so far

CALL METHOD OF EXCELAPP 'Quit'.

  FREE OBJECT EXCELWBK.
  FREE OBJECT EXCELAPP.

* Present file in the dynpro

  CALL FUNCTION 'SAP_STARTS_EXCEL'
    EXPORTING
      I_FILENAME        = FNAME
    EXCEPTIONS
      EXCECUTION_FAILED = 1
      OTHERS            = 2.

* retrieve data

  CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      FILENAME                = FNAME
      I_BEGIN_COL             = 1
      I_BEGIN_ROW             = 14
      I_END_COL               = 11
      I_END_ROW               = 74
    TABLES
      INTERN                  = DATA_TAB
    EXCEPTIONS
      INCONSISTENT_PARAMETERS = 1
      UPLOAD_OLE              = 2
      OTHERS                  = 3.