External Mail budget exceed

Hi at all,
at the moment i know the possibility to send an internal mail to SAP office. Now i want to send an external mail but i cannot find the possibility to do this...
Where do I have to define that the mail has to go to extern and the external email address? In OPS6 is only the field for intern username.
Regards,
Timo

But here you send the mail via external program.
We want to send the mail to lotus notes by exceeding the budget.
There you can only find the possibility to send a mail to the responsible person during defining the tolerance limits. But this mail is an internal mail in SAP to Business Workplace.
The email address in SU01 is maintained but although i get only the mail to SU01.
Thanks.

Similar Messages

FM BCS - Budget Exceed mail alters to External mail Box

Dear Experts
We are going to implement FM BCS module to my client. My client is asking Budget exceed mail alerts will trigger to external mail box. But as per my observation Budget exceeding mail alerts are triggering to Supervisor and user SAP Inbox. But my client is asking mail alters should trigger to supervisor external mail box only.
Please suggest on this.
Thanks in advance
Rao

   method IF_EX_FMAVC_EVENT~MODIFY_MAIL_RECIPIENTS.
TYPES:      BEGIN OF TY_ITAB,
            w_email type ADR6-SMTP_ADDR,
            END OF ty_itab.
DATA: l_f_receiver LIKE LINE OF c_t_receivers,
      ITAB TYPE TABLE OF TY_ITAB,
      WA_ITAB type TY_ITAB,
      w_bname type XUBNAME,
      w_email type ADR6-SMTP_ADDR,
      adrn type USR21-ADDRNUMBER,
      pers type USR21-PERSNUMBER.
READ TABLE c_t_receivers INDEX 1 INTO l_f_receiver.
w_bname = l_f_receiver-receiver.
     select single ADDRNUMBER from USR21 into ADRN where BNAME = w_bname.
     select single PERSNUMBER from USR21 into PERS where BNAME = w_bname.
     select single SMTP_ADDR from ADR6 into w_email where PERSNUMBER = PERS and ADDRNUMBER = ADRN.
l_f_receiver-receiver = w_email.
l_f_receiver-rec_type = 'U'.
append l_f_receiver to c_t_receivers.
endmethod.
Try this now the system will trigger external mail.
PS: Email should be maintained for the user who is responsible for Fund center.

Budget exceed mail

Hi Friends,
                 My requirement is ..When a budget exceed the system should trigger a mail to corresponding person.For this I got a customer exit EXIT_SAPLBPFC_001.When budget exceeds for any WBS of a project this exit is triggered.I have a ztable where i have maintained all wbs , userid and email.So I get the data of userid , email of the wbs.After that i am calling function module SO_NEW_DOCUMENT_SEND_API1.After passing all details to the function module....But system is going shortdump...Plz Help me...If u want i can send the code..
.Thanx in advance
Bibekananda

Hi Madhu,
                In the function module SO_NEW_DOCUMENT_SEND_API1 , SAP provides a an example.I copied the example and there I change the ,mail id .Now I do the ME51n and exceeds the budget for that. Now It is triggering the exit and every value is passing to the variable correctly.After some operation , System shows some information message UPDATE WAS TERMINATED.
DATA: OBJPACK LIKE SOPCKLSTI1 OCCURS 2 WITH HEADER LINE.
DATA: OBJHEAD LIKE SOLISTI1   OCCURS 1 WITH HEADER LINE.
DATA: OBJBIN LIKE SOLISTI1   OCCURS 10 WITH HEADER LINE.
DATA: OBJTXT LIKE SOLISTI1   OCCURS 10 WITH HEADER LINE.
DATA: RECLIST LIKE SOMLRECI1 OCCURS 5 WITH HEADER LINE.
DATA: DOC_CHNG LIKE SODOCCHGI1.
DATA: TAB_LINES LIKE SY-TABIX.
Creating the document to be sent
DOC_CHNG-OBJ_NAME = 'OFFER'.
DOC_CHNG-OBJ_DESCR = 'Auction of a Picasso jr'.
OBJTXT = 'Reserve price : $250000'.
APPEND OBJTXT.
OBJTXT = 'A reproduction of the painting to be auctioned'.
APPEND OBJTXT.
OBJTXT = 'is enclosed as an attachment.'.
APPEND OBJTXT.
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.
Creating the document attachment
(Assume the data in OBJBIN are given in BMP format)
OBJBIN = ' \O/ '. APPEND OBJBIN.
OBJBIN = ' | '. APPEND OBJBIN.
OBJBIN = ' / \ '. APPEND OBJBIN.
DESCRIBE TABLE OBJBIN LINES TAB_LINES.
OBJHEAD = 'picasso.bmp'. APPEND OBJHEAD.
Creating the entry for the compressed attachment
OBJPACK-TRANSF_BIN = 'X'.
OBJPACK-HEAD_START = 1.
OBJPACK-HEAD_NUM   = 1.
OBJPACK-BODY_START = 1.
OBJPACK-BODY_NUM   = TAB_LINES.
OBJPACK-DOC_TYPE   = 'BMP'.
OBJPACK-OBJ_NAME   = 'ATTACHMENT'.
OBJPACK-OBJ_DESCR = 'Reproduction object 138'.
OBJPACK-DOC_SIZE   = TAB_LINES * 255.
APPEND OBJPACK..
Entering names in the distribution list
RECLIST-RECEIVER = 'email address'. " plz put a email id
RECLIST-REC_TYPE = 'U'.
APPEND RECLIST.
*RECLIST-RECEIVER = ''.
*RECLIST-REC_TYPE = 'U'.
*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.
CASE SY-SUBRC .
WHEN 0.
      MESSAGE s000(ymail) WITH 'Mail has been sent successfully'.
WHEN OTHERS.
      MESSAGE E000(Ymail) WITH 'Problem in sending the mail'.
ENDCASE.
*call function 'BAPI_TRANSACTION_COMMIT'.
endif.

Budget exceeding Mail assigned in 0k14.

Hi frds,
Maintained one Budget Manager based on internal order .Budget exceeding Mail user name assigned in Tcode-0k14.
But my customer is asking while creating the internal order in Tcode- Ko01 . I will assign the user name in internal order Tcode- Ko01. The mail has to trigger the particular user created username in Tcode- Ko01.
How to achieve these . please help me out friends.
Regards,
Kabil

Please check include LKWEB_BUDGF01 of function group KWEB_BUDG. This calls FM " BP_ORDER_BUDGET_MANAGER " to read budget manager entered via OK14. You can either enhance the include or FM to send email to desired user.
Regards

Mail to the User - Budget Exceeded

Hi,
I have done necessary settings for Internal Order Budgets & availability control. While doing PO with account assginment category A (Internal order also assigned), system giving message Budget Exceeded. Up to this everything is OK for me. I have maintained Budget Manager also for my order type, Object class Overhead cost etc., But still system is not sending any message to the particular user which I have assigned the user name(other username) in my budget manager. It is showing error message only at my user id. "Any help from the forum is appreciated.
Regards,
rajeswari

Budget request (Scenario SR61)
The form is sent to a processor who makes the budget change.
The processor executes the budget transaction in the SAP system.
Budget request requiring approval (Scenario SR62)
The form is sent to someone for approval. This person must approve the request.
The system forwards the request via workflow to the processor (determined by the role). This person changes the budget in the SAP system.
The approving manager can also execute the budget transaction.
The above are texts from the same path you mentioned:
I understood that
You need to have a workflow for SR62
In addition, this going to intranet, meaning that you should have your SCOT configured by basis administrators and your gateway must have been opened.
Then only these scenarios are going to work.
Regards,
Ravi

Budget exceeded even if enough budget available

Hi,
When we are trying to post document to a particular cost center its giving an error message saying tht payment budget exceeded. But actually there's no budget object selected for tht commitment item, So it should pull the budget from the parent item which has enough budget. Can any one help to find out why is this happening.
thanks,
Sravanthi

Kindly check this thread
Re: Budget Mail Alert
If you have maintained the activity group "++" in the tolerence limit for the AVAC.
then the PO value is also included in addition to PR.
There are two options:
1. Either increase the budget or
2. Note: 955107
Go to OPS9 In the Budget profile which u assigned to ur project, Check for Availabilty control parameters over there Overall Paramaters should be ticked. If not then make it selected.And reconstruct availabilty control thru CJBN then try out ur posting
check this Sap Note: 178837
Hope this will solve ur issue
Regards,
ANSAR

Budget Exceeded error with message No BP 602

Hi Experts,
I am facing a budget exceeding error: Ntwk actvty 6000001 0020 budget exceded year 2009.
following is the settings
Availability control against: Overall
Availability control against: Budget
Availability Control in the Controlling Area Currency:
Activation type: Automatic activation during budget allocation
Usage level in %: 0,00
The project is P.0001
Top lvl P.0001
WBS P.0001.1
Network Activity (External services) 6000001 0010 PR-($40000) PO($20000) & Service entery done with same amount($20000).
Network Activity (External services) 6000001 0020 PR-($1)
Actual   $20000
Commitment 20001
Assigned 40001
Available $49
Now we updated the budget as below:
The original budget was 40050 in IM then modified to 45050 and distributed in CJ30.
When we try to update the Service PR with 49 or more dollars, gives error in commitments and when the log checked, the budget exceeding message is there, if the PR updated with 48 USD, it gives the budge is exhausted.
40050(Old Budget)-40001 (assigned) = 49 USD. Which means, the supplement of the 5000USD is not considered.
Run the CJEN and CJBN to reconstruct the project but no use.
Please help me out where to check and what went wrong. its in client prd.
Regards,
Ganesh

Hi,
You said in reports and in CJ31 , it is showing 60049 as available. I am confused here......including additional budget , total budget you gave is 45000. Then how it can show 60049 which more than Original Budget ?
Have you distributed additional budget to the WBSE for which Service P.R is being raised ?
What is distributable budget at the level of the WBSE for which P.R is being created in CJ30 ?
What Is available budget against the WBSE for which P.R is being created in S_ALR_87013558. ?
May be it will be of saome help for you.
Thanks
Saikishore.Ganga

Budget exceed even if Budget is available

Hi,
I am facing typical problem. Against the WBS budget report is showing the budet available, but when creating PO system is throwing erroe "budget exceeded". I checked PO value which less than available budget.
I run CJBN, CJEN but after that also same error,
Kindly provide your valuable suggestion.

Kindly check this thread
Re: Budget Mail Alert
If you have maintained the activity group "++" in the tolerence limit for the AVAC.
then the PO value is also included in addition to PR.
There are two options:
1. Either increase the budget or
2. Note: 955107
Go to OPS9 In the Budget profile which u assigned to ur project, Check for Availabilty control parameters over there Overall Paramaters should be ticked. If not then make it selected.And reconstruct availabilty control thru CJBN then try out ur posting
check this Sap Note: 178837
Hope this will solve ur issue
Regards,
ANSAR

Ntwk actvty 9000006262 0050 budget exceeded

Error:-604 Item 001 Ntwk actvty 9000006262 0050 budget exceeded
When we post Goods Receipt or Invoice using BAPI_GOODSMVT_CREATE/BAPI_INCOMINGINVOICE_CREATE we are getting the above error message.This error message generating when i call the BAPI through JCO.
I have tested from front end SAP transcation MIGO and also entered data manually in BAPI
through SE37, Goods receipt is created successfully, I feel background run created problem when BAPI called from JCO.
Please any can suggest me the solution.

Try to dump the contents of all the parameters of the BAPI call into a temp table when using JCO and if you are still in development box testing this. May be your quantities are getting converted into some big amount due to decimal point placement or comma etc. Check all the conversion exits. MIGO and BAPI execution from SE37 will take care of all your conversions, but if you call it from a program or from an external system, you will have to take care of them including dates.

Budget Exceeded but no Error message Assign more than allocated

Hi Gurus,
I am stuck in a situation where the Error Message BP603 while creating a PO for a wbs at level 2.
IN cj30 , i found out that Budget = 69500000 and assigned = 69950772
if i create a PO OF even .30 (thirty paisa) the budget exceeded amount = 450772.35, which is actually the diffrecene betweenn assigned and Budgeted values.
Now we are not able to raise any PO
Below is tolerance limit
please key in your valuable inputs.
Regards
Rohit

Hi Rohit,
In Budget report, Assigned value = Actual + Commitment
If your assigned value is great than Budget, then you will get Budget exceeded error when you try to do any further posting against specific WBS element.
So, you will need to supplement Budget to cover shortfall.
You can also refer following SAP note which shows how assigned value is calculated.
178837 - Availability control: Incorrect assigned value?
There are lot of threads already discussed in this forum for error message you are mentioning.
Please search them.
Regards
Tushar

Can't send smartform to external mail address

Hi, everyone.
Now, after creating some self-defined smartforms, we want to send its
PDF copy to
our external mail address. From this point, I had some try.
Reference to SAP Library, I make a testing program named 'YPDF_TEST'.
However, one exception always exists when running and error message id
is 'XS806' - means
"No delivery to &, invalid recipient address"
I filled the address with following fields.
[ dev_mail_recipient-logsys = 'CLNT600'.
dev_mail_recipient-objtype = 'RECIPIENT'.
dev_mail_recipient-objkey = '[email protected]'. ]
I just can't understand the real reason why it doesn't work.
Through debugging, I found the error occurs when handling the following
codes
in function "SX_ADDRESS_TO_DEVTYPE".
[ swc_create_object o_recipient 'RECIPIENT' recipient_id-objkey.
swc_get_property o_recipient 'CommunicationType' m_recipient-type.
get_property_longvalue o_recipient m_recipient-address. ]
On the current situation, if can't come over this problem,
we may not build the connection and don't provide information in time.
Failed to send, I yet try another function - added the tail but on earthdidn't get it ~~~
Would you give me some hints or advice ?
Any help is appreciated.
====================
<i>REPORT ypdf_test .
DATA: fm_name TYPE rs38l_fnam.
DATA: my_control_pars TYPE ssfctrlop. "for CONTROL_PARAMETERS
DATA: my_output_info TYPE ssfcrescl. "for JOB_OUTPUT_INFO
DATA: output_options TYPE ssfcompop.
DATA: e_devtype TYPE rspoptype.
DATA: gw_lcprint TYPE ziebsflc001.
DATA: bin_file TYPE xstring,
bin_filesize TYPE i,
ndiv TYPE i, offset TYPE i,
nmod TYPE i.
DATA: BEGIN OF bin_table OCCURS 0,
x TYPE xstring,
END OF bin_table.
DATA: lines LIKE tline OCCURS 0.
DATA: dev_mail_sender LIKE swotobjid, "B20K061818
dev_mail_recipient LIKE swotobjid.
DATA: dev_mail_applobj_tab LIKE swotobjid OCCURS 10 WITH HEADER LINE.
DATA: param LIKE itcpp.
my_control_pars-no_dialog = 'X'.
my_control_pars-getotf = 'X'.
Get genereated function name of Smartform
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
formname = 'ZDEMO_SMART_FORM_PPF'
IMPORTING
fm_name = fm_name
EXCEPTIONS
no_form = 1
no_function_module = 2
OTHERS = 3.
IF sy-subrc <> 0.
ENDIF.
Get Device type
CALL FUNCTION 'SSF_GET_DEVICE_TYPE'
EXPORTING
i_language = sy-langu
I_APPLICATION = 'SAPDEFAULT'
IMPORTING
e_devtype = e_devtype
EXCEPTIONS
no_language = 1
language_not_installed = 2
no_devtype_found = 3
system_error = 4
OTHERS = 5 .
IF sy-subrc <> 0.
ENDIF.
output_options-tdprinter = e_devtype.
set needed mail option
my_control_pars-device = 'MAIL'.
dev_mail_sender-logsys = 'CLNT600'.
dev_mail_sender-objtype = 'RECIPIENT'.
dev_mail_sender-objkey = 'CHI_DEV03'.
dev_mail_recipient-logsys = 'CLNT600'.
dev_mail_recipient-objtype = 'RECIPIENT'.
dev_mail_recipient-objkey = '[email protected]'.
CALL FUNCTION fm_name
EXPORTING
control_parameters = my_control_pars
mail_recipient = dev_mail_recipient
mail_sender = dev_mail_sender
output_options = output_options
ip_carrid = 'ID'
ip_connid = '8290'
ip_fldate = sy-datum
ip_bookid = '12345678'
ip_customid = '09876521'
ip_luggweight = 90
ip_wunit = 'KG'
ip_smoker = 'X'
IMPORTING
job_output_info = my_output_info
EXCEPTIONS
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
OTHERS = 5.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Another try ***
*DATA: param LIKE itcpp.
*DATA: BEGIN OF off_obj.
INCLUDE STRUCTURE soodk.
*DATA: END OF off_obj,
ok TYPE c,
msgid TYPE symsgid,
msgno TYPE symsgno,
msgv1 TYPE symsgv,
msgv2 TYPE symsgv,
msgv3 TYPE symsgv,
msgv4 TYPE symsgv.
*DATA: dev_mail_applobj_tab LIKE swotobjid OCCURS 10 WITH HEADER LINE.
*CALL FUNCTION 'CONVERT_OTF_AND_MAIL'
EXPORTING
mailoptions = param
mail_sender = dev_mail_sender
mail_recipient = dev_mail_recipient
IMPORTING
office_objid = off_obj
mail_ok = ok
msgno = msgno
msgid = msgid
msgv1 = msgv1
msgv2 = msgv2
msgv3 = msgv3
msgv4 = msgv4
TABLES
mail_application_object_ids = dev_mail_applobj_tab
otf = my_output_info-otfdata.</i>

Hi,
You can follow a different approach. Send the output of the Smartform to the spool.
You have a Function Module to read the spool and convert it to PDF . Then there is one more function module to attach the PDF and send it as a mail.
You need to configure SMTP in Tcode : SCOT.
Search the forum with emailpdfattachment
You have umpteen postings available.
Pls reward if useful.
Regards,
Laxman Nayak

Sending from Business workplace to External mail ID

Hi,
Please Some help me on this issue am getting below error when am trying to send mail from Business Workplace to External Mail
Cannot process message , no route from SAPUSER TO abc123 at gmail dot com
I done configuration by refereeing below.
Please follow these steps:
1.) tcode = SCOT
2.) double click SMTP
3.) under "SMTP Connection" section, fill in your mail host IP(ex: webmail.sap.com) and the port number(25) and code page = No conversion.
4.) under "Supported address types", make sure Internet is checked, and click on "Set". The Address area has to be *
5.) To test route,
SCOT -->Utilities --> Routing test
RecipientAddr.type = INT
Recipient addr. = abc.xyz at sap dot com
6.) You also need to set the Default Domain.
SCOT --> Settings --> Default Domains (webmail.sap.com)
7.)Now go to tcode SBWP,compose a mail and in the recipient address,enter abc.xyz at sap dot com and send.
8.) Come back to SCOT and click on Utilities-->Start send process(CtrlF7) and execute.+
Thanks,
GAL

Hi
Same problem with me.
Mails are not sending to external mail id.
Pls help me out!
Regards.

Budget Exceed Issue in work Order (P.O) in Production Server.

Hi Friends,
I am getting different type of budget exceed issue, that to only in Production server.
Here the issue is when I am creating the work order P.O (Acc.As. Cat.P, Itm Cat. D) with different service line items with respective WBSe with in the budget limit, then I am doing SES for some quantity, now when I am changing (I am decreasing not increasing) the same P.O line item available quantity and creating the new version now system is calculating the old version line item quantity + new version quantity (nothing but double) then giving budget exceed error.
One more strange thing is, if I change quantity for one line item then system is giving budget exceed error for another line item which is having the different WBSe which was saved with out giving any error at the time of P.O creation.
This issue is happening only in Production server ....same scenario I have run with the same values in both Dev. and Qau. (Where the config. is same in all 3 clients) but in both the clients it is working fine...but in production why the system is behaving in such a way I am not getting.
In the below I have given the test scenario...
Service P.O Creation
Line Item
P.O Quanity
Value
WBS
Budget
Commitment
SES. Quatity
Actual cost
1
10
100
WBS 1
2000
1000
5
500
2
20
200
Wbs 2
4000
2000
10.00
1000
3
30
300
WBS 3
6000
3000
15
1500
4
40
400
Wbs 4
8000
4000
20.00
2000
Service P.O change with new version
Line Item
P.O Quanity
Value
WBS
Budget
Commitment
SES. Quatity
Actual cost
1
6
100
WBS 1
1000
1000
5
500
2
20
200
Wbs 2
2000
2000
10.00
1000
Budget exceed with the double value
3
30
300
WBS 3
3000
3000
15
1500
4
40
400
Wbs 4
4000
4000
20.00
2000
If any one has come across with this type of issue and solved ...please suggest me ..
Regards,
Srikanth

Hi,
I have face similar issue in deleting PO line items.
Even though I delete items, system check budget for deleted qty with the currency conversion + value & gives budget exceed error.
In some cases we have asked user to deactivated AVAC asked to do the transaction, which is not recommended.
You can try running CJBN & CJBV in sequence for affected WBS.
Thanks & reg,
Sam

Sending external mail using SO_NEW_DOCUMENT_ATT_SEND_API1

When i use this RFC by appending the internal table receiver with receiver: sapuser name and rec_type B it triggers mail to the sap user login .But when i give external email address for receiver with rec_type 'U' it is not triggering any mail.Can anyone please tell me how to use this RFC in sending external mails??

I went back and you are right "INT" was not the REC_TYPE it was the COM_TYPE.
Sorry for any confusion caused.
However,
I suggest 2 more tests and then I give up and can not think about anything else.
Try:
#1
REC_TYPE = 'X'.
if it does not work.
#2
REC_TYPE = 'R'.
Hope that will do the trick. I was trying a lot when I had to get that working some time ago.
And surely the other colleagues point to something which must be setup as well. Transaction SCOT the SMTP settings.
Furthermore there could be another issue. I remember that I worked at a client who had turned off the send settings on their email server. So SAP finished everything and handed the emails on to a mail server. The mail server had a setting to block any emails from the development environment.
So that might be another cause of your issue.

How to send "SPOOL" on SAP MAil or external mail in background???

I tried using 'SO_DOCUMENT_REPOSITORY_MANAGER' function but it failed when I run it in background. I learned that it calls a screen at the middle of the process which needs user input to go on with the process.
Is there other way that I could send spool on SAPMail or external Mail in background??? Any suggesstions will be greatly appreciated.. thanx...

see below sample function module, you can use in backgroud also
FUNCTION Z_SEND_MAIL_FOR_SPOOLLIST.
""Local interface:
*"       IMPORTING
*"             VALUE(SPOOLNUMBER) LIKE SY-SPONO DEFAULT SY-SPONO
*"             VALUE(MAILNAME) LIKE SOOD1-OBJNAM DEFAULT 'NOTE'
*"             VALUE(SUBJECT) LIKE SOOD1-OBJDES
*"             VALUE(RECEPIENT) LIKE SY-UNAME OPTIONAL
*"             VALUE(DLI) LIKE SOOS1-DLINAM OPTIONAL
*"       TABLES
*"              TEXT STRUCTURE SOLI OPTIONAL
*"       EXCEPTIONS
*"              ERROR
DATA: OBJECT_HD_CHANGE LIKE SOOD1 OCCURS 0 WITH HEADER LINE,
      OBJPARA          LIKE SELC OCCURS 0 WITH HEADER LINE,
      RECEIVERS        LIKE SOOS1 OCCURS 0 WITH HEADER LINE.
OBJECT_HD_CHANGE-OBJLA = SY-LANGU.
OBJECT_HD_CHANGE-OBJNAM = MAILNAME.
OBJECT_HD_CHANGE-OBJDES = SUBJECT.
OBJECT_HD_CHANGE-OBJSNS = 'F'.
OBJECT_HD_CHANGE-VMTYP = 'T'.
OBJECT_HD_CHANGE-SKIPS = 'X'.
OBJECT_HD_CHANGE-ACNAM = 'SP01'.
OBJECT_HD_CHANGE-OBJCP = 'X'.
RECEIVERS-RCDAT = SY-DATUM.
RECEIVERS-RCTIM = SY-UZEIT.
IF DLI IS INITIAL.
    RECEIVERS-RECNAM = RECEPIENT.
    RECEIVERS-RTUNAM = RECEPIENT.
ELSE.
    RECEIVERS-RECNAM = DLI.
    RECEIVERS-ADR_NAME = DLI.
    RECEIVERS-RECESC = 'C'.
ENDIF.
RECEIVERS-SNDEX = 'X'.     " Express-Mail
APPEND RECEIVERS.
OBJPARA-NAME = 'SPI'.
OBJPARA-LOW = SPOOLNUMBER.
APPEND OBJPARA.
CALL FUNCTION 'SO_OBJECT_SEND'
      EXPORTING
           OBJECT_HD_CHANGE           = OBJECT_HD_CHANGE
           OBJECT_TYPE                = 'RAW'
           OWNER                      = SY-UNAME
      TABLES
           OBJCONT                    = TEXT
           OBJPARA                    = OBJPARA
           RECEIVERS                  = RECEIVERS
      EXCEPTIONS
           OTHERS                     = 01.
IF SY-SUBRC NE 0.
   RAISE ERROR.
ENDIF.
ENDFUNCTION.

External Mail budget exceed

Similar Messages

Maybe you are looking for