How to convert Internal table values to excel file

Hi Experts!!!
I have requirement to generate a Excel(.xls) file for a requirement. For this the final internal table values has to be moved to excel file. I have used function module "SAP_CONVERT_TO_XLS_FORMAT" to generate it to my local machine. But when i tried to generate the file in "AL11" folder its giving a dump. Ex(/sapia/iface/out/comm/saphr/test.xls). Can anyone please tell me is there anyother function modules or program to generate in sapia folder.
Thanks.
Ganesh R K

try to save as a tab delimited.

Similar Messages

How to convert internal table data into excel format?

Hi all,
I want to convert internal table data in excel format and then
send it as email attachment in workflow.
Please tell me how do i perform this.
Regards,
Arpita.

Hi Arpita,
Try this sample code::
Send mail
maildata-obj_name = 'TEST'.
maildata-obj_descr = 'Test Subject'.
loop at htmllines.
mailtxt = htmllines.
append mailtxt.
endloop.
mailrec-receiver = 'your receiver mail id'.
mailrec-rec_type = 'U'.
append mailrec.
call function 'SO_NEW_DOCUMENT_SEND_API1'
exporting
document_data = maildata
document_type = 'EXL'
put_in_outbox = 'X'
tables
object_header = mailtxt
object_content = mailtxt
receivers = mailrec
exceptions
too_many_receivers = 1
document_not_sent = 2
document_type_not_exist = 3
operation_no_authorization = 4
parameter_error = 5
x_error = 6
enqueue_error = 7
others = 8.
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.
Regards,
NIkita

ABAP Convert Internal Table values to Excel and Upload

Hi Friends,
I have a internal table with multiple columns along with values and i need to convert this into String-->Xstring and upload to system but before that i need to make the alignments in the Excel before uploading ex:Making the text bold,set border so how will i do this?
Regards,
Vinodkumar.

HI Vinod,
Using OLE is better option to play with Excel.
You can refer below link for detailed information on how to use OLE to download to excel
Downloading report output to Excel using OLE
Thanks,
Lohit
http://www.****************/Tutorials/ABAP/OLE/Index.htm

How to download values in an internal table into an excel file

is there any fn module to download the values in an internal table into an excel file..

hi
the function module "GUI_DOWNLOAD" downloads the data from
an internal table into a file (can be xl, dat ,doc etc) .
Plz follow the usage below ;
Parameters : pa_pfile LIKE rlgrap-filename OBLIGATORY.
Data : lv_filename TYPE STRING.
lv_filename = pa_pfile.
CALL FUNCTION 'GUI_DOWNLOAD'
   EXPORTING
   BIN_FILESIZE                  =
     FILENAME                      = lv_filename
     FILETYPE                      = 'ASC'
   APPEND                        = ' '
    WRITE_FIELD_SEPARATOR         = 'X'
   HEADER                        = '00'
   TRUNC_TRAILING_BLANKS         = ' '
   WRITE_LF                      = 'X'
   COL_SELECT                    = ' '
   COL_SELECT_MASK               = ' '
   DAT_MODE                      = ' '
   CONFIRM_OVERWRITE             = ' '
   NO_AUTH_CHECK                 = ' '
IMPORTING
   FILELENGTH                    =
   TABLES
     DATA_TAB                      = tb_download         " table data to b downlaoded
EXCEPTIONS
    FILE_WRITE_ERROR              = 1
    NO_BATCH                      = 2
    GUI_REFUSE_FILETRANSFER       = 3
    INVALID_TYPE                  = 4
    NO_AUTHORITY                  = 5
    UNKNOWN_ERROR                 = 6
    HEADER_NOT_ALLOWED            = 7
    SEPARATOR_NOT_ALLOWED         = 8
    FILESIZE_NOT_ALLOWED          = 9
    HEADER_TOO_LONG               = 10
    DP_ERROR_CREATE               = 11
    DP_ERROR_SEND                 = 12
    DP_ERROR_WRITE                = 13
    UNKNOWN_DP_ERROR              = 14
    ACCESS_DENIED                 = 15
    DP_OUT_OF_MEMORY              = 16
    DISK_FULL                     = 17
    DP_TIMEOUT                    = 18
    FILE_NOT_FOUND                = 19
    DATAPROVIDER_EXCEPTION        = 20
    CONTROL_FLUSH_ERROR           = 21
    OTHERS                        = 22
IF SY-SUBRC <> 0.
      MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
       WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Regards
Pankaj

How to convert Internal Table to Cluster Table ?

How to convert Internal Table to Cluster Table ?

Use :
EXPORT itab TO DATABASE dbtab(ar) ID key.
<i>EXPORT obj1 ... objn TO DATABASE dbtab(ar) ID key.
Additions:
1. ... = f (for each field you want to export)
2. ... FROM f (for each field you want to export)
3. ... CLIENT g before ID key )
4. ... USING form
5. ... FROM wa (as last addition or after dbtab(ar))
In an ABAP Objects context, a more severe syntax check is performed that in other ABAP areas. See Implicit field names not allowed with clusters and Table work areas not allowed.
Effect
Stores a data cluster in database table dbtab. The specified objects obj1 ... objn (fields, structures, or tables) are stored as a single cluster in the database table dbtab.
The specified database table dbtab must have a standard structure.
The database table dbtab is divided into various logically-related sections (ar, two-character name).
You can export a collection of data objects (a data cluster) to a part of the database using a key (field key).
You can import individual data objects from this collection using the IMPORT statement.
Notes
In classes, you must always assign explicit names to the data objects you want to export, that is, you must use either addition 1 or addition 2.
In classes, you must always specify the work area explicitly, that is, addition 5 is obligatory.
The table dbtab that appears after DATABAE must be declared under TABLES (except in addition 5).
You cannot export the header lines of internal tables. If you specify the name of an internal table with header line, the system always exports the body of the table.
You cannot export data, object, or interface references.
The data is stored in the database, and is consequently not actually stored until a database commit occurs (see LUW). Until this point, you can undo all of your changes using a database rollback (see Programming Transactions).
Example
Exporting two fields and an internal table to the database table INDX:
TABLES INDX.
TYPES: BEGIN OF ITAB3_TYPE,
          CONT(4),
       END OF ITAB3_TYPE.
DATA: INDXKEY LIKE INDX-SRTFD VALUE 'KEYVALUE',
      F1(4), F2 TYPE P,
      ITAB3 TYPE STANDARD TABLE OF ITAB3_TYPE WITH NON-UNIQUE
                 DEFAULT KEY INITIAL SIZE 2,
      WA_INDX TYPE INDX.
Fill the data fields before CLUSTR
before the actual export
INDX-AEDAT = SY-DATUM.
INDX-USERA = SY-UNAME.
Export der Daten.
EXPORT F1    FROM F1
       F2    FROM F2
       ITAB3 FROM ITAB3
       TO DATABASE INDX(ST) FROM WA_INDX ID INDXKEY.
</i>
Regards

How to convert internal table data to PDF format

HI,
I have an internal table data having one field with 255 chars. length.I want to send that intenal table data as attachemnt with external mail. i am thinking of converting that data into PDF format and use the FM to send the mail. How to convert internal table data to PDF format.
Kishore

In which format is your data in the internal table currently. Is it returned by a smartform/script or its just data fetched from some database table into an internal table. Since its obvious that the data should appear in the PDF with some Layout, you should be using smartform to format the data properly. See the Link
Smartform to PDF to EMAIL
This shows convertion of smartform to pdf and send it through email
Regards,
Abhishek

How to pass internal table values to parameter

hi,
         how to pass internal table values to parameter in selection screen.if is it possible means please sent codeings.
thanks.
stalin.

hi,
tables : mara.
data : begin of itab_mara occurs 0,
          matnr like mara-matnr,
          ernam like mara-ernam,
          end of itab_mara.
selection-screen : begin of block blk1 with frame title text-001.
parameters : p_matnr like mara-matnr.
selection-screen : end of block blk1.
select matnr ernam from mara into corresponding fields of itab_mara
                                                                where matnr = p_matnr.
loop at itab_mara.
write :/ itab_mara-matnr,
           itab_mara-ernam.
endloop.
<b><REMOVED BY MODERATOR></b>
Message was edited by:
        Alvaro Tejada Galindo

How to covvert internal table data to XML file?

Hi,
Do u have material on ABAP with XML?
and how to convert internal table to XML?
Thanks and Regards,
Arpita

Check below links:
XML DOM Processing in ABAP part II - Convert an XML file into an ABAP table using SAP DOM Approach.
Re: include a structure in a TYPES declaration
Thanks and Regards,

How to Convert internal table data into text output and send mail in ABAP

Hi All,
Good Morning.
Taking a glance at a code that converts internal table data to an Excel file in ABAP. also checked how to send this excel to mailing list as attachment.
But thought of doing it without excel.
I mean, I have an internal table which contains fields of all types (character,integer,date,time). Since it is only around 4 to 5 rows in it (output),why to convert it to excel. not required!!. Instead I want to send this output to User's mails as Normal mail body with No attachments.
Could anybody please suggest me a way as to how to send internal table data as a mail ( not as an excel or PDF etc).
as of now my findings are, it is quite complex to convert internal table data to email (Text) format. but i believe if there is some way of doing it.
Best Regards
Dileep VT

here's something I have used in the past where we send out information about failed precalculation settings (which are stored in internal table gt_fail)
notice we use gt_text as "mail body"
TRY.
*     -------- create persistent send request ------------------------
       gv_send_request = cl_bcs=>create_persistent( ).
*     -------- create and set document -------------------------------
*     create text to be sent
       wa_line = text-001.
       APPEND wa_line TO gt_text.
       CLEAR wa_line.
       APPEND wa_line TO gt_text.
       LOOP AT gt_fail ASSIGNING <fs_fail>.
         MOVE <fs_fail>-retry_count TO gv_count.
         CONCATENATE text-002
                     <fs_fail>-setting_id
                     text-003
                     gv_count
                     INTO wa_line SEPARATED BY space.
         APPEND wa_line TO gt_text.
         CLEAR wa_line.
       ENDLOOP.
       APPEND wa_line TO gt_text.
       wa_line = text-007.
       APPEND wa_line TO gt_text.
*     create actual document
       gv_document = cl_document_bcs=>create_document(
                       i_type    = 'RAW'
                       i_text    = gt_text
                       i_length = '12'
                       i_subject = 'Failed Precalculation Settings!' ).
*     add document to send request
       CALL METHOD gv_send_request->set_document( gv_document ).
*     --------- set sender -------------------------------------------
       gv_sender = cl_sapuser_bcs=>create( sy-uname ).
       CALL METHOD gv_send_request->set_sender
         EXPORTING
           i_sender = gv_sender.
*     --------- add recipient (e-mail address) -----------------------
       LOOP AT s_email INTO wa_email.
         MOVE wa_email-low TO gv_email.
         gv_recipient = cl_cam_address_bcs=>create_internet_address(
                                           gv_email ).
         CALL METHOD gv_send_request->add_recipient
           EXPORTING
             i_recipient = gv_recipient
             i_express   = 'X'.
       ENDLOOP.
*     ---------- set to send immediately -----------------------------
       CALL METHOD gv_send_request->set_send_immediately( 'X' ).
*     ---------- send document ---------------------------------------
       CALL METHOD gv_send_request->send(
         EXPORTING
           i_with_error_screen = 'X'
         RECEIVING
           result              = gv_sent_to_all ).
       IF gv_sent_to_all = 'X'.
         WRITE text-004.
       ENDIF.
       COMMIT WORK.
*   exception handling
     CATCH cx_bcs INTO gv_bcs_exception.
       WRITE: text-005.
       WRITE: text-006, gv_bcs_exception->error_type.
       EXIT.
   ENDTRY.
with the following declarations
* TABLES                                                               *
TABLES:
   adr6,
   rsr_prec_sett.
* INTERNAL TABLES & WORK AREAS                                         *
DATA:
   gt_fail          TYPE SORTED TABLE OF rsr_prec_sett
                         WITH UNIQUE KEY setting_id run_date,
   gt_text          TYPE bcsy_text,
   wa_fail          LIKE LINE OF gt_fail,
   wa_line(90)      TYPE c.
FIELD-SYMBOLS:
   <fs_fail>        LIKE LINE OF gt_fail.
* VARIABLES                                                            *
DATA:
   gv_count(4)      TYPE n,
   gv_send_request TYPE REF TO cl_bcs,
   gv_document      TYPE REF TO cl_document_bcs,
   gv_sender        TYPE REF TO cl_sapuser_bcs,
   gv_recipient     TYPE REF TO if_recipient_bcs,
   gv_email         TYPE adr6-smtp_addr,
   gv_bcs_exception TYPE REF TO cx_bcs,
   gv_sent_to_all   TYPE os_boolean.
* SELECTION-SCREEN                                                     *
SELECT-OPTIONS:
   s_email          FOR adr6-smtp_addr NO INTERVALS MODIF ID sel.
DATA:
   wa_email         LIKE LINE OF s_email.

How to Refresh "Internal table values" in User EXIT.

Dear All,
My requirement is to place some checks in exit ZXQQMU20 in different tabs from the TCODE IW21 . IW22 etc.
Now after placeing the checks towards the different tabs while doing "NOCO" from IW21 the conditions are fullfilled but
when i go ahead to modify the created "NOCO " from the TCODE IW22 by deleting the created values and saving in IW22 , the conditions written in the exit are still satisfied eventhough i have deleted the values in IW22.
The reason for this is that the tables which are there in the exit ZXQQMU20 T_VIQMFE , T_VIQMUR , T_VIQMMA
still contains the old values which were there at the time of creation of "NOCO" in IW21 .
How to refresh my " internal tables values" used in such that even at the time of modification of the NOCO through IW22 my table values should pick the current screen values and not the values which were there at the time of creation.
Please help.
The code i have written in the exit is as below:-
********************* Changed vide ******START
*****IW21 IW22 also added in filter criteria of notification *************
******The purpose of this modification is that in the execution of IW21 or IW22 or IW24 or IW25 we have to give a check that if the
******notification type is M2 than inside the Transaction screen , if the Breakdown duration comes less than 15 min than there are
******no issues but if the breakdown duration is more than 15 min than the mandatory fields needs to be entered in the analysis tab.
**    The user has to fill up either following mandatory fields in Analysis Data tab.
**    A. Object Parts & Damages sub tab
**    Code Group - Object Parts (OTGRP, VIQMFE)
**                          AND
**    Code Group - Problem / Damage (FEGRP, VIQMFE)
**    Or
**    Notification Item Short Text (FETXT, VIQMFE)
**   B. Cause sub tab
**    Code Group # Causes (URGRP, VIQMUR)
**    Or
**    Cause Text (URTXT, VIQMUR)
**   C. Action Taken sub tab
**    Code Group # Activities (MNGRP, VIQMMA)
**    Or
**    Activity Text (MATXT, VIQMMA)
**            Then, allow user to complete notification (NOCO).
CLEAR : L_VAR , L_COMP_TIME.
IF ( SY-TCODE EQ 'IW21' OR SY-TCODE EQ 'IW22' OR SY-TCODE EQ 'IW24' OR
      SY-TCODE EQ 'IW25' ).
   IF ( E_VIQMEL-IWERK = '061' ) OR ( E_VIQMEL-IWERK = '062' ).
     IF E_VIQMEL-QMART = 'M2'.
       L_VAR = E_VIQMEL-AUSZT.
       L_COMP_TIME = L_VAR / 60.
       IF L_COMP_TIME < 15.
         EXIT.
       ELSEIF L_COMP_TIME > 15..
*         IF ( T_VIQMFE-OTGRP IS INITIAL AND T_VIQMFE-FEGRP IS INITIAL ) OR ( T_VIQMFE-FETXT IS INITIAL ) .
*           MESSAGE 'Please fill the mandatory analysis data in Object Parts' TYPE 'E'.
*         ENDIF.
         IF T_VIQMFE-OTGRP EQ '' OR T_VIQMFE-FEGRP EQ ''.
           IF T_VIQMFE-FETXT EQ ''.
             MESSAGE 'Please fill the mandatory analysis data in Object Parts' TYPE 'E'.
           ENDIF.
         ENDIF.
         CLEAR L_TAG.
         IF T_VIQMUR[] IS INITIAL.
           MESSAGE 'Please fill the mandatory analysis data in Cause tab' TYPE 'E'.
         ELSE.
           LOOP AT T_VIQMUR.
             IF T_VIQMUR-URGRP IS INITIAL .
               IF T_VIQMUR-URTXT IS INITIAL.
                 L_TAG = 'X'.
               ENDIF.
             ENDIF.
           ENDLOOP.
           IF L_TAG = 'X'.
             MESSAGE 'Please fill the mandatory analysis data in Cause tab' TYPE 'E'.
           ENDIF.
         ENDIF.
         CLEAR L_TAG.
         IF T_VIQMMA[] IS INITIAL.
           MESSAGE 'Please fill the mandatory analysis data in Action' TYPE 'E'.
         ELSE.
           LOOP AT T_VIQMMA.
             IF T_VIQMMA-MNGRP IS INITIAL .
               IF T_VIQMMA-MATXT IS INITIAL.
                 L_TAG = 'X'.
               ENDIF.
             ENDIF.
           ENDLOOP.
           IF L_TAG = 'X'.
             MESSAGE 'Please fill the mandatory analysis data in Action' TYPE 'E'.
           ENDIF.
         ENDIF.
       ENDIF.
     ENDIF.
   ENDIF.
ENDIF.
<Added code tags>
Thank you so much in advance..
-Sudhish
Please use the code tags when you're posting any code snippet
Edited by: Suhas Saha on Jul 13, 2011 12:39 PM

Hi, I was thinking just like XVBAP and YVBAP values in the USEREXIT_SAVE_DOCUMENT.
Plz check u have x /y versions or tables like _old/ _new suffixes and then move the value accordingly.
otherwise there may be inconsistency.
Edited by: Prasenjit S. Bist on Jul 13, 2011 3:03 PM

How to paas internal table value

how to pass internal table first value to a variable plz help me

Hi dulla anjan prasad
   You can use the LOOP statement to process special loops for any internal table.
LOOP AT itab result condition.
statement block
ENDLOOP.
This reads the lines of the table one by one as specified in the result part of the LOOP statement. You can then process them in the statements within the LOOP - ENDLOOP control structure. You can either run the loop for all entries in the internal table, or restrict the number of lines read by specifying a condition. Control level processing is allowed within the loop.
The sequence in which the lines are processed depends on the table type:
·        Standard tables and sorted tables
The lines are processed according to the linear index. Within the processing block, the system field sy-tabix contains the index of the current line.
·        Hashed tables
As long as the table has not been sorted, the lines are processed in the order in which you added them to the table. Within the processing block, the system field sy-tabix is always 0.
You can nest LOOP blocks. When you leave the loop, sy-tabix has the same value as when you entered it. After the ENDLOOP statement, sy-subrc is zero if at least one table entry was processed. Otherwise, it is 4.
The loop may not contain any operations on entire internal tables that change the table. However, you should remember that even saving a global internal table with the LOCAL statement in a procedure is a change operation on the entire table, since it exchanges the table contents. When you call procedures within loops, you should therefore check that it does not change the entire internal table. If you change the table, the loop can no longer work properly.
If you insert or delete a table entry within a loop pass, it is taken into account in subsequent loop passes as follows:
·        If you insert a line after the current line, it will be processed in a subsequent loop pass.
·        If you delete a line after the current line, it will not be processed in a subsequent loop pass.
·        If you insert a line before or at the current line, the internal loop counter will be increased accordingly.
·        If you delete a line before or at the current line, the internal loop counter will be decreased accordingly.
If this information is usefull plz do reward points....
Message was edited by:
        ARUN

How to bind internal table values with RootUIElement(Table) from select Que

Hello Friends,
       In my view Layout,there r two Input fields ,Submit button and Table... My concept is when user posting values in two input fields and clicking submit button means the result(more than one values) should be displayed in Table...
     I written coding also but i dont know to bind internal table values with Table... My code as follows,
method onactionsearch .
   data:
     Node_Node_Flight                    type ref to If_Wd_Context_Node,
     Elem_Node_Flight                    type ref to If_Wd_Context_Element,
     Stru_Node_Flight                    type If_View1=>Element_Node_Flight ,
     itab TYPE STANDARD TABLE OF sflight.
navigate from <CONTEXT> to <NODE_FLIGHT> via lead selection
   Node_Node_Flight = wd_Context->get_Child_Node( Name = IF_VIEW1=>wdctx_Node_Flight ).
@TODO handle not set lead selection
   if ( Node_Node_Flight is initial ).
   endif.
get element via lead selection
   Elem_Node_Flight = Node_Node_Flight->get_Element( ).
@TODO handle not set lead selection
   if ( Elem_Node_Flight is initial ).
   endif.
alternative access via index
Elem_Node_Flight = Node_Node_Flight->get_Element( Index = 1 ).
@TODO handle non existant child
if ( Elem_Node_Flight is initial ).
endif.
get all declared attributes
   Elem_Node_Flight->get_Static_Attributes(
     importing
       Static_Attributes = Stru_Node_Flight ).
select * from sflight into CORRESPONDING FIELDS OF TABLE itab
WHERE carrid = Stru_Node_Flight-carrid and connid = Stru_Node_Flight-connid.
Node_Node_Flight->bind_table( new_items = itab ).
endmethod.
Plz reply me asap...!

Hi,
What I understood from your coding is...
* navigate from <CONTEXT> to <NODE_FLIGHT> via lead selection
Node_Node_Flight = wd_Context->get_Child_Node( Name = IF_VIEW1=>wdctx_Node_Flight ).
You are reading values from the above node and binding the values to the same node.Am i right?
Did you take seperate context node for your input fields or binded the above context to the fields.If not then read the context attribute values which are binded to the carrid and connid then pass these values to select query.
One more thing is select cardinality 1..n for node NODE_FLIGHT since you are displaying more than one record.
Go through the some basic tutorials.Search in sdn you will it get.Already there is a tutorial in sdn which explains exactly what do you require.
Go throgh this link
Web Dynpro for ABAP: Tutorials for Beginners
Web Dynpro for ABAP: Tutorials for Beginners [original link is broken]
Edited by: suman kumar chinnam on Mar 26, 2009 10:50 AM

How to save Internal table as a local file?

Hi,
How to save Interanl table as a local file ?
I had some data which i had selected in Interanl table and would like to send this as an attachment by attaching internal table contents as a local file--

Hi friend,
See sample code for GUI_DOWNLOAD.
*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.
*Data
DATA: g_t_mara TYPE TABLE OF g_r_mara,
      filename TYPE string.
*Tables
TABLES: mara, sscrfields.
*Selection Screen
SELECT-OPTIONS: s_matnr FOR mara-matnr.
SELECTION-SCREEN BEGIN OF LINE.
*SELECTION-SCREEN COMMENT 10(20) text-001 FOR FIELD p1.
SELECTION-SCREEN PUSHBUTTON 12(20) word USER-COMMAND uc.
SELECTION-SCREEN END OF LINE.
*Initilizing data.
INITIALIZATION.
word = 'word'.
filename = 'C:\Testing.doc'.   <------- File name and location
AT SELECTION-SCREEN.
CASE sscrfields-ucomm.
    WHEN 'UC'.
*Data retrival
      SELECT matnr ersda laeda mtart mbrsh
        INTO CORRESPONDING FIELDS OF TABLE g_t_mara
        FROM mara
        WHERE matnr IN s_matnr.
*Downloading data from internal table to excel
      CALL FUNCTION 'GUI_DOWNLOAD'
        EXPORTING
          filename              = filename
          filetype              = 'ASC'
          write_field_separator = 'X'
        TABLES
          data_tab              = g_t_mara.
ENDCASE.
(Note: Downloaded file is in C:\Testing.doc)
You can change the file format by changing the extension in filename.
Might helpful for u.
Thanks..

How to download internal table data into xml file?

Hi,
Experts,
I have downloaded internal table data into XLS format using GUI_DOWNLOAD Function module, But i didn't Know how to download internal table data into XML format please post some ideas/inputs on this issue.
Thank you,
Shabeer ahmed.

check this
data : gd_repid type sy-repid.
GD_REPID = SY-REPID.
DATA : L_DOM TYPE REF TO IF_IXML_ELEMENT,
       M_DOCUMENT TYPE REF TO IF_IXML_DOCUMENT,
       G_IXML TYPE REF TO IF_IXML,
       W_STRING TYPE XSTRING,
       W_SIZE TYPE I,
       W_RESULT TYPE I,
       W_LINE TYPE STRING,
       IT_XML TYPE DCXMLLINES,
       S_XML LIKE LINE OF IT_XML,
       W_RC LIKE SY-SUBRC.
DATA: XML TYPE DCXMLLINES.
DATA: RC TYPE SY-SUBRC,
      BEGIN OF XML_TAB OCCURS 0,
      D LIKE LINE OF XML,
      END OF XML_TAB.
data : l_element           type ref to if_ixml_element,
       xml_ns_prefix_sf     type string,
       xml_ns_uri_sf        type string.
CLASS CL_IXML DEFINITION LOAD.
G_IXML = CL_IXML=>CREATE( ).
CHECK NOT G_IXML IS INITIAL.
M_DOCUMENT = G_IXML->CREATE_DOCUMENT( ).
CHECK NOT M_DOCUMENT IS INITIAL.
CALL FUNCTION 'SDIXML_DATA_TO_DOM'
EXPORTING
   NAME = 'REPAIRDATA'
   DATAOBJECT = IT_FINAL_LAST1[]
IMPORTING
   DATA_AS_DOM = L_DOM
CHANGING
   DOCUMENT = M_DOCUMENT
EXCEPTIONS
   ILLEGAL_NAME = 1
   OTHERS = 2.
CHECK NOT L_DOM IS INITIAL.
W_RC = M_DOCUMENT->APPEND_CHILD( NEW_CHILD = L_DOM ).
*Start of code for Header
* namespace
t_mnr = sy-datum+4(2).
CALL FUNCTION 'IDWT_READ_MONTH_TEXT'
EXPORTING
    LANGU         = 'E'
    MONTH         = t_mnr
IMPORTING
   T247          = wa_t247
concatenate sy-datum+6(2)
            wa_t247-ktx
            sy-datum(4) into t_var1.
concatenate sy-uzeit(2)
            sy-uzeit+2(2)
            sy-uzeit+4(2) into t_var2.
clear : xml_ns_prefix_sf,
        xml_ns_uri_sf.
l_element = m_document->get_root_element( ).
xml_ns_prefix_sf = 'TIMESTAMP'.
concatenate t_var1 t_var2 into xml_ns_uri_sf separated by space.
clear : t_var1,
        t_var2,
        t_mnr,
        wa_t247.
l_element->set_attribute( name = xml_ns_prefix_sf
                          namespace = ' '
                          value = xml_ns_uri_sf ).
clear : xml_ns_prefix_sf,
        xml_ns_uri_sf.
xml_ns_prefix_sf = 'FILECREATOR'.
xml_ns_uri_sf    =   'SAP'.
l_element->set_attribute( name = xml_ns_prefix_sf
                          namespace = ' '
                          value = xml_ns_uri_sf ).
clear : xml_ns_prefix_sf,
        xml_ns_uri_sf.
xml_ns_prefix_sf = 'CLAIMGROUP'.
xml_ns_uri_sf    = '1'.
l_element->set_attribute( name = xml_ns_prefix_sf
                          namespace = ' '
                          value = xml_ns_uri_sf ).
clear : xml_ns_prefix_sf,
        xml_ns_uri_sf.
xml_ns_prefix_sf = 'CLAIMTYPES'.
xml_ns_uri_sf    = 'W'.
l_element->set_attribute( name = xml_ns_prefix_sf
                          namespace = ' '
                          value = xml_ns_uri_sf ).
*End of Code for Header
CALL FUNCTION 'SDIXML_DOM_TO_XML'
EXPORTING
DOCUMENT = M_DOCUMENT
IMPORTING
XML_AS_STRING = W_STRING
SIZE = W_SIZE
TABLES
XML_AS_TABLE = IT_XML
EXCEPTIONS
NO_DOCUMENT = 1
OTHERS = 2.
LOOP AT IT_XML INTO XML_TAB-D.
APPEND XML_TAB.
ENDLOOP.
*Start of Code for File name
concatenate p_file
            '\R'
            '000_119481'
            sy-datum+6(2) sy-datum+4(2) sy-datum+2(2)
            sy-uzeit(2)   sy-uzeit+2(2) sy-uzeit(2) '.xml' into p_file.
*End of Code for File name
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
BIN_FILESIZE = W_SIZE
FILENAME = p_file
FILETYPE = 'BIN'
TABLES
DATA_TAB = XML_TAB
EXCEPTIONS
OTHERS = 10.
IF SY-SUBRC = 0.
              MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
              WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

How to download internal table data to .xlsx file ?

Hello All,
I am using SAP ECC 6.0. I need to download internal table data to .xlsx file.
I tried GUI_DOWNLOAD, all the data are getting transferred to the .xlsx file, but while opening I am getting the below error.
Excel cannot open the file "download.xlsx" because file format or file extension is not valid. Verify that the file has not been corrupted and that the file extension matches the format of the file.
Though Microsoft office 2007 is installed in my system.
Please help <removed by moderator>.
Edited by: Thomas Zloch on Oct 24, 2011 10:55 AM

Hi,
Please find the below code to download data into excel file.
DATA: ld_filename TYPE string,
        ld_path TYPE string,
        ld_fullpath TYPE string,
        ld_result TYPE i.
Display save dialog window
CALL METHOD cl_gui_frontend_services=>file_save_dialog
    EXPORTING
     window_title      = ' '
      DEFAULT_EXTENSION = 'XLS'
      default_file_name = 'accountsdata'
      INITIAL_DIRECTORY = 'c:\temp\'
    CHANGING
      filename          = ld_filename
      path              = ld_path
      fullpath          = ld_fullpath
      user_action       = ld_result.
Check user did not cancel request
CHECK ld_result EQ '0'.
CALL FUNCTION 'GUI_DOWNLOAD'
   EXPORTING
        filename         = ld_fullpath
        filetype         = 'ASC'
      APPEND           = 'X'
        write_field_separator = 'X'
      CONFIRM_OVERWRITE = 'X'
   TABLES
        data_tab         = it_datatab[]     "need to declare and populate
   EXCEPTIONS
        file_open_error = 1
        file_write_error = 2
        OTHERS           = 3.
Thanks and Regards
Chitra

How to convert Internal table values to excel file

Similar Messages

Maybe you are looking for