[메모]용량이 큰 첨부파일 처리 방법.

ABAP, BSP, WEBUI

[메모]용량이 큰 첨부파일 처리 방법.

마징가07 2014. 11. 14. 16:28

1. ABAP 메모.

- 회사 메일서버는 20MB가 첨부파일 한계임.

이런 경우 SAP BUSINESS WORKPLACE 이용한다.

일단 아래와 같은 프로그램을 짠다.

한 라인은 255까지만 허용.

현재 100만 건까지는 되는데 300만 건(ROW)은 실행도 안되네.

*&---------------------------------------------------------------------*

*& Report  YIHMA_HELLO_01
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  yihma_hello_01.

DATA : BEGIN OF itab OCCURS 0,
         data1(200),
         data2(200),
         data3(200),
         data4(200),
         data5(200),
       END OF itab.
*
DATA : BEGIN OF itab2 OCCURS 0,
         data(1023),
       END OF itab2.
*
DATA : lt_bin    LIKE solisti1 OCCURS 0 WITH HEADER LINE,
       l_mess    TYPE bapi_msg,
       l_line    TYPE i,
       l_bin_len TYPE i,
       l_title(40),
       l_255(255) TYPE c.
*
DATA : ms_mail_cont LIKE mcmailobj OCCURS 0 WITH HEADER LINE,
       ms_mail_receivers LIKE  soos1 OCCURS 0 WITH HEADER LINE.

CLEAR : lt_bin[], l_mess, l_bin_len, l_title.
*
itab-data1 = 'KOREA00001'.
itab-data2 = '홍길동'.
itab-data3 = '010-1234-5678'.
itab-data4 = '서울사 강남구 청담동 3번지 SK빌딩 1201-101 \'.
itab-data5 = 'DISTRIBUTOR'.
*
CONCATENATE itab-data1 itab-data2 itab-data3 itab-data4 itab-data5
  INTO itab2-data SEPARATED BY '|'.

*
CHECK sy-subrc = 0.

DO 300000 TIMES.
  ms_mail_cont-objnr     = '1'.
  ms_mail_cont-objlevel  = '1'.
  ms_mail_cont-objtype   = 'RAW'.
  ms_mail_cont-objline   = itab2-data.
  APPEND  ms_mail_cont.
ENDDO.
*
ms_mail_receivers-recnam = sy-uname.
ms_mail_receivers-sndex  = 'x'.
APPEND ms_mail_receivers.

*내 아이디 넣을 것....

ms_mail_receivers-recnam = 'loveinelfin'.

ms_mail_receivers-sndex  = 'x'.
APPEND ms_mail_receivers.
*

CALL FUNCTION 'MC_SEND_MAIL'
  EXPORTING
    ms_mail_sendmode          = 'B'
    ms_mail_title             = 'TEST'
    ms_mail_description       = 'TEST 입니다,,'
    ms_mail_receiver          = sy-uname
    ms_mail_langu             = sy-langu
  TABLES
    ms_mail_cont              = ms_mail_cont
    ms_mail_receivers         = ms_mail_receivers
  EXCEPTIONS
    send_error                = 1
    canceled                  = 2
    no_title                  = 3
    no_description            = 4
    no_receiver_or_dli        = 5
    invalid_sendmode          = 6
    no_content                = 7
    invalid_functional_params = 8
    OTHERS                    = 9.