Skip to Content
0
Former Member
Jul 08, 2009 at 07:27 AM

issue for attachment in mail

523 Views

hi

can i send a mail to any one without any attachmnet,below code is sending body of message in attachment.,which i don;t want.

pls tell me what to do.

OBJTXT contains the body like

po qty:10

rejected:10

return:10

but through below code,all data of body is going throgh an attachemnet,pls tell me what to do.

DOC_CHNG-OBJ_DESCR = I_TITLE. "TITLE.

if i_text is not initial.

loop at i_text.

OBJTXT = I_TEXT. "BODY.

APPEND OBJTXT.

endloop.

endif.

DESCRIBE TABLE OBJTXT LINES TAB_LINES.

  • READ TABLE OBJTXT INDEX TAB_LINES.

  • DOC_CHNG-DOC_SIZE = ( TAB_LINES - 1 ) * 255 + STRLEN( OBJTXT ).

  • Creating the entry for the compressed document

CLEAR OBJPACK-TRANSF_BIN.

OBJPACK-HEAD_START = 1.

OBJPACK-HEAD_NUM = 0.

OBJPACK-BODY_START = 1.

OBJPACK-BODY_NUM = TAB_LINES.

OBJPACK-DOC_TYPE = 'RAW'.

APPEND OBJPACK.

  • DESCRIBE TABLE OBJBIN LINES TAB_LINES.

  • Entering names in the distribution list

RECLIST-RECEIVER = abc@mail

RECLIST-REC_TYPE = 'U'.

RECLIST-COM_TYPE = 'INT'.

APPEND RECLIST.

  • Sending the document

CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'

EXPORTING

DOCUMENT_DATA = DOC_CHNG

PUT_IN_OUTBOX = 'X'

COMMIT_WORK = 'X'

TABLES

PACKING_LIST = OBJPACK

OBJECT_HEADER = OBJHEAD

  • CONTENTS_BIN = OBJBIN

CONTENTS_TXT = OBJTXT

RECEIVERS = RECLIST

EXCEPTIONS

TOO_MANY_RECEIVERS = 1

DOCUMENT_NOT_SENT = 2

OPERATION_NO_AUTHORIZATION = 4

OTHERS = 99.

endif.