메뉴 건너뛰기

SAP 한국 커뮤니티



CL_BCS를 이용한 E-Mail 즉시전송

사라다 2015.09.17 11:12 조회 수 : 6846 추천:2

SO_DOCUMENT_SEND_API1 펑션을 이용하면 백그라운드 작업에 의해 메일이 발송되서, 메일발송에 약간의 텀이 있길래

실행즉시 발송되는게 없을까 해서 구글링을 통해 찾아서 만들 CBO펑션입니다.


아마 다른 회원분께서 유사한걸 올렸을것 같지만, 제가 찾아볼때는 없길래 등록합니다 ^-^;;;;

혹시 중복이더라도 너그럽게 봐주세요~


<style type="text/css"> SPAN { font-family: "돋움체"; font-size: 10pt; color: #000000; background: #FFFFFF; } .L0S31 { font-style: italic; color: #808080; background: #E6E6FA; } .L0S32 { color: #3399FF; } .L0S33 { color: #4DA619; } .L0S52 { color: #0000FF; } .L0S55 { color: #800080; } .L0S70 { color: #808080; } </style> FUNCTION ZBC_SEND_MAIL_IMMEDIATELY.
*"----------------------------------------------------------------------
*"*"Local interface:
*"  IMPORTING
*"     VALUE(I_SUBJECT) TYPE  SO_OBJ_DES              "메일 제목
*"  TABLES
*"      T_HTML STRUCTURE  SOLISTI1 OPTIONAL           "메일 내용
*"      T_RECV STRUCTURE  SOMLRECI1 OPTIONAL          "메일 수신자
*"  EXCEPTIONS
*"      MAIL_SENT_FAILED
*"----------------------------------------------------------------------

  DATA send_request       TYPE REF TO cl_bcs.
  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 exception_info     TYPE REF TO if_os_exception_info,
         bcs_exception      TYPE REF TO cx_bcs,
         t_hex              TYPE solix_tab,
         t_text              TYPE soli_tab,
         w_text like LINE OF t_text,
         html_string        TYPE string,
         xhtml_string       TYPE xstring,
         v_message(100),
         v_mail             TYPE  sza5_d0700-smtp_addr.


  CLEAR html_string.

  TRY.
*    Create persistent send request
    send_request cl_bcs=>create_persistent).

    loop at t_html.
      move t_html-line to w_text-line.
      append w_text to t_text.
    ENDLOOP.

    document cl_document_bcs=>create_document(
      i_type    'HTM'
      i_text    t_text
      "i_hex    = t_hex
      i_subject I_SUBJECT ).

*     Add document to send request
    CALL METHOD send_request->set_documentdocument ).

*     Get sender object
    sender cl_sapuser_bcs=>createsy-uname ).

*     Add sender
    CALL METHOD send_request->set_sender
      EXPORTING
        i_sender sender.


    LOOP AT T_RECV.
      MOVE T_RECV-RECEIVER TO v_mail.

      recipient cl_cam_address_bcs=>create_internet_addressv_mail ).
*       Add recipient with its respective attributes to send request
      CALL METHOD send_request->add_recipient
        EXPORTING
          i_recipient recipient.
    ENDLOOP.

*     Set that you don't need a Return Status E-mail
    DATAstatus_mail TYPE bcs_stml.
    status_mail 'N'.

    CALL METHOD send_request->set_status_attributes
      EXPORTING
        i_requested_status status_mail
        i_status_mail      status_mail.

*     set send immediately flag
    send_request->set_send_immediately'X' ).

*     Send document
    CALL METHOD send_request->send).

    COMMIT WORK.

  CATCH cx_bcs INTO bcs_exception.
    v_message bcs_exception->get_text).
    RAISE MAIL_SENT_FAILED.
  ENDTRY.

ENDFUNCTION.

번호 제목 글쓴이 날짜 조회 수
1344 ABAP Debugging Tips and Tricks [4] file 아밥뽀 2016.03.31 5523
1343 ALV with IDA(Integrated Data Access ) 설명 및 한글 자료 있으신 분 있으신가요 ? [1] miss841 2016.01.19 5034
1342 ABAP 7.40 Quick Reference [5] sapjoy 2015.11.19 8468
1341 SAP NetWeaver Application Server ABAP 7.4 Overview and Product Highlight file sapjoy 2015.11.12 4047
1340 HANA 및 ABAP 프로그램 개발을 위한 이클립스(ECLIPSE) 설치하기 [8] file sapjoy 2015.09.30 7578
» CL_BCS를 이용한 E-Mail 즉시전송 [1] 사라다 2015.09.17 6846
1338 SAP NetWeaver as server 7.03 VMware 네트워크 설정 방법. file paran 2015.07.25 4456
1337 ALV Grid Function Code Constants [5] file 헝쭈 2015.07.21 5040
1336 ABAP SQL Monitor [6] file 아밥뽀 2015.06.26 5973
1335 ABAP Language News 7.40 [24] file 전군 2015.05.13 4952
1334 SAP에 대한 모바일앱 GUI 인터페이스 연구 자료 입니다. [2] file kdg 2015.04.15 4720
1333 SAP 테이블 연관도 입니다. [24] file kdg 2015.04.15 5854
1332 Installation Instructions for SAP GUI for Java 7.3 v2 file cupycopy2000 2015.04.09 3213
1331 mass download 1.5.5(소스 다운로드) [5] file Wise 멘토 2015.03.26 8525
1330 S/4 HANA FAQ [2] file 아밥뽀 2015.03.19 4676
1329 SAP NOTES 노츠 적용 방법 [8] file 아밥뽀 2015.03.18 5885
1328 webdynpro_tree_in_table [영문] [2] file 언땅에 헤딩 2015.02.06 3573
1327 로컬 파일 삭제 [2] 밤의화신 2014.12.23 5659
1326 스마트폼+예제 [13] file 밤의화신 2014.12.04 6063
1325 select-options parameter 를 function으로 쉽게 넘겨주기 [3] file cupycopy2000 2014.10.24 5295