Skip to Content
0
Jun 17, 2009 at 01:34 PM

Send mail

23 Views

Hi Gurus,

I try to retrieve data via the function module 'READ_TEXT' and then I try to send an email with the function module 'SO_DOCUMENT_SEND_API1' but I don't know how the fill the parameters for this function module. How we fill 'DOCUMENT_DATA', 'PACKING_LIST', ... ?

Thank you in advance for your help.

Regards,

Mohamed.

* retrieve owner information : Email, Language
  LOOP AT i_cntrllng_rsp INTO wa_cntrllng_rsp.
    wa_resp = wa_cntrllng_rsp-bname.
*   write : / wa_resp.

    CALL FUNCTION 'BAPI_USER_GET_DETAIL'
      EXPORTING
        username = wa_resp
      IMPORTING
        address  = i_str_addr
      TABLES
        return   = i_return.
  ENDLOOP.

 Check if mail addres is present
  IF wa_str_addr-e_mail IS INITIAL.
    MESSAGE i019(zst1).
* Check if language is English ou German
  elseIF wa_str_addr-langu_cr_p NE 'EN'.
    MESSAGE i020(zst1).
  ELSE.
    CALL FUNCTION 'READ_TEXT'
      EXPORTING
        id                      = 'ST'
        language                = wa_str_addr-langu_cr_p
        name                    = 'ST_CO_EMAIL_BODY'
        object                  = 'ST_CO_EMAIL_OBJ'
      TABLES
        lines                   = ld_lines
      EXCEPTIONS
        id                      = 1
        language                = 2
        name                    = 3
        not_found               = 4
        object                  = 5
        reference_check         = 6
        wrong_access_to_archive = 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.