Hi Workflow experts,<br>
I am using the fuction module
[b]SO_NEW_DOCUMENT_SEND_API1[/b] for sending mail when a PO is
created.I need to display the line item details in PO in a table format
in the mail.so I am using the HTML tags in my program as follows(this
is a sample code) for drawing table.But it is not displaying the data
in table format in the mail.It is just displaying as<br>
<br>
Dear user Test Mail... <br>
TABLE CAPTION <br>
Firstcell Secondcell <br>
<br>
So kindly clarify what I am missing or propose any other way of doing this.<br>
<br>
Thanks in Advance...<br>
<br>
[b]Source Code[/b]<br>
REPORT ZTSS_MAIL .<br>
DATA: T_RECLIST LIKE SOMLRECI1 OCCURS 0 WITH HEADER LINE,<br>
T_OBJCONT LIKE SOLISTI1 OCCURS 0 WITH HEADER LINE.<br>
DATA: S_DOC_CHNG LIKE SODOCCHGI1.<br>
<br>
<br>
S_DOC_CHNG-SENSITIVTY = 'P'.<br>
S_DOC_CHNG-OBJ_DESCR = 'Sample'.<br>
<br>
T_OBJCONT-LINE = 'Dear user'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = 'Test Mail...'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<HTML>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<TABLE>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<CAPTION>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = 'TABLE CAPTION'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '</CAPTION>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<TR>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<TD>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = 'Firstcell'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '<TD>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = 'Secondcell'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '</TABLE>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
T_OBJCONT-LINE = '</HTML>'.<br>
APPEND T_OBJCONT.<br>
CLEAR T_OBJCONT.<br>
<br>
<br>
T_RECLIST-RECEIVER = '<a href="mailto:user@emailid.com">user@emailid.com</a>'.<br>
T_RECLIST-REC_TYPE = 'U'.<br>
APPEND T_RECLIST.<br>
<br>
<br>
CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'<br>
EXPORTING<br>
DOCUMENT_DATA
= S_DOC_CHNG<br>
DOCUMENT_TYPE
= 'HTM'<br>
TABLES<br>
OBJECT_CONTENT
= T_OBJCONT<br>
RECEIVERS
= T_RECLIST<br>
EXCEPTIONS<br>
TOO_MANY_RECEIVERS = 1<br>
DOCUMENT_NOT_SENT
= 2<br>
DOCUMENT_TYPE_NOT_EXIST = 3<br>
OPERATION_NO_AUTHORIZATION = 4<br>
PARAMETER_ERROR
= 5<br>
X_ERROR
= 6<br>
ENQUEUE_ERROR
= 7<br>
OTHERS
= 8.<br>
IF SY-SUBRC <> 0.<br>
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO<br>
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.<br>
ENDIF.