Mail adapter- Attachment file name of scheme ddmm

Hi ,
I am working on File to Mail scenario.
I checked on SDN, but I could not find exact solution.
My requirement is :
I need to mail HTML report file as attachment.
To generate attachment file, I have done XSL mapping.
Attachment file name should be : yyyymmdd.htm
Mail text should be: This is autogenerated mail, please do not reply.
Mail subject: SAP XI report ddmmyyy
Please provide your inputs.
Best Regards,
Divyesh

Hi Henrique,
Thanks a lot for your response.
Your answer is very helpful.
I tried your code.
I am getting error in RWB: here I am including audit Log:
2009-04-02 17:39:41 Success MP: Entering module processor
2009-04-02 17:39:41 Success MP: Processing local module localejbs/CreateAttachment
2009-04-02 17:39:41 Success MP: Processing local module localejbs/sap.com/com.sap.aii.adapter.mail.app/XIMailAdapterBean
2009-04-02 17:39:41 Success Mail: message entering the adapter
2009-04-02 17:39:41 Success Mail: Receiver adapter entered with qos ExactlyOnceInOrder
2009-04-02 17:39:41 Success Mail: calling the adpter for processing
2009-04-02 17:39:42 Error Mail: call failed; java.io.IOException: Missing mandatory element <sap:Manifest><sap:Payload><sap:Name>
2009-04-02 17:39:42 Success Mail: sending a delivery error ack ...
2009-04-02 17:39:42 Success Mail: sent a delivery error ack
2009-04-02 17:39:42 Error MP: Exception caught with cause com.sap.aii.af.ra.ms.api.RecoverableException: java.io.IOException: Missing mandatory element <sap:Manifest><sap:Payload><sap:Name>
2009-04-02 17:39:42 Error Mail: error occured: com.sap.aii.af.ra.ms.api.RecoverableException: java.io.IOException: Missing mandatory element <sap:Manifest><sap:Payload><sap:Name>
2009-04-02 17:39:42 Error Exception caught by adapter framework: java.io.IOException: Missing mandatory element <sap:Manifest><sap:Payload><sap:Name>
2009-04-02 17:39:42 Error Delivery of the message to the application using connection Mail_http://sap.com/xi/XI/System failed, due to: com.sap.aii.af.ra.ms.api.RecoverableException: java.io.IOException: Missing mandatory element <sap:Manifest><sap:Payload><sap:Name>.
2009-04-02 17:39:42 Success The message status set to WAIT.
Can you please provide me help on this?
Best Regards,
Divyesh

Similar Messages

Mail Adapter - attachment file?

Hi,
I use the Mail Adapter (XIPAYLOAD) in order to send an email from XI to a Mail Server (Lotus Notes); but content of my email is inside an attachment file.
If I choose "keep attachement", then I have an attachement file with "xxxx.xml".
e.g: [email protected]
If I don't choose "keep attachment", then I have an attachement file with "xxxx.dat".
e.g: att4a5o8.dat
Is there a solution to have the content directly in the email and not inside an attachement?
And is it possible to change the file name?
Regards
Mickael.

Use the Option 'Use Mail Package'. In this case the message will be sent out inside the mail.
The mail package is a special message type you have to provide to the mail adapter. You have to do a mapping from your message to the mail package message type.
Here is a sample XSLT for creating a mail package out of any XML Message:
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
<xsl:output method="xml" indent="yes" />
<xsl:template match="*">
 <ns:Mail xmlns:ns="http://sap.com/xi/XI/Mail/30">
 <Subject>Hallo</Subject>
 <From>[email protected]</From>
 <To>[email protected]</To>
 <Content><xsl:copy-of select="/"/></Content>
 </ns:Mail>
</xsl:template>
</xsl:stylesheet>
Regards
Stefan

Mail adapter - how to dinamically change attachment file name in sending

How can I dynamically change the attachment filename when preparig email to be sent? The attachment is an invoice in XML format and I have to put the invoice number into the attachment file name.
Thanks in advance.
Giuseppe.

Hi,
Go through this docs.
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/9e6c7911-0d01-0010-1aa3-8e1bb1551f05
http://help.sap.com/saphelp_nw04/helpdata/en/6b/4493404f673028e10000000a1550b0/content.htm
Hope these bloga are useful..
/people/community.user/blog/2006/09/07/email-reporting
/people/community.user/blog/2006/09/08/email-report-as-attachment-excelword
/people/michal.krawczyk2/blog/2005/12/18/xi-sender-mail-adapter--payloadswapbean--step-by-step
/people/prasad.ulagappan2/blog/2005/06/07/mail-adapter-scenarios-150-sap-exchange-infrastructure
/people/michal.krawczyk2/blog/2005/03/07/mail-adapter-xi--how-to-implement-dynamic-mail-address
https://www.sdn.sap.com/irj/sdn/weblogs?blog=/pub/wlg/1685 [original link is broken] [original link is broken] [original link is broken]
/people/michal.krawczyk2/blog/2005/11/23/xi-html-e-mails-from-the-receiver-mail-adapter
Thanks,
Satya

Mail to File - how to read the attachment file name from the subject.

I need to use the SHeaderSUBJECT's value in the receiver file adapter's variable substitution.
This is a Mail to File scenario without design part where the attachment file name comes in the subject of the mail.
I see the below in the dynamicconfiguration section. How can i retrive the value from dynamicconfiguration section to the filename.
<SAP:DynamicConfiguration xmlns:SAP="http://sap.com/xi/XI/Message/30" xmlns:SOAP="http://schemas.xmlsoap.org/soap/envelope/" SOAP:mustUnderstand="1">
<SAP:Record namespace="http://sap.com/xi/XI/System/Mail" name="SHeaderSUBJECT">PlainAttachment.txt</SAP:Record>
</SAP:DynamicConfiguration>
Points will be rewarded.

Try to use sthg like this in a UDF :
DynamicConfiguration conf = (DynamicConfiguration) container.getTransformationParameters().getStreamTransformationConstants.DYNAMIC_CONFIGURATION);
DynamicConfigurationKey key = DynamicConfigurationKey.create(http://sap.com/xi/XI/System/Mail,SHeaderSUBJECT);
String value = conf.get(key);
or in a JAVA mapping :
DynamicConfiguration dynConf = (DynamicConfiguration) param.get(StreamTransformationConstants.DYNAMIC_CONFIGURATION);
DynamicConfigurationKey dynKey = DynamicConfigurationKey.create((http://sap.com/xi/XI/System/Mail,SHeaderSUBJECT);
String keyValue = dynConf.get(dynKey);
param is the map object from the execute() method of your mapping ...
Hope this helps
Chris
Edited by: Christophe PFERTZEL on Apr 23, 2008 11:34 AM

Mail attachment file name changes

when i send mail with attached file having english file name, mail receiver can receive it as correct file name.
But if having korean file name(ex: 우리나라.doc), recipient receives it as different file name(ie 우리나라.라.doc).
how can i solve this problem?

Is the reciever using windows? If so you can choose Edit > Attachments > Always Send Windows Friendly Attachments.

Send a mail with attached file .xls but i got file without

i tried to send a mail with attached file .xls. but i am able to send the file , we recived the file without file name. please do the same
thnaks in advance.
END-OF-SELECTION.
Populate message body text
PERFORM POPULATE_EMAIL_MESSAGE_BODY.
Send file by email as .xls speadsheet
PERFORM SEND_FILE_AS_EMAIL_ATTACHMENT
TABLES IT_MESSAGE
IT_ATTACH
USING P_EMAIL
'Example .xls documnet attachment'
'XLS'
'filename'
CHANGING GD_ERROR
GD_RECIEVER.
Instructs mail send program for SAPCONNECT to send email(rsconn01)
PERFORM INITIATE_MAIL_EXECUTE_PROGRAM.
*& Form DATA_RETRIEVAL
Retrieve data form EKPO table and populate itab it_ekko
FORM DATA_RETRIEVAL.
SELECT EBELN EBELP AEDAT MATNR
UP TO 10 ROWS
FROM EKPO
INTO TABLE IT_EKPO.
ENDFORM. " DATA_RETRIEVAL
*& Form BUILD_XLS_DATA_TABLE
Build data table for .xls document
FORM BUILD_XLS_DATA_TABLE.
CONSTANTS: CON_CRET TYPE X VALUE '0D', "OK for non Unicode
CON_TAB TYPE X VALUE '09'. "OK for non Unicode
*If you have Unicode check active in program attributes thnen you will
*need to declare constants as follows
*class cl_abap_char_utilities definition load.
*constants:
con_tab type c value cl_abap_char_utilities=>HORIZONTAL_TAB,
con_cret type c value cl_abap_char_utilities=>CR_LF.
CONCATENATE 'EBELN' 'EBELP' 'AEDAT' 'MATNR'
INTO IT_ATTACH SEPARATED BY ''.
CONCATENATE '' IT_ATTACH INTO IT_ATTACH.
APPEND IT_ATTACH.
LOOP AT IT_EKPO INTO WA_CHAREKPO.
CONCATENATE WA_CHAREKPO-EBELN WA_CHAREKPO-EBELP
WA_CHAREKPO-AEDAT WA_CHAREKPO-MATNR
INTO IT_ATTACH SEPARATED BY ''.
CONCATENATE '' IT_ATTACH INTO IT_ATTACH.
APPEND IT_ATTACH.
ENDLOOP.
ENDFORM. " BUILD_XLS_DATA_TABLE
*& Form SEND_FILE_AS_EMAIL_ATTACHMENT
Send email
FORM SEND_FILE_AS_EMAIL_ATTACHMENT TABLES PIT_MESSAGE
PIT_ATTACH
USING P_EMAIL
P_MTITLE
P_FORMAT
P_FILENAME
P_ATTDESCRIPTION
P_SENDER_ADDRESS
P_SENDER_ADDRES_TYPE
CHANGING P_ERROR
P_RECIEVER.
DATA: LD_ERROR TYPE SY-SUBRC,
LD_RECIEVER TYPE SY-SUBRC,
LD_MTITLE LIKE SODOCCHGI1-OBJ_DESCR,
LD_EMAIL LIKE SOMLRECI1-RECEIVER,
LD_FORMAT TYPE SO_OBJ_TP ,
LD_ATTDESCRIPTION TYPE SO_OBJ_NAM ,
LD_ATTFILENAME TYPE SO_OBJ_DES ,
LD_SENDER_ADDRESS LIKE SOEXTRECI1-RECEIVER,
LD_SENDER_ADDRESS_TYPE LIKE SOEXTRECI1-ADR_TYP,
LD_RECEIVER LIKE SY-SUBRC.
LD_EMAIL = P_EMAIL.
LD_MTITLE = P_MTITLE.
LD_FORMAT = P_FORMAT.
LD_ATTDESCRIPTION = P_ATTDESCRIPTION.
LD_ATTFILENAME = P_FILENAME.
LD_SENDER_ADDRESS = P_SENDER_ADDRESS.
LD_SENDER_ADDRESS_TYPE = P_SENDER_ADDRES_TYPE.
Fill the document data.
W_DOC_DATA-DOC_SIZE = 1.
Populate the subject/generic message attributes
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE .
W_DOC_DATA-SENSITIVTY = 'F'.
Fill the document data and get size of attachment
CLEAR W_DOC_DATA.
READ TABLE IT_ATTACH INDEX W_CNT.
W_DOC_DATA-DOC_SIZE =
( W_CNT - 1 ) * 255 + STRLEN( IT_ATTACH ).
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE.
W_DOC_DATA-SENSITIVTY = 'F'.
CLEAR T_ATTACHMENT.
REFRESH T_ATTACHMENT.
T_ATTACHMENT[] = PIT_ATTACH[].
Describe the body of the message
CLEAR T_PACKING_LIST.
REFRESH T_PACKING_LIST.
T_PACKING_LIST-TRANSF_BIN = SPACE.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM = 0.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE IT_MESSAGE LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE = 'RAW'.
APPEND T_PACKING_LIST.
Create attachment notification
T_PACKING_LIST-TRANSF_BIN = 'X'.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM = 1.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE T_ATTACHMENT LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE = LD_FORMAT.
T_PACKING_LIST-OBJ_DESCR = LD_ATTDESCRIPTION.
T_PACKING_LIST-OBJ_NAME = LD_ATTFILENAME.
T_PACKING_LIST-DOC_SIZE = T_PACKING_LIST-BODY_NUM * 255.
APPEND T_PACKING_LIST.
Add the recipients email address
CLEAR T_RECEIVERS.
REFRESH T_RECEIVERS.
T_RECEIVERS-RECEIVER = LD_EMAIL.
T_RECEIVERS-REC_TYPE = 'U'.
T_RECEIVERS-COM_TYPE = 'INT'.
T_RECEIVERS-NOTIF_DEL = 'X'.
T_RECEIVERS-NOTIF_NDEL = 'X'.
APPEND T_RECEIVERS.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
EXPORTING
DOCUMENT_DATA = W_DOC_DATA
PUT_IN_OUTBOX = 'X'
SENDER_ADDRESS = LD_SENDER_ADDRESS
SENDER_ADDRESS_TYPE = LD_SENDER_ADDRESS_TYPE
COMMIT_WORK = 'X'
IMPORTING
SENT_TO_ALL = W_SENT_ALL
TABLES
PACKING_LIST = T_PACKING_LIST
CONTENTS_BIN = T_ATTACHMENT
CONTENTS_TXT = IT_MESSAGE
RECEIVERS = T_RECEIVERS
EXCEPTIONS
TOO_MANY_RECEIVERS = 1
DOCUMENT_NOT_SENT = 2
DOCUMENT_TYPE_NOT_EXIST = 3
OPERATION_NO_AUTHORIZATION = 4
PARAMETER_ERROR = 5
X_ERROR = 6
ENQUEUE_ERROR = 7
OTHERS = 8.
Populate zerror return code
LD_ERROR = SY-SUBRC.
Populate zreceiver return code
LOOP AT T_RECEIVERS.
LD_RECEIVER = T_RECEIVERS-RETRN_CODE.
ENDLOOP.
ENDFORM.
*& Form INITIATE_MAIL_EXECUTE_PROGRAM
Instructs mail send program for SAPCONNECT to send email.
FORM INITIATE_MAIL_EXECUTE_PROGRAM.
WAIT UP TO 2 SECONDS.
SUBMIT RSCONN01 WITH MODE = 'INT'
WITH OUTPUT = 'X'
AND RETURN.
ENDFORM. " INITIATE_MAIL_EXECUTE_PROGRAM
*& Form POPULATE_EMAIL_MESSAGE_BODY
Populate message body text
FORM POPULATE_EMAIL_MESSAGE_BODY.
REFRESH IT_MESSAGE.
IT_MESSAGE = 'Please find attached a list test ekpo records'.
APPEND IT_MESSAGE.
ENDFORM. " POPULATE_EMAIL_MESSAGE_BODY

PERFORM SEND_FILE_AS_EMAIL_ATTACHMENT
TABLES IT_MESSAGE
IT_ATTACH
USING P_EMAIL
'Failed IDOC Analysis report'(020)
'xls'(021)
'IDOC_REP'(022)
CHANGING GD_ERROR
GD_RECIEVER.
Instructs mail send program for SAPCONNECT to send email(rsconn01)
PERFORM INITIATE_MAIL_EXECUTE_PROGRAM.
ENDFORM.                    " F_MAIL
*& Form BUILD_XLS_DATA_TABLE
Build data table for .xls document
FORM BUILD_XLS_DATA_TABLE.
*CONSTANTS: CON_CRET TYPE X VALUE '0D', "OK for non Unicode
*CON_TAB TYPE X VALUE '09'. "OK for non Unicode
*If you have Unicode check active in program attributes thnen you will
*need to declare constants as follows
*class cl_abap_char_utilities definition load.
constants:
   con_tab type c value cl_abap_char_utilities=>HORIZONTAL_TAB,
   con_cret type c value cl_abap_char_utilities=>CR_LF.
CONCATENATE text-040 text-041 text-042 text-043 text-044 text-045 text-046 text-047 text-048 text-049
INTO IT_ATTACH SEPARATED BY con_tab.
CONCATENATE con_cret IT_ATTACH INTO IT_ATTACH.
APPEND IT_ATTACH.
clear IT_ATTACH.
loop at i_final_t into w_final.
    CONCATENATE
    w_final-mestyp w_final-docnum w_final-statxt w_final-msgno w_final-rvplant w_final-kunnr w_final-vbeln w_final-credat
            w_final-cretim w_final-flag INTO IT_ATTACH SEPARATED BY con_tab.
    CONCATENATE con_cret IT_ATTACH INTO IT_ATTACH.
    APPEND IT_ATTACH.
    clear IT_attach.
endloop.
ENDFORM. " BUILD_XLS_DATA_TABLE
*& Form SEND_FILE_AS_EMAIL_ATTACHMENT
Send email
FORM SEND_FILE_AS_EMAIL_ATTACHMENT TABLES PIT_MESSAGE
PIT_ATTACH
USING P_EMAIL
P_MTITLE
P_FORMAT
P_FILENAME
P_ATTDESCRIPTION
P_SENDER_ADDRESS
P_SENDER_ADDRES_TYPE
CHANGING P_ERROR
P_RECIEVER.
DATA: LD_ERROR TYPE SY-SUBRC,
LD_RECIEVER TYPE SY-SUBRC,
LD_MTITLE LIKE SODOCCHGI1-OBJ_DESCR,
LD_EMAIL LIKE SOMLRECI1-RECEIVER,
LD_FORMAT TYPE SO_OBJ_TP ,
LD_ATTDESCRIPTION TYPE SO_OBJ_NAM ,
LD_ATTFILENAME TYPE SO_OBJ_DES ,
LD_SENDER_ADDRESS LIKE SOEXTRECI1-RECEIVER,
LD_SENDER_ADDRESS_TYPE LIKE SOEXTRECI1-ADR_TYP,
LD_RECEIVER LIKE SY-SUBRC.
LD_EMAIL = P_EMAIL.
LD_MTITLE = P_MTITLE.
LD_FORMAT = P_FORMAT.
LD_ATTDESCRIPTION = P_ATTDESCRIPTION.
LD_ATTFILENAME = P_FILENAME.
LD_SENDER_ADDRESS = P_SENDER_ADDRESS.
LD_SENDER_ADDRESS_TYPE = P_SENDER_ADDRES_TYPE.
Fill the document data.
W_DOC_DATA-DOC_SIZE = 1.
Populate the subject/generic message attributes
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE .
W_DOC_DATA-SENSITIVTY = 'F'.
Fill the document data and get size of attachment
CLEAR W_DOC_DATA.
READ TABLE IT_ATTACH INDEX W_CNT.
W_DOC_DATA-DOC_SIZE =
( W_CNT - 1 ) * 255 + STRLEN( IT_ATTACH ).
W_DOC_DATA-OBJ_LANGU = SY-LANGU.
W_DOC_DATA-OBJ_NAME = 'SAPRPT'.
W_DOC_DATA-OBJ_DESCR = LD_MTITLE.
W_DOC_DATA-SENSITIVTY = 'F'.
CLEAR T_ATTACHMENT.
REFRESH T_ATTACHMENT.
T_ATTACHMENT[] = PIT_ATTACH[].
Describe the body of the message
CLEAR T_PACKING_LIST.
REFRESH T_PACKING_LIST.
T_PACKING_LIST-TRANSF_BIN = SPACE.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM = 0.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE IT_MESSAGE LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE = 'RAW'.
APPEND T_PACKING_LIST.
Create attachment notification
T_PACKING_LIST-TRANSF_BIN = 'X'.
T_PACKING_LIST-HEAD_START = 1.
T_PACKING_LIST-HEAD_NUM = 1.
T_PACKING_LIST-BODY_START = 1.
DESCRIBE TABLE T_ATTACHMENT LINES T_PACKING_LIST-BODY_NUM.
T_PACKING_LIST-DOC_TYPE = LD_FORMAT.
T_PACKING_LIST-OBJ_DESCR = LD_ATTDESCRIPTION.
T_PACKING_LIST-OBJ_NAME = LD_ATTFILENAME.
T_PACKING_LIST-DOC_SIZE = T_PACKING_LIST-BODY_NUM * 255.
APPEND T_PACKING_LIST.
Add the recipients email address
CLEAR T_RECEIVERS.
REFRESH T_RECEIVERS.
T_RECEIVERS-RECEIVER = LD_EMAIL.
T_RECEIVERS-REC_TYPE = 'U'.
T_RECEIVERS-COM_TYPE = 'INT'.
T_RECEIVERS-NOTIF_DEL = 'X'.
T_RECEIVERS-NOTIF_NDEL = 'X'.
APPEND T_RECEIVERS.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
    EXPORTING
      DOCUMENT_DATA              = W_DOC_DATA
      PUT_IN_OUTBOX              = 'X'
      SENDER_ADDRESS             = LD_SENDER_ADDRESS
      SENDER_ADDRESS_TYPE        = LD_SENDER_ADDRESS_TYPE
      COMMIT_WORK                = 'X'
    IMPORTING
      SENT_TO_ALL                = W_SENT_ALL
    TABLES
      PACKING_LIST               = T_PACKING_LIST
      CONTENTS_BIN               = T_ATTACHMENT
      CONTENTS_TXT               = IT_MESSAGE
      RECEIVERS                  = T_RECEIVERS
    EXCEPTIONS
      TOO_MANY_RECEIVERS         = 1
      DOCUMENT_NOT_SENT          = 2
      DOCUMENT_TYPE_NOT_EXIST    = 3
      OPERATION_NO_AUTHORIZATION = 4
      PARAMETER_ERROR            = 5
      X_ERROR                    = 6
      ENQUEUE_ERROR              = 7
      OTHERS                     = 8.
Populate zerror return code
LD_ERROR = SY-SUBRC.
Populate zreceiver return code
LOOP AT T_RECEIVERS.
    LD_RECEIVER = T_RECEIVERS-RETRN_CODE.
ENDLOOP.
ENDFORM.                    "SEND_FILE_AS_EMAIL_ATTACHMENT
*& Form INITIATE_MAIL_EXECUTE_PROGRAM
Instructs mail send program for SAPCONNECT to send email.
FORM INITIATE_MAIL_EXECUTE_PROGRAM.
WAIT UP TO 2 SECONDS.
SUBMIT RSCONN01 WITH MODE = 'INT'
WITH OUTPUT = 'X'
AND RETURN.
ENDFORM. " INITIATE_MAIL_EXECUTE_PROGRAM
*& Form POPULATE_EMAIL_MESSAGE_BODY
Populate message body text
FORM POPULATE_EMAIL_MESSAGE_BODY.
data: l1(99)    type c,
         l2(15)    type c,
         lt_message         type standard table of solisti1,
         ls_message      like line of lt_message.
clear ls_message.
l1 = 'Dear'(007).
l2 = 'Sir/Madam'(008).
concatenate l1 l2 ',' into
ls_message-line separated by space.
append ls_message to lt_message.
*insert Blank Line
clear ls_message.
ls_message-line = space.
append ls_message to lt_message.
*Assign Message text
clear ls_message.
concatenate text-011
              text-012
              into ls_message-line separated by space.
append ls_message to lt_message.
*insert Blank Line
clear ls_message.
ls_message-line = space.
append ls_message to lt_message.
*Assign Message text
clear ls_message.
concatenate text-013
              text-014
              text-015
              into ls_message-line separated by space.
append ls_message to lt_message.
concatenate text-016
              text-017
              into ls_message-line separated by space.
append ls_message to lt_message.
*insert Blank Line
clear ls_message.
ls_message-line = space.
append ls_message to lt_message.
ls_message-line = text-018.
append ls_message to lt_message.
ls_message-line = text-019.
append ls_message to lt_message.
clear: ls_message.
REFRESH IT_MESSAGE.
it_message[] = lt_message[].
APPEND IT_MESSAGE.
ENDFORM. " POPULATE_EMAIL_MESSAGE_BODY

Javamail API doesn't support special characters in attachment file name

Hi,
We are using Java Mail API to retrieve the attachment's file name, but it sometimes returns the file name as junk character (if the attachment contains special characters) and it is not able to return original file name for some attachments:
Our code sample :
void getFileName(Part part) {
String fname=null;
fname = part.getFileName();
Actually the problem is with the attachment file name which contains special character. For example below is the attachment file name (please find the sample attached file which is causing this issue):
Sample – 1234abc.doc
From above you could see the file name contains a special character (Sample – 1234abc.doc), i.e. The character ‘–’ is not a regular hyphen character, it’s a special character. Hence the Java mail API returns the name as below:
Sample ? 1234abc.doc
So the special character is being replaced with ‘?’ symbol. But if I store this file in local folder and try reading the file name using Java IO packages, it returns the file name without adding ‘?’ symbol.
Is there any way to handle such kind of special characters in Mail API?
Regards,
Vinodh

We dealt with this issue in a private email conversation.
JavaMail is returning the correct data for the filename. The problem is in the way the filename is being displayed.

Issue with attachment file name

Hi All,
This is about an issue with attachment file name:
we have a scenario wherein we have payload with attachments ...(attachments can be any doc ,pdf) , problem is main document is comming with messageid.sap.com and thats normal but attachments are comming with file names for example something.pdf or something.doc or something.txt ...this is failing in adapter as it expects same name as u have in main document...anybody have any idea to get through this issue...
Regards
kiran

we have a scenario wherein we have payload with attachments ...(attachments can be any doc ,pdf) , problem is main document is comming with messageid.sap.com and thats normal but attachments are comming with file names for example something.pdf or something.doc or something.txt ...this is failing in adapter as it expects same name as u have in main document...anybody have any idea to get through this issue...
- <SAP:Payload xlink:href="cid:payload-4CED452F17C601BDE10080000A492050---sap.com">
<SAP:Name>1 .Header1.txt</SAP:Name>
Error we are getting is
Cannot cast 'Header' to boolean] in class com.sap.aii.mappingtool.flib7.NodeFunctions method createIf[Header, com.sap.aii.mappingtool.tf7.rt.Context---27a73bfa]
So we have to change the File name Header1.txt to something which we can cast to creatif....(we cannot tell the sendr to change the file name as its is set already)
Thanks for interste and assisting
Regards
Kiran

Need attachment file name which had sent or received in entire days.

Hi Friends
I need your help for getting information on exchange mailbox user who had sent or received mails along with attachment file name for entire day.
Basically I get the information of entire mails which had received or sent in all days but I am unable to get the information about attachment file name.
Please do the needful.
Regards, Md Ehteshamuddin Khan All the opinions expressed here is mine. This posting is provided "AS IS" with no warranties or guarantees and confers no rights.

Hi,
Based on my knowledge, Exchange has no built-in feature to get the attachment statistics report. But you can check if EWS can achieve it.
About issues related to EWS, actually, we have a dedicated support team regarding the Exchange Server Development. I recommend you ask your question on our Exchange Server Development forum which is staffed by more experts specializing in this kind of problems.
Thanks for your understanding.
For your convenience:
http://social.technet.microsoft.com/Forums/en-US/exchangesvrdevelopment/threads
Hope this can be helpful.
Best regards,
Amy Wang
TechNet Community Support

Chnage attachment file name

We have Oracle 10g application server ,i used rwlicent to send report as email and it works fine the only problem that i couldnot controll the attachment file name,
is it possible to change the file name?
any help so appritiated .
Regards

Are you using a distribution.xml for the emailed reports? If not you can pass destination=distribution.xml on your rwclient call.
distribution.xml:
<destinations>
<foreach>
<mail id="a6" to="[email protected]" subject="Personnel Reports">
 <attach format="pdf" name="attach.pdf" srcType="report" instance="this">
 <include src="mainSection"/>
 </attach>
 <attach format="rtf" name="attach.rtf" srcType="report" instance="this">
 <include src="trailerSection"/>
 </attach>
</mail>
</foreach>
</destinations>You can change the attach.rtf to be a parameter value using &<parametername> syntax. Look here for details on using the distribution.xml file.

Decode attachment file name RFC 2231

Hello,
according to the [RFC 2231|http://tools.ietf.org/html/rfc2231] , the headers are encoded to something like
From: =?US-ASCII*EN?Q?Keith_Moore?= <[email protected]>
How can decode such a string, in Java ? I've found only [this implementation|http://svn.apache.org/repos/asf/geronimo/specs/tags/geronimo-javamail_1.4_spec-1.5/src/main/java/org/apache/geronimo/mail/util/RFC2231Encoder.java] from Apache Geronimo. Are there other implementations ?
Thanks,
T.

Your subject talks about attachment file names, but your example uses the From header.
For attachment file names and other parameters, set the property mail.mime.decodeparameters
to "true". See the javadocs for the javax.mail.internet package for the list of properties you can set.
Unfortunately, JavaMail doesn't support the specification of a language ("EN") in addition to a charset
("US-ASCII") as in your example. That's a bug that I'll need to fix.

Sending mail without attachment file

Hi Sapfans:
I would like to send mail without attachment file, just a notice,
needing multiple receiver, can change the mail title,
Which function shoud I use?
I just found out sending mail with attachment file there,
Thanks a lot!

Hi Alchie,
Please take a look at my example below. It sens e-mail to multiple recipients without attachments.
FUNCTION-POOL zts0001 MESSAGE-ID sv.
INCLUDE lsvimdat . "general data decl.
INCLUDE lzts0001t00 . "view rel. data dcl.
*/ Author: Aris Hidalgo
*/ Created on: September 7, 2006
*/ Purpose of program: This will send out e-mails to specified users in
*/ custom table ZSHIPTO_EMAIL whenever records have been deleted or
*/ modified via the maintenance view of ZTS0001. The changes will also
*/ be reflected in custom table ZTS_STPGEOLOC.
TABLES: zts_stpgeoloc,
 zshipto_email,
 kna1.
FIELD-SYMBOLS: <fs_old_total> TYPE ANY.
* CLASS lcl_main DEFINITION ABSTRACT
CLASS lcl_main DEFINITION ABSTRACT.
PUBLIC SECTION.
 TYPES: BEGIN OF t_zts0001_old,
 kunnr TYPE zts0001-kunnr,
 cdseq TYPE zts0001-cdseq,
 zaddress TYPE zts0001-zaddress,
 zcperson TYPE zts0001-zcperson,
 zcnumber TYPE zts0001-zcnumber,
 END OF t_zts0001_old.
 TYPES: BEGIN OF t_zts0001_new,
 kunnr TYPE zts0001-kunnr,
 cdseq TYPE zts0001-cdseq,
 zaddress TYPE zts0001-zaddress,
 zcperson TYPE zts0001-zcperson,
 zcnumber TYPE zts0001-zcnumber,
 END OF t_zts0001_new.
 TYPES: BEGIN OF t_zts_stpgeoloc,
 kunnr TYPE zts_stpgeoloc-kunnr,
 cdseq TYPE zts_stpgeoloc-cdseq,
 zaddress TYPE zts_stpgeoloc-zaddress,
 zcperson TYPE zts_stpgeoloc-zcperson,
 zcnumber TYPE zts_stpgeoloc-zcnumber,
 END OF t_zts_stpgeoloc.
 TYPES: BEGIN OF t_del_entries,
 kunnr TYPE zts0001-kunnr,
 cdseq TYPE zts0001-cdseq,
 zaddress TYPE zts0001-zaddress,
 zcperson TYPE zts0001-zcperson,
 zcnumber TYPE zts0001-zcnumber,
 name1 TYPE kna1-name1,
 END OF t_del_entries.
 TYPES: BEGIN OF t_modified_entries,
 kunnr TYPE zts0001-kunnr,
 cdseq TYPE zts0001-cdseq,
 old_address TYPE zts0001-zaddress,
 new_address TYPE zts0001-zaddress,
 old_person TYPE zts0001-zcperson,
 new_person TYPE zts0001-zcperson,
 old_number TYPE zts0001-zcnumber,
 new_number TYPE zts0001-zcnumber,
 name1 TYPE kna1-name1,
 END OF t_modified_entries.
 DATA: gt_zts0001_old TYPE STANDARD TABLE OF t_zts0001_old,
 gt_zts0001_new TYPE HASHED TABLE OF t_zts0001_new
 WITH UNIQUE KEY kunnr cdseq,
 gt_zts_stpgeoloc TYPE STANDARD TABLE OF t_zts_stpgeoloc,
 gt_del_entries TYPE STANDARD TABLE OF t_del_entries,
 gt_modified_entries TYPE STANDARD TABLE OF t_modified_entries,
 gt_zshipto_email TYPE STANDARD TABLE OF zshipto_email,
 t_maildata TYPE sodocchgi1,
 gt_mailtxt TYPE STANDARD TABLE OF solisti1,
 gt_mailrec TYPE STANDARD TABLE OF somlreci1.
 DATA: v_old_total TYPE i,
 v_new_total TYPE i,
 v_flag(1) TYPE c,
 v_counter(1) TYPE c,
 v_contents(255) TYPE c.
ENDCLASS.
* CLASS lcl_get_old_recs DEFINITION
CLASS lcl_get_old_recs DEFINITION INHERITING FROM lcl_main.
PUBLIC SECTION.
 METHODS: export_old_recs.
ENDCLASS.
* CLASS lcl_get_old_recs IMPLEMENTATION
CLASS lcl_get_old_recs IMPLEMENTATION.
METHOD export_old_recs.
 SELECT kunnr cdseq zaddress zcperson zcnumber
 FROM zts0001
 INTO TABLE gt_zts0001_old.
 v_old_total = sy-dbcnt.
 ASSIGN v_old_total TO <fs_old_total>.
 EXPORT gt_zts0001_old = gt_zts0001_old TO MEMORY ID 'AVH'.
 CLEAR gt_zts0001_old. REFRESH gt_zts0001_old.
ENDMETHOD.
ENDCLASS.
* CLASS lcl_old_and_new DEFINITION
CLASS lcl_old_and_new DEFINITION INHERITING FROM lcl_main.
PUBLIC SECTION.
 METHODS: compare_old_and_new.
ENDCLASS.
* CLASS lcl_old_and_new IMPLEMENTATION
CLASS lcl_old_and_new IMPLEMENTATION.
METHOD compare_old_and_new.
 DATA: wa_del_entries LIKE LINE OF gt_del_entries.
 FIELD-SYMBOLS: <fs_old> LIKE LINE OF gt_zts0001_old,
 <fs_new> LIKE LINE OF gt_zts0001_new.
 SELECT kunnr cdseq zaddress zcperson zcnumber
 FROM zts0001
 INTO TABLE gt_zts0001_new.
 v_new_total = sy-dbcnt.
 IF v_new_total <> <fs_old_total>.
 IMPORT gt_zts0001_old = gt_zts0001_old FROM MEMORY ID 'AVH'.
 LOOP AT gt_zts0001_old ASSIGNING <fs_old>.
 READ TABLE gt_zts0001_new WITH TABLE KEY kunnr = <fs_old>-kunnr
 cdseq = <fs_old>-cdseq
 ASSIGNING <fs_new>.
 IF sy-subrc <> 0.
 MOVE-CORRESPONDING <fs_old> TO wa_del_entries.
 APPEND wa_del_entries TO gt_del_entries.
 CLEAR wa_del_entries.
 DELETE FROM zts_stpgeoloc
 WHERE kunnr = <fs_old>-kunnr
 AND cdseq = <fs_old>-cdseq.
 ENDIF.
 ENDLOOP.
 IF NOT gt_del_entries[] IS INITIAL.
 EXPORT gt_del_entries = gt_del_entries TO MEMORY ID 'DEL'.
 ENDIF.
 REFRESH gt_zts0001_old.
 ENDIF.
ENDMETHOD.
ENDCLASS.
* CLASS lcl_check_changes DEFINITION
CLASS lcl_check_changes DEFINITION INHERITING FROM lcl_main.
PUBLIC SECTION.
 METHODS: check_for_changes.
ENDCLASS.
* CLASS lcl_check_changes IMPLEMENTATION
CLASS lcl_check_changes IMPLEMENTATION.
METHOD check_for_changes.
 TYPES: BEGIN OF t_zts_stpgeoloc,
 mandt TYPE zts_stpgeoloc-mandt,
 kunnr TYPE zts_stpgeoloc-kunnr,
 cdseq TYPE zts_stpgeoloc-cdseq,
 zcgeoloc TYPE zts_stpgeoloc-zcgeoloc,
 zaddress TYPE zts_stpgeoloc-zaddress,
 zcperson TYPE zts_stpgeoloc-zcperson,
 zcnumber TYPE zts_stpgeoloc-zcnumber,
 END OF t_zts_stpgeoloc.
 DATA: wa_modified_entries LIKE LINE OF gt_modified_entries,
 lt_zts_stpgeoloc TYPE HASHED TABLE OF t_zts_stpgeoloc
 WITH UNIQUE KEY kunnr cdseq,
 wa_zts_stpgeoloc LIKE LINE OF lt_zts_stpgeoloc.
 FIELD-SYMBOLS: <fs_zts0001_old> LIKE LINE OF gt_zts0001_old,
 <fs_zts0001_new> LIKE LINE OF gt_zts0001_new.
 IMPORT gt_zts0001_old = gt_zts0001_old FROM MEMORY ID 'AVH'.
 SELECT kunnr cdseq zcgeoloc zaddress zcperson zcnumber
 FROM zts_stpgeoloc
 INTO CORRESPONDING FIELDS OF TABLE lt_zts_stpgeoloc.
 SELECT kunnr cdseq zaddress zcperson zcnumber
 FROM zts0001
 INTO TABLE gt_zts0001_new.
 LOOP AT gt_zts0001_old ASSIGNING <fs_zts0001_old>.
 READ TABLE gt_zts0001_new WITH TABLE KEY
 kunnr = <fs_zts0001_old>-kunnr
 cdseq = <fs_zts0001_old>-cdseq
 ASSIGNING <fs_zts0001_new>.
 IF sy-subrc = 0.
 READ TABLE lt_zts_stpgeoloc WITH TABLE KEY
 kunnr = <fs_zts0001_new>-kunnr
 cdseq = <fs_zts0001_new>-cdseq
 INTO wa_zts_stpgeoloc.
 IF sy-subrc = 0.
 wa_zts_stpgeoloc-mandt = sy-mandt.
 wa_zts_stpgeoloc-kunnr = <fs_zts0001_new>-kunnr.
 wa_zts_stpgeoloc-cdseq = <fs_zts0001_new>-cdseq.
 wa_zts_stpgeoloc-zcgeoloc = space.
 wa_zts_stpgeoloc-zaddress = <fs_zts0001_new>-zaddress.
 wa_zts_stpgeoloc-zcperson = <fs_zts0001_new>-zcperson.
 wa_zts_stpgeoloc-zcnumber = <fs_zts0001_new>-zcnumber.
 MODIFY zts_stpgeoloc FROM wa_zts_stpgeoloc.
 COMMIT WORK AND WAIT.
 ENDIF.
* address
 IF <fs_zts0001_old>-zaddress <> <fs_zts0001_new>-zaddress.
 MOVE: <fs_zts0001_new>-kunnr TO wa_modified_entries-kunnr,
 <fs_zts0001_new>-cdseq TO wa_modified_entries-cdseq,
 <fs_zts0001_old>-zaddress TO wa_modified_entries-old_address,
 <fs_zts0001_new>-zaddress TO wa_modified_entries-new_address.
 v_flag = 1.
 ENDIF.
* person
 IF <fs_zts0001_old>-zcperson <> <fs_zts0001_new>-zcperson.
 MOVE: <fs_zts0001_new>-kunnr TO wa_modified_entries-kunnr,
 <fs_zts0001_new>-cdseq TO wa_modified_entries-cdseq,
 <fs_zts0001_old>-zcperson TO wa_modified_entries-old_person,
 <fs_zts0001_new>-zcperson TO wa_modified_entries-new_person.
 v_flag = 1.
 ENDIF.
* number
 IF <fs_zts0001_old>-zcnumber <> <fs_zts0001_new>-zcnumber.
 MOVE: <fs_zts0001_new>-kunnr TO wa_modified_entries-kunnr,
 <fs_zts0001_new>-cdseq TO wa_modified_entries-cdseq,
 <fs_zts0001_old>-zcnumber TO wa_modified_entries-old_number,
 <fs_zts0001_new>-zcnumber TO wa_modified_entries-new_number.
 v_flag = 1.
 ENDIF.
 ENDIF.
 IF v_flag = 1.
 APPEND wa_modified_entries TO gt_modified_entries.
 CLEAR wa_modified_entries.
 ENDIF.
* update ZTS_STPGEOLOC based from the modified records in ZTS0001
 IF v_flag = 1.
 CLEAR v_flag.
 UPDATE zts_stpgeoloc SET zaddress = <fs_zts0001_new>-zaddress
 zcperson = <fs_zts0001_new>-zcperson
 zcnumber = <fs_zts0001_new>-zcnumber
 WHERE kunnr = <fs_zts0001_new>-kunnr
 AND cdseq = <fs_zts0001_new>-cdseq.
 ENDIF.
 ENDLOOP.
 IF NOT gt_modified_entries[] IS INITIAL.
 EXPORT gt_modified_entries = gt_modified_entries TO MEMORY ID 'MOD'
 ENDIF.
ENDMETHOD.
ENDCLASS.
* CLASS lcl_messages DEFINITION
CLASS lcl_messages DEFINITION INHERITING FROM lcl_main.
PUBLIC SECTION.
 METHODS: create_message.
ENDCLASS.
* CLASS lcl_messages IMPLEMENTATION
CLASS lcl_messages IMPLEMENTATION.
METHOD create_message.
 FIELD-SYMBOLS: <fs_email> LIKE LINE OF gt_zshipto_email,
 <fs_del> LIKE LINE OF gt_del_entries,
 <fs_mod> LIKE LINE OF gt_modified_entries.
 DATA: wa_mailtxt LIKE LINE OF gt_mailtxt,
 wa_mailrec LIKE LINE OF gt_mailrec.
 IMPORT gt_modified_entries = gt_modified_entries
 FROM MEMORY ID 'MOD'.
 IMPORT gt_del_entries = gt_del_entries FROM MEMORY ID 'DEL'.
 SELECT * FROM zshipto_email INTO TABLE gt_zshipto_email
 WHERE zevent = '2'.
 IF sy-dbcnt > 0.
*/ routine for records that were deleted
 IF NOT gt_del_entries[] IS INITIAL.
 t_maildata-obj_name = 'Record Deleted in table ZTS0001'.
 t_maildata-obj_descr = 'Record Deleted in table ZTS0001'.
 t_maildata-obj_langu = sy-langu.
 CLEAR: v_flag, v_counter.
 LOOP AT gt_zshipto_email ASSIGNING <fs_email>.
 LOOP AT gt_del_entries ASSIGNING <fs_del>.
* get name of dealer
 SELECT SINGLE name1 FROM kna1
 INTO <fs_del>-name1
 WHERE kunnr = <fs_del>-kunnr.
 IF v_counter IS INITIAL.
 CONCATENATE: 'FYI: The ff record/s were deleted in tables'
 'ZTS0001 and ZTS_STPGEOLOC by user' sy-uname
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 ENDIF.
 APPEND wa_mailtxt TO gt_mailtxt. "Extra space for message
 CONCATENATE: 'Dealer :' <fs_del>-kunnr '-'
 <fs_del>-name1
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Ship-To:' <fs_del>-cdseq
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Address:' <fs_del>-zaddress
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Contact person:' <fs_del>-zcperson
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Contact number:' <fs_del>-zcnumber
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 v_counter = 1.
 ENDLOOP.
 wa_mailrec-receiver = <fs_email>-zemail.
 wa_mailrec-rec_type = 'U'.
 APPEND wa_mailrec TO gt_mailrec.
 CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
 EXPORTING
 document_data = t_maildata
 document_type = 'RAW'
 put_in_outbox = 'X'
* commit_work = 'X'
 TABLES
* object_header = mailtxt
 object_content = gt_mailtxt
 receivers = gt_mailrec
 EXCEPTIONS
 too_many_receivers = 1
 document_not_sent = 2
 document_type_not_exist = 3
 operation_no_authorization = 4
 parameter_error = 5
 x_error = 6
 enqueue_error = 7
 OTHERS = 8.
 IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
 ENDIF.
 CLEAR: wa_mailtxt, wa_mailrec.
 REFRESH: gt_mailtxt, gt_mailrec.
 ENDLOOP.
 ENDIF.
 CLEAR wa_mailtxt.
 REFRESH gt_mailtxt.
*/ routine for records that were modified
 IF NOT gt_modified_entries[] IS INITIAL.
 CLEAR t_maildata.
 t_maildata-obj_name = 'Record changed in table ZTS0001'.
 t_maildata-obj_descr = 'Record changed in table ZTS0001'.
 t_maildata-obj_langu = sy-langu.
 CLEAR v_counter.
 LOOP AT gt_zshipto_email ASSIGNING <fs_email>.
 CONCATENATE: 'FYI: The ff records were changed in tables'
 'ZTS0001 and ZTS_STPGEOLOC by user' sy-uname
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 LOOP AT gt_modified_entries ASSIGNING <fs_mod>.
* get name of dealer
 SELECT SINGLE name1 FROM kna1
 INTO <fs_mod>-name1
 WHERE kunnr = <fs_mod>-kunnr.
 APPEND wa_mailtxt TO gt_mailtxt.
 CONCATENATE: 'Dealer :' <fs_mod>-kunnr '-'
 <fs_mod>-name1
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Ship-To:' <fs_mod>-cdseq
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
* address
 IF NOT <fs_mod>-old_address IS INITIAL AND
 NOT <fs_mod>-new_address IS INITIAL.
 CONCATENATE: 'Address from:' <fs_mod>-old_address
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Address to :' <fs_mod>-new_address
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 ENDIF.
* person
 IF NOT <fs_mod>-old_person IS INITIAL AND
 NOT <fs_mod>-new_person IS INITIAL.
 CONCATENATE: 'Contact person from:'
 <fs_mod>-old_person
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Contact person to :'
 <fs_mod>-new_person
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 ENDIF.
* number
 IF NOT <fs_mod>-old_number IS INITIAL AND
 NOT <fs_mod>-new_number IS INITIAL.
 CONCATENATE: 'Contact number from:'
 <fs_mod>-old_number
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 CONCATENATE: 'Contact number to :'
 <fs_mod>-new_number
 INTO v_contents
 SEPARATED BY space.
 wa_mailtxt-line = v_contents.
 APPEND wa_mailtxt TO gt_mailtxt.
 CLEAR: wa_mailtxt, v_contents.
 ENDIF.
 ENDLOOP.
 wa_mailrec-receiver = <fs_email>-zemail.
 wa_mailrec-rec_type = 'U'.
 APPEND wa_mailrec TO gt_mailrec.
 CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
 EXPORTING
 document_data = t_maildata
 document_type = 'RAW'
 put_in_outbox = 'X'
* commit_work = 'X'
 TABLES
* object_header = mailtxt
 object_content = gt_mailtxt
 receivers = gt_mailrec
 EXCEPTIONS
 too_many_receivers = 1
 document_not_sent = 2
 document_type_not_exist = 3
 operation_no_authorization = 4
 parameter_error = 5
 x_error = 6
 enqueue_error = 7
 OTHERS = 8.
 IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
 ENDIF.
 CLEAR: wa_mailtxt, wa_mailrec.
 REFRESH: gt_mailtxt, gt_mailrec.
 ENDLOOP.
 ENDIF.
 ENDIF.
 FREE MEMORY ID 'AVH'.
 FREE MEMORY ID 'DEL'.
 FREE MEMORY ID 'MOD'.
ENDMETHOD.
ENDCLASS.
START-OF-SELECTION.
* FORM get_orig_contents_of_zts0001 *
*/ before saving the data in the database
FORM get_orig_contents_of_zts0001.
DATA: get_old_recs TYPE REF TO lcl_get_old_recs.
CREATE OBJECT get_old_recs.
CALL METHOD get_old_recs->export_old_recs.
ENDFORM.
* FORM get_rev_contents_of_zts0001 *
*/ after saving the data in the database
FORM get_rev_contents_of_zts0001.
DATA: old_and_new TYPE REF TO lcl_old_and_new,
 check_changes TYPE REF TO lcl_check_changes,
 messages TYPE REF TO lcl_messages.
CREATE OBJECT: old_and_new, check_changes, messages.
CALL METHOD old_and_new->compare_old_and_new.
CALL METHOD check_changes->check_for_changes.
CALL METHOD messages->create_message.
ENDFORM.
* FORM move_latest_date_and_user *
FORM move_latest_date_and_user.
zts0001-zcreated_by = sy-uname.
zts0001-zchanged_date = sy-datum.
ENDFORM.
Hope it helps...
P.S. Please award points if it helps...

Send mail with attached file without using Repository

Hello,
I want to know if have a way to Send mail with attached file without using Repository.
Regards
Elad

Elad,
Check this article where a image has been picked by the file adapter and sent as an attachment to the mail adapter.
<a href="https://www.sdn.sap.comhttp://www.sdn.sap.comhttp://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/6d967fbc-0a01-0010-4fb4-91c6d38c5816">Sending an Image File Through XI in a File-to-Mail Scenario</a>
For how to proceed without integration repository content look into this blog,
<a href="/people/william.li/blog/2006/09/08/how-to-send-any-data-even-binary-through-xi-without-using-the-integration-repository">How to send any data (even binary) through XI, without using the Integration Repository</a>
Combining these 2 you have the solution.
Regards
Bhavesh

I have a scenario. Import IDOC into PI and PI transform IDOC to Excel. Using mail adapter attach that Excel using pi and send to customer. Can you please help me on the same?

HI Experts,
I have a scenario. Import IDOC into PI and PI transform IDOC to Excel. Using mail adapter attach that Excel using pi and send to vendor. Can you please help me on the same?
Thanks
SaiSreevastav

Hi Sai,
you can use XSLT or java mapping or adapter module to convert IDOC xml to XLS. Please refer the below blog
Convert incoming XML to Excel or Excel XML – Part 1 - XSLT Way
Convert incoming XML to Excel Sheet Part 2 – Adapter Module way
Convert incoming XML to Excel Sheet
then after converting to Excel, you can use the payloadswap bean in mail adapter
XI: Sender mail adapter - PayloadSwapBean - Step by step
regards,
Harish

Convert Screen(spool) to PDF file sending mail with attach file

Hi :
I'd like convert spool list to pdf and sending file...
so, I read thread about spool convert to PDF before,
and know how to convert Spool to PDF file and send mail with attach file.
but I have a problem.
my solution as:
step 1. Call function: "CONVERT_ABAPSPOOLJOB_2_PDF"
step 2. Call function: "SO_NEW_DOCUMENT_ATT_SEND_API1"
then, I got a mail with attached PDF file, but the PDF file display limited 255 line.( SO_NEW_DOCUMENT_ATT_SEND_API1 limited)
I want to showing word is wider that 255.
and then I find a manual method as:
After program finished.
Function Menu -> system -> List -> Send
use Prog: "Create Document and Send"
I use this prog sending mail and attached file ,
PDF file do NOT have 255 word limit !
finally. my question is, If I want sending mail as Prog: "Create Document and Send", how to do?
which Function I have to use?...
Please help me, Thanks!

Hi,
Check this sample code of sending spool as attachment to an email address..
Parameters.
PARAMETERS: p_email(50) LOWER CASE.
PARAMETERS: p_spool LIKE tsp01-rqident.
Data declarations.
DATA: plist LIKE sopcklsti1 OCCURS 2 WITH HEADER LINE.
DATA: document_data LIKE sodocchgi1.
DATA: so_ali LIKE soli OCCURS 100 WITH HEADER LINE.
DATA: real_type LIKE soodk-objtp.
DATA: sp_lang LIKE tst01-dlang.
DATA: line_size TYPE i VALUE 255.
DATA: v_name LIKE soextreci1-receiver.
DATA rec_tab LIKE somlreci1 OCCURS 1 WITH HEADER LINE.
Get the spool data.
CALL FUNCTION 'RSPO_RETURN_SPOOLJOB'
 EXPORTING
 rqident = p_spool
 first_line = 1
 last_line = 0
 desired_type = ' '
 IMPORTING
 real_type = real_type
 sp_lang = sp_lang
 TABLES
 buffer = so_ali
 EXCEPTIONS
 no_such_job = 1
 job_contains_no_data = 2
 selection_empty = 3
 no_permission = 4
 can_not_access = 5
 read_error = 6
 type_no_match = 7
 OTHERS = 8.
IF sy-subrc <> 0.
MESSAGE s208(00) WITH 'Error'.
LEAVE LIST-PROCESSING.
ENDIF.
Prepare the data.
plist-transf_bin = 'X'.
plist-head_start = 0.
plist-head_num = 0.
plist-body_start = 0.
plist-body_num = 0.
plist-doc_type = 'RAW'.
plist-obj_descr = 'Test ALV'.
APPEND plist.
plist-transf_bin = 'X'.
plist-head_start = 0.
plist-head_num = 0.
plist-body_start = 1.
DESCRIBE TABLE so_ali LINES plist-body_num.
plist-doc_type = real_type.
Get the size.
READ TABLE so_ali INDEX plist-body_num.
plist-doc_size = ( plist-body_num - 1 ) * line_size
 + STRLEN( so_ali ).
APPEND plist.
Move the receiver address.
MOVE: p_email TO rec_tab-receiver,
 'U' TO rec_tab-rec_type.
APPEND rec_tab.
IF NOT sp_lang IS INITIAL.
document_data-obj_langu = sp_lang.
ELSE.
document_data-obj_langu = sy-langu.
ENDIF.
v_name = sy-uname.
Send the email.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
 EXPORTING
 document_data = document_data
 sender_address = v_name
 sender_address_type = 'B'
 TABLES
 packing_list = plist
 contents_bin = so_ali
 receivers = rec_tab
 EXCEPTIONS
 too_many_receivers = 1
 document_not_sent = 2
 document_type_not_exist = 3
 operation_no_authorization = 4
 parameter_error = 5
 x_error = 6
 enqueue_error = 7
 OTHERS = 8.
IF sy-subrc <> 0.
MESSAGE e208(00) WITH 'Error'.
ENDIF.
COMMIT WORK.
Send the email immediately.
SUBMIT rsconn01
WITH mode = 'INT'
AND RETURN.
Thanks,
Naren

Mail adapter- Attachment file name of scheme ddmm

Similar Messages

Maybe you are looking for