Sap Email Error

[Former Member]

 DATA: lr_email_data TYPE REF TO cl_crm_email_data. DATA: ls_recipient TYPE crms_email_recipient. DATA: ls_content TYPE crms_email_mime_struc.   CREATE OBJECT lr_email_data. ls_recipient-id = 'em@ S.DE'. ls_recipient-address = 'em@ S.DE'. ls_recipient-channel = space. APPEND ls_recipient TO lr_email_data->to.   ls_content-content_ascii = 'this is a test email.'. ls_content-mime_type = 'text/plain'. APPEND ls_content TO lr_email_data->body.   lr_email_data->subject = 'Notification'. cl_crm_email_utility=>send_email( lr_email_data ). 

But when I check in transaction SO01, I see this message:

Send status for document: Notification

Status received for this document:
Notification

Sent on:
23ᇺ.2011 11:05:46

Sent by:
Rohan John Fernandes

Status for Recipient em@ s.de:
Cannot process message; no node determined for em@ S.DE

And the email is not actually sent. How do I ensure that the email get sent to that email id?

[Former Member]

Hi Burak YILDIZ,

   Check the T.Code --->so10

There u will find out whether the email sent or not and the status...

Hope it solves...

Thanks ,

Vijay SR

[Former Member]

The email address has a space character in it.

em@ S.DE

You could retry after removing spaces from email address.

In addition, open transaction SCOT, and double check SMTP settings.

Click on Set button next to Internet, and verify Address areas.

[Former Member]

I did this time no error but don't send mail

[Former Member]

Hi,

Use the below code and check....

DATA : i_content     TYPE bcsy_text.

DATA : w_content     TYPE soli.

DATA : lc_htab TYPE abap_char1 VALUE cl_abap_char_utilities=>horizontal_tab.

*  DATA : sw_content     TYPE soli.

DATA : requested_status TYPE  bcs_rqst VALUE 'N' .

DATA : status_mail      TYPE bcs_stml.

DATA ls_emp_details TYPE p9001-pernr.

DATA : l_send_request TYPE REF TO cl_bcs,

        l_document     TYPE REF TO cl_document_bcs,   " Mail body

        l_bcs_error    TYPE REF TO cx_send_req_bcs ,

        l_bcs_mess     TYPE string ,

        l_recipient    TYPE REF TO if_recipient_bcs,  " Recipient

        l_subject      TYPE        so_obj_des,

        l_document_bcs TYPE REF TO  cx_document_bcs,

        l_send_req_bcs TYPE REF TO cx_send_req_bcs,

        l_address_bcs  TYPE REF TO cx_address_bcs,

        l_email        TYPE standard table of ad_smtpadr,

        wa_email type ad_smtpadr.

wa_email = 'xxxxx@gmail.com'.

append wa_email to l_email.

clear wa_email.

IF l_email  IS NOT INITIAL.

   CONCATENATE 'Test Mail' ' '

   INTO l_subject SEPARATED BY space.

   CONCATENATE 'Dear ' 'sir, '

   INTO w_content SEPARATED BY lc_htab.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = ' '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = ' '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   CONCATENATE  'Hello How are you???  ' '.'

    INTO w_content SEPARATED BY lc_htab.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = '   '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = '   '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   CONCATENATE 'Employee number:' ' '

   INTO w_content SEPARATED BY space.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = ' '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   CONCATENATE 'Date' sy-datum ' ' 'Time' sy-uzeit

   INTO w_content SEPARATED BY space.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = ' '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = ' '.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = 'Best regards,'.

   APPEND w_content  TO i_content.

   CLEAR w_content .

   w_content = 'Human Resources Team'.

   APPEND w_content  TO i_content.

   CLEAR w_content .

*

** Creates persistent send request

   TRY.

       l_send_request = cl_bcs=>create_persistent( ).

* Craete document for mail body

       TRY.

           l_document = cl_document_bcs=>create_document(

                        i_type         = 'RAW'

                        i_sensitivity  = 'O'

                        i_text         = i_content"l_body  " Mail body

                        i_subject      = l_subject ).

         CATCH cx_document_bcs INTO l_document_bcs .

           l_bcs_mess = l_document_bcs->get_text( ).

       ENDTRY.

       TRY.

           CALL METHOD l_send_request->set_document( l_document ).

         CATCH cx_send_req_bcs INTO l_send_req_bcs.

           l_bcs_mess = l_send_req_bcs->get_text( ).

       ENDTRY.

* Recipient address

       loop at l_email into wa_email.

         TRY.

             l_recipient = cl_cam_address_bcs=>create_internet_address( wa_email ).

           CATCH cx_address_bcs INTO  l_address_bcs .

             l_bcs_mess = l_address_bcs->get_text( ).

         ENDTRY.

* Add recipient address to send request

         TRY.

             CALL METHOD l_send_request->add_recipient

               EXPORTING

                 i_recipient  = l_recipient

                 i_express    = 'X'

                 i_copy       = ' '

                 i_blind_copy = ' '

                 i_no_forward = ' '.

           CATCH cx_send_req_bcs INTO l_send_req_bcs.

             l_bcs_mess = l_send_req_bcs->get_text( ).

         ENDTRY.

         status_mail = requested_status.

       endloop.

       TRY.

           CALL METHOD l_send_request->set_status_attributes

             EXPORTING

               i_requested_status = requested_status

               i_status_mail      = status_mail.

         CATCH cx_send_req_bcs INTO l_send_req_bcs.

           l_bcs_mess = l_send_req_bcs->get_text( ).

       ENDTRY.

* Trigger E-Mail immediately

       TRY.

           l_send_request->set_send_immediately( 'X' ).

         CATCH cx_send_req_bcs INTO l_send_req_bcs.

           l_bcs_mess = l_send_req_bcs->get_text( )..

       ENDTRY.

* Send mail

       TRY.

           CALL METHOD l_send_request->send( ).

         CATCH cx_send_req_bcs INTO l_send_req_bcs.

           l_bcs_mess = l_send_req_bcs->get_text( ).

       ENDTRY.

       COMMIT WORK.

     CATCH cx_send_req_bcs INTO l_bcs_error .

       l_bcs_mess = l_bcs_error->get_text( ).

   ENDTRY.

ENDIF.

Thanks,

Vijay