Getting message as attachment!!

Question

Hi all,,
I have an ABAP program where i could send mails to the recipients.
But the recipients are able to receive the content of the mails only in attached pdf format.
But could not get as a body content in the email.
I had passed packing_list-Document type = 'RAW' in in so_document_send_API1
What should i need to do in the settings..
will be awarded..
thanks in adv!!

Answer 1

REPORT ztest.
This example shows how to send
  - a simple text provided in an internal table of text lines
  - and an attached MS word document provided in internal table
  - to some internet email address.
All activities done via facade CL_BCS!
DATA: send_request       TYPE REF TO cl_bcs.
DATA: text               TYPE bcsy_text.
DATA: text_xls               TYPE bcsy_text.
*data: binary_content     type solix_tab.
DATA: document           TYPE REF TO cl_document_bcs.
DATA: sender             TYPE REF TO cl_sapuser_bcs.
DATA: recipient          TYPE REF TO if_recipient_bcs.
DATA: bcs_exception      type ref to cx_bcs.
data: sent_to_all        type os_boolean.
START-OF-SELECTION.
    PERFORM main.
      FORM main                                                     *
FORM main.
  try.
    -------- create persistent send request ------------------------
      send_request = cl_bcs=>create_persistent( ).
     TRY.
      CATCH CX_SEND_REQ_BCS .
     ENDTRY.
    -------- create and set document with attachment ---------------
    create document from internal table with text
      APPEND 'Hi! how r u ? open the xls.' TO text.
      document = cl_document_bcs=>create_document(
                      i_type    = 'RAW'
                      i_text    = text
                      i_length  = '12'
                      i_subject = 'test created by BCS_EXAMPLE_2' ).
    add attachment to document
    BCS expects document content here e.g. from document upload
*TRY.
append 'HI' to text_xls.
CALL METHOD DOCUMENT->ADD_ATTACHMENT
  EXPORTING
    I_ATTACHMENT_TYPE     = 'DOC'
    I_ATTACHMENT_SUBJECT  = 'My attachment'
   I_ATTACHMENT_SIZE     =
   I_ATTACHMENT_LANGUAGE = SPACE
  <b>  I_ATT_CONTENT_TEXT    = text</b>
   I_ATT_CONTENT_HEX     =
   I_ATTACHMENT_HEADER   =.
CATCH CX_DOCUMENT_BCS .
*ENDTRY.
     CALL METHOD document->add_attachment
       EXPORTING  i_attachment_type = 'XLS'
                  i_attachment_subject = 'My Attachment'
                  i_att_content_hex    = binary_content.
    add document to send request
      CALL METHOD send_request->set_document( document ).
    --------- set sender -------------------------------------------
    note: this is necessary only if you want to set the sender
          different from actual user (SY-UNAME). Otherwise sender is
          set automatically with actual user.
      sender = cl_sapuser_bcs=>create( sy-uname ).
      CALL METHOD send_request->set_sender
        EXPORTING i_sender = sender.
    --------- add recipient (e-mail address) -----------------------
    create recipient - please replace e-mail address !!!
      recipient = cl_cam_address_bcs=>create_internet_address(
                                        '[email protected]' ).
    add recipient with its respective attributes to send request
      CALL METHOD send_request->add_recipient
        EXPORTING
          i_recipient  = recipient
          i_express    = 'X'.
    ---------- send document ---------------------------------------
      CALL METHOD send_request->send(
        exporting
          i_with_error_screen = 'X'
        receiving
          result              = sent_to_all ).
      if sent_to_all = 'X'.
        write text-003.
      endif.
      COMMIT WORK.
*                     exception handling
* replace this very rudimentary exception handling
* with your own one !!!
  catch cx_bcs into bcs_exception.
    write: 'Fehler aufgetreten.'(001).
    write: 'Fehlertyp:'(002), bcs_exception->error_type.
    exit.
  endtry.
ENDFORM.
SEE THE ABOVE EXAMPLE, what i bolded is for getting the content