Report output to be sent via mail

Question

Hi Experts,
I want to send my customized ABAP report output to an email address (e.g my own email ID) as I need to send to the vendor (who doesn't have SAP access) as per the requirement.
Can you please let me know is there any transaction or any other way with the help of which i can just input this report name and the email Id and then it will automatically send the output of the report to that email id.
Thanks in advance.
Any helpful entry will be rewarded.
Warm regards,
Raman.

Answer 1

You might want to write a small program that retrieves your spool information, and send the corresponding ALV (internal table) by converting it and sending it via SAP Connect. Here is a sample of hos to attach and send your internal table:
FORM send_file .
  DATA: send_request       TYPE REF TO cl_bcs,
        text               TYPE bcsy_text,
        document           TYPE REF TO cl_document_bcs,
        recipient          TYPE REF TO if_recipient_bcs,
        copy               TYPE ad_smtpadr,
        bcs_exception      TYPE REF TO cx_bcs,
        sent_to_all        TYPE os_boolean,
        att_name           TYPE sood-objdes,
        subject            TYPE so_obj_des.
Get attachment name
  CONCATENATE g_ret_id '_' sy-datum sy-uzeit '_' g_fileid '.CSV' INTO
  att_name.
  TRY.
Create the send request
      send_request = cl_bcs=>create_persistent( ).
Create the document with attachments
Main document
        APPEND 'Attachment test' TO text.
      document = cl_document_bcs=>create_document(
                    i_type    = 'RAW'
                    i_text    = text
                    i_subject = subject ).
Add text attachment to document
      document->add_attachment( i_attachment_type    = 'CSV'
                                i_attachment_subject = att_name
                                i_att_content_text   = itab_file ).
      send_request->set_document( document ).
Create recipient and add to send request
      LOOP AT itab_recipients INTO wa_recipients.
        IF wa_recipients-copy IS INITIAL.
          "To recipient
          MOVE wa_recipients-address TO g_rec_send.
          recipient = cl_cam_address_bcs=>create_internet_address(
          g_rec_send ).
          send_request->add_recipient( i_recipient = recipient ).
          CLEAR g_rec_send.
        ELSE.
          "CC
          MOVE wa_recipients-address TO g_rec_send.
          recipient = cl_cam_address_bcs=>create_internet_address(
          g_rec_send ).
          send_request->add_recipient( i_recipient = recipient
                                       i_copy = 'X' ).
          CLEAR g_rec_send.
        ENDIF.
      ENDLOOP.
Send
      sent_to_all = send_request->send( i_with_error_screen = 'X' ).
      IF sent_to_all = 'X'.
        MESSAGE s022.
      ENDIF.
    CATCH cx_bcs INTO bcs_exception.
      MESSAGE e865 WITH bcs_exception->error_type.
  ENDTRY.
ENDFORM.                    " send_file
REPORT TO EMAIL
ALV output to email
How to send ALV Grid report to Email?
Check the code...on http://sap4.com/wiki/index.php?title=ZOUTLOOK
sending the output of a program through an email
report output to email
Sending ABAP Report by email
Rewards if useful..............
Minal