DATA : BEGIN OF MS_MAILOBJECT_CONT OCCURS 0.
INCLUDE STRUCTURE MCMAILOBJ.
DATA : END OF MS_MAILOBJECT_CONT.
CLEAR : MS_MAILOBJECT_CONT.
REFRESH : MS_MAILOBJECT_CONT.
CONCATENATE '플랜트' WERKS ' 자재코드 ' MATNR
' 원가 생성작업을 해 주세요.'
INTO MS_MAILOBJECT_CONT-OBJLINE.
MOVE : '1' TO MS_MAILOBJECT_CONT-OBJNR,
'1' TO MS_MAILOBJECT_CONT-OBJLEVEL,
'RAW' TO MS_MAILOBJECT_CONT-OBJTYPE,
'원가생성 요청' TO MS_MAILOBJECT_CONT-OBJNAM,
'원가생성 요청' TO MS_MAILOBJECT_CONT-OBJDES.
APPEND MS_MAILOBJECT_CONT.
CALL FUNCTION 'MC_SEND_MAIL'
EXPORTING
MS_MAIL_SENDMODE = 'B'
MS_MAIL_TITLE = '원가생성요청'
MS_MAIL_DESCRIPTION = '원가생성작업을 해주세요'
MS_MAIL_RECEIVER = 'ED03'
MS_MAIL_EXPRESS = '' “ X=고속(받는사람의 작업화면에 창이 뜸)
TABLES
MS_MAIL_CONT = MS_MAILOBJECT_CONT
.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.