How to add Services programmatically using BAPI_BUS2002_ACTELEM_CREATE_M

Hi :
I need to create a project programmatically using the standard PS BAPI. My problem is that I don't know how to add external activities ( Services ) into my project. I have all steps, except this one. I think that the BAPI BAPI_BUS2002_ACTELEM_CREATE_M should do it but I cannot find where to put the Service Number, Text and Quantity.
Thanks a lot in advance.
Jose J. Quezada.

The problem remains the same. The BAPI_NETWORK_MAINTAIN does not have the fields to add the Services. It can adds an External Activity. The services are External Activities but where are the fields. I need an example or a more specific response. I know how to add a Material for example, but the Services are quite different.
Kind Regards,
Jose.

Similar Messages

How to add classification view using BAPI_MATERIAL_SAVEDATA

Hi,
Please any one let me know how to add classification view using BAPI_MATERIAL_SAVEDATA to the material master.
Thanks,
shekar

We use this bapi on a regular basis as well as classification of materials. We have success doing this in 2 steps. First step is to save the material using BAPI_MATERIAL_SAVEDATA, second step is to save classification using BAPI_OBJCL_CHANGE (this can be used for both create and change) Also look at Function Group CLBPA . there are several bapi's in that group dealing with object classification, including the one I mentioned..

How to add services for object in ECC6.0

Hi everybody,
Can anybody tell me how to add "Services for Object" icon in ECC 6.0 because this icon is there in 4.6C but not coming in ECC 6.0.
Thanks in Advance

Hi Saurabh,
Thanks for your reply. I have checked the path given by you...System-> Service for object, but it is showing no service available as told by you. Cud you please tell me how to add this service because this is working fine in 4.6C but I dont know how to add these services in ECC 6.0. If any code for this which is written in 4.6C which I can refer... please tell me where to see the code for adding services (in 4.6C) b'coz its very urgent.

How to create SERVICE PR using BAPI_PR_CREATE

Hi everyone,
How to create SERVICE PR using BAPI_PR_CREATE
Regards,
My Code(it doesn't work,I don't know what's wrong.):
*& Report ZWTEST
REPORT zwtest.
DATA: header TYPE bapimereqheader,
      headerx TYPE bapimereqheaderx,
      item LIKE TABLE OF bapimereqitemimp WITH HEADER LINE,
      itemx LIKE TABLE OF bapimereqitemx WITH HEADER LINE,
      account LIKE TABLE OF bapimereqaccount WITH HEADER LINE,
      accountx LIKE TABLE OF bapimereqaccountx WITH HEADER LINE,
      service LIKE TABLE OF bapi_srv_service_line WITH HEADER LINE,
      servicex LIKE TABLE OF bapi_srv_service_linex WITH HEADER LINE,
      serviceaccount LIKE TABLE OF bapi_srv_acc_data WITH HEADER LINE,
      serviceaccountx LIKE TABLE OF bapi_srv_acc_datax WITH HEADER LINE,
      preq_no LIKE bapimereqheader-preq_no,
      lt_return LIKE TABLE OF bapiret2 WITH HEADER LINE,
      wa_return LIKE bapiret2.
header-pr_type = 'NB'."订单类型（采购）
headerx-pr_type = 'X'.
CLEAR: item.
item-preq_item = '00010'.
item-pur_group = '426'."采购组
item-short_text = '服务类PR'."短文本
item-plant = '1051'."工厂
item-matl_group = 'AS07'."物料组
item-item_cat = '9'."项目类别
item-acctasscat = 'K'."科目分配类别
item-pckg_no = '0000000001'."软件包编号
APPEND item.
CLEAR: itemx.
itemx-preq_item = '00010'.
itemx-preq_itemx = 'X'.
itemx-pur_group = 'X'."采购组
itemx-short_text = 'X'."短文本
itemx-plant = 'X'."工厂
itemx-matl_group = 'X'."物料组
itemx-item_cat = 'X'."项目类别
itemx-acctasscat = 'X'."科目分配类别
itemx-pckg_no = 'X'."软件包编号
APPEND itemx.
CLEAR: account.
account-preq_item = '00010'.
account-serial_no = '01'.
*account-quantity = '0.955'.
*account-distr_perc = '95.5'.
account-gl_account = '4205020000'.
account-costcenter = '1042000001'.
*account-co_area = 'CNOC'.
*account-profit_ctr = '9999999999'.
APPEND account.
CLEAR: accountx.
accountx-preq_item = '00010'.
accountx-serial_no = '01'.
accountx-preq_itemx = 'X'.
accountx-serial_nox = 'X'.
*accountx-quantity = 'X'.
*accountx-distr_perc = 'X'.
accountx-gl_account = 'X'.
accountx-costcenter = 'X'.
*accountx-co_area = 'X'.
*accountx-profit_ctr = 'X'.
APPEND accountx.
CLEAR: service.
service-doc_item = '00010'.
service-outline = '0000000001'.
service-srv_line = '0000000010'.
service-short_text = 'service test'.
service-quantity = '10.000'.
service-uom = 'AU'.
service-gross_price = '10.00'.
service-currency = 'CNY'.
*service-matl_group = 'AS07'."物料组
APPEND service.
CLEAR: servicex.
servicex-doc_item = '00010'.
servicex-outline = '0000000001'.
servicex-srv_line = '0000000010'.
servicex-short_text = 'X'.
servicex-quantity = 'X'.
servicex-uom = 'X'.
servicex-gross_price = 'X'.
servicex-currency = 'X'.
*servicex-matl_group = 'X'.
APPEND servicex.
CLEAR: serviceaccount.
serviceaccount-doc_item = '00010'.
serviceaccount-outline = '0000000001'.
serviceaccount-srv_line = '0000000010'.
serviceaccount-serial_no = '01'.
serviceaccount-serial_no_item = '01'.
serviceaccount-percent = '100'.
APPEND serviceaccount.
CLEAR: serviceaccountx.
serviceaccountx-doc_item = '00010'.
serviceaccountx-outline = '0000000001'.
serviceaccountx-srv_line = '0000000010'.
serviceaccountx-serial_no = '01'.
serviceaccountx-serial_no_item = 'X'.
serviceaccountx-percent = 'X'.
APPEND serviceaccountx.
CALL FUNCTION 'BAPI_PR_CREATE'
EXPORTING
    prheader               = header
    prheaderx              = headerx
*   TESTRUN                =
IMPORTING
    number                 = preq_no
*   PRHEADEREXP            =
TABLES
    return                 = lt_return
    pritem                 = item
    pritemx                = itemx
*   PRITEMEXP              =
*   PRITEMSOURCE           =
    praccount              = account
*   PRACCOUNTPROITSEGMENT =
    praccountx             = accountx
*   PRADDRDELIVERY         =
*   PRITEMTEXT             =
*   PRHEADERTEXT           =
*   EXTENSIONIN            =
*   EXTENSIONOUT           =
*   PRVERSION              =
*   PRVERSIONX             =
*   ALLVERSIONS            =
*   PRCOMPONENTS           =
*   PRCOMPONENTSX          =
*   SERVICEOUTLINE         =
*   SERVICEOUTLINEX        =
    servicelines           = service
    servicelinesx          = servicex
*   SERVICELIMIT           =
*   SERVICELIMITX          =
*   SERVICECONTRACTLIMITS =
*   SERVICECONTRACTLIMITSX =
    serviceaccount         = serviceaccount
    serviceaccountx        = serviceaccountx
*   SERVICELONGTEXTS       =
*   SERIALNUMBER           =
*   SERIALNUMBERX          =
* 处理错误消息:通过判断消息的类型，来判断BAPI是否成功
READ TABLE lt_return INTO wa_return WITH KEY type = 'E'.
IF sy-subrc = 0.
CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ELSE.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      wait = 'X'.
WRITE: / '成功创建采购申请', preq_no.
ENDIF.
LOOP AT lt_return INTO wa_return.
WRITE: / wa_return-message, wa_return-type, wa_return-id, wa_return-number.
ENDLOOP.

see note:
1950319 - How to create service PR with BAPI_PR_CREATE.pdf

How to add Service item in PR Document using BAPI_PR_CHANGE

Hi Folks,
I am using BAPI_PR_CHANGE to change existing purchase requisition document. By using this FM, i am able to add new item in PR document.
Now my requirement is to add services and limits at item level details.
But when i saw the parameter list of this FM, i am not able to find any parameter where service details or limits can be passed.
So does it mean that, its not possible to edit service details at item level of PR by using FM BAPI_PR_CHANGE?
Or if yes then how can we do it.
If No, then what could be the alternative to change the service details of the item.
Regards
PG
Edited by: PG on Aug 30, 2010 6:32 PM

Hi,
I just realised that, this question can be asked in specific forum of MM.
Regards
PG

How to change Service Item using BAPI_ENTRYSHEET_CREATE.

Hi All,
There's a requirement for me to upload/ Create Entry Sheet using BAPI_ENTRYSHEET_CREATE from the source file.
The Header was given to me but the Service Item, they would like the flexibility to change the existing lines that was adopted from ML81N.
Eg of the file.
Header given:-
PO NO
Po Item
Short Text
Ext Entry Sheet No
Service Location
Period Start
Period End ....n so on
Service Item given:-
Service Line (Extrow)
Service Order Qty (Memge)
Ext Service No (EXTSRVNO)
The objective of this file is
1) Create Service Entry Sheet (using Header)
2) Adopt the Service Item
3) Change Service Item (using Service Item)
Could anyone guide me how to do it? If Using BAPI_ENTRYSHEET_CREATE...is actually creating it with full details of the upload file. but given to me, t requrement is they would like to create n change the item.
Appreciates your help.
Thank you.
Regards,
Sheena Wee

Hi ,
If you are trying to test the FM through TCode SE37 then it will not give you the desired output.Do one thing create a test program and there you call the FM with your data.I hope in this way you can solve the issue.
Regards,
Sarbajit.

How to add "services for object " in ECC 6.0

Hi Saurabh,
Thanks for your reply. I have checked the path given by you...System-> Service for object, but it is showing no service available as told by you. Cud you please tell me how to add this service because this is working fine in 4.6C but I dont know how to add these services in ECC 6.0. If any code for this which is written in 4.6C which I can refer... please tell me where to see the code for adding services (in 4.6C) b'coz its very urgent.

Hi Saurabh,
Thanks for your reply. I have checked the path given by you...System-> Service for object, but it is showing no service available as told by you. Cud you please tell me how to add this service because this is working fine in 4.6C but I dont know how to add these services in ECC 6.0. If any code for this which is written in 4.6C which I can refer... please tell me where to see the code for adding services (in 4.6C) b'coz its very urgent.

How open a service order using event handling

HOw to open a service order using event handling

Hi,
Can you explain your requirement elaborately.
I understand from it as, you want to open Service order creation page, based on some event(may be submit button).
For that technically you can use navigation->goto_page('Provide the URL').
or you can use inbound-plug and out-bound plug concept for naviagation.
Regards,
Devender V

How to add ALV button using OO in module pool program using ALV grid

Hello Gurus!!!
              Want some tips related how to add button using ALV Grid(OO).
I want to display the button for search, sort ....
             Please suggest the step -by-step procedure for implementation of these button.
             I am designing the code for transaction FB03. Header data has been displayed but want to display the line items.
             Kindly suggest your answers.
Thanks,
Sachin

Hi,
CLASS SELSCR_APPLICATION DEFINITION DEFERRED.
CLASS SELSCR_APPLICATION DEFINITION.
PUBLIC SECTION.
   METHODS:
        HANDLE_TOOLBAR
        FOR EVENT TOOLBAR OF CL_GUI_ALV_GRID
            IMPORTING E_OBJECT E_INTERACTIVE,
        HANDLE_USER_COMMAND
        FOR EVENT USER_COMMAND OF CL_GUI_ALV_GRID
            IMPORTING E_UCOMM.
ENDCLASS.        "SELSCR_APPLICATION DEFINITION
CLASS SELSCR_APPLICATION IMPLEMENTATION.
METHOD HANDLE_TOOLBAR.
    DATA: LS_TOOLBAR TYPE STB_BUTTON.
append SAVE icon
    CLEAR LS_TOOLBAR.
    MOVE 'SAVE' TO LS_TOOLBAR-FUNCTION.
    MOVE ICON_SYSTEM_SAVE TO LS_TOOLBAR-ICON.
    MOVE 'Save' TO LS_TOOLBAR-QUICKINFO.
    MOVE ' ' TO LS_TOOLBAR-DISABLED.
    APPEND LS_TOOLBAR TO E_OBJECT->MT_TOOLBAR.
    CLEAR LS_TOOLBAR.
ENDMETHOD.                    "handle_toolbar
METHOD HANDLE_USER_COMMAND.
    CASE E_UCOMM.
      WHEN 'SAVE'.
          PERFORM UPDATE_FIELDS.
    ENDCASE.
ENDMETHOD.
ENDCLASS.                 "SELSCR_APPLICATION IMPLEMENTATION
these lines should be after calling method SET_TABLE_FOR_FIRST_DISPLAY
SET HANDLER G_APPLICATION1->HANDLE_TOOLBAR FOR GRID1.
        CALL METHOD grid1->set_toolbar_interactive.
rgds,
bharat.

How to add control buttons using Java thorugh serial port?

Hi everyone,
I'm new to this forum.
I have some questions on Java and serial port.
I want to write a Java program to control my robot, through serial port. For example, when I click "Forward", the robot will go forward, and so on.
Now I already have the buttons, so next I would like to ask how to interface the buttons with the serial port.
I already have all the javax.comm things installed.
below is the code for my buttons:
import java.awt.*;
public class ControlButtons extends java.applet.Applet
     GridLayout myLayout = new GridLayout(3, 3);
     Button button1 = new Button(" ");
     Button buttonForward = new Button("Forward");
     Button button2 = new Button(" ");
     Button buttonLeft = new Button("Left");
     Button buttonStop = new Button("Stop");
     Button buttonRight = new Button("Right");
     Button button3 = new Button(" ");
     Button buttonReverse = new Button("Reverse");
     Button button4 = new Button(" ");
     public void init()
          setLayout(myLayout);
          add(button1);
          button1.setVisible(false);
          add(buttonForward);
          add(button2);
          button2.setVisible(false);
          add(buttonLeft);
          add(buttonStop);
          add(buttonRight);
          add(button3);
          button3.setVisible(false);
          add(buttonReverse);
          add(button4);
          button4.setVisible(false);
}Now I would like to ask for direction on how to add in the code to make it work with serial port.
Thanks

The plan is, I have a robot device connected to the serial port.We don't know anything about that device. We don't know how to control it. We don't know what you have to write to the device to make it do anything. Only you know what.
For example, when I click "Forward", the robot will go forward, and so on.So what do you have to send to make it do that? and same for the other buttons.
Next, you need to work out from the javax.comm API how to open the serial port and send data to it. This is a standard exercise in learning a new API. You must be able to do this. Again and again.
But the program is useless. The button can be clicked, but didn't do anything.Because (a) they have no ActionListeners and (b) there is no code to send anything to the serial port.
You have to write all that. So you also have to look up ActionListener in the Java API and how to attach it to a button. You can do that. We all do that kind of thing every day.
So next I would like to ask how to interface the buttons with the serial port.You've been asking nothing else since you started, but you've also only done enough investigation of your own to create the buttons. That's only the start.
The problem is what method and command should I use to make those buttons actually functioning.See above. You've been told part of it several times. The rest only you can answer, because it's your robot.

I need your help how to create service plan using programm

Hello everybody
I met some difficulities when writing a programm which is used to create service plan.
I used the function module 'crm_order_maintain'.
Can you tell me how to set the parameters:
IT_SERVICEPLAN_I
IT_SERVICEPLAN_IE
The two parameters is used as cycle data.
I'm waiting for your help.
If you have any idea,please apply to my message .Thank you very much. ^ ^

Hi,
I think there is standard way of creating service plans using actions..
The standard method used is CREATE_ORDER_SRVPLAN.
Regards,
PePe

How to add AutoSuggestBehavior programmatically

Hi,
I am using jdev 11.1.2.0.0.
In our project in some cases we have to create RichInputText components programmatically.
Does anybody out here know a way to add AutoSuggestBehavior programmatically?
I'll appreciate any pointer...
Thanks!
Edited by: user6806750 on 31.10.2011 6:25
up
Edited by: user6806750 on 01.11.2011 0:38
up
Edited by: user6806750 on 01.11.2011 23:28
up

Hi,
This pointer may help you:
http://anindyabhattacharjee.blogspot.com/2010/10/autosuggestbehavior-is-new-addition-in.html-Prasad

How different Web Services can use a class which parses an XML file

I am using RAD6.1 for developing and deploying web services.As I am using 15 web Services which uses a common class which is used to parse an XML file.As this XML file should be parsed only once and should be used by all the web services.I have made this common class as Singleton but it works as singleton for only one webservice and for other web service again it is parsing the xml file.I want to parse this xml file only once and used by all the web services.In my case tis file is parsed 15 times for 15 web services, but it should be parse donly once and used by all 15 services.Please give me the solution.
Thanks and Regards
Sayeeduzzaman

Hello,
the 15 Webservices should have a static attribute which contains the xml:
private static String xml;
then initialise the xml like this:
if (xml == null)
xml = parseIt();
else
//do nothing, XML already initialised!
}

How to Add two numbers using RFC in WD abap

Dear Experts,
I have to add the two numbers using RFC.
I have created the RFC and by using create -> service call i have include that RFC in my WD abap Program.. After that i don't know how to link the input view and to display the result in another view...
Please help me..
Thank you.

This is the third thread that you have posted on this same question. This is also your second warning that such activity is not allowed in the SCN forums. Please return to your original thread if you wish to post a follow up question.
Beacause this is a duplicate thread it will be locked.

How to creating Service Contract using BAPI_SLSTRANSACT_CREATEMULTI

Hi,
In my requirement, I have to create a Service Contract from flat file by using BAPI - BAPI_SLSTRANSACT_CREATEMULTI and data which are comming from flat files are, Serial number, Sold-to party, Ship-to party, Installation date, Contract start date, Contract end date, Service profile, Response profile.
Please suggest me what are the Import parameters should I pass in this BAPI to create Service Contract?
Thanks in Advance,
Deepesh

Hi All,
for everybody's benefit (and to avoid you the time I've spent to work this out...), here is a working example on how to create an sales order (TA) via the BAPI_SLSTRANSACT_CREATEMULTI.
Not really a Service Contract, but it tells you how to call the BAPI.
Points appreciated, if you find this helpful...
I use the convention entryField for the values that should be set based on your system.
Cheers
G
*& Report ZZGVBAPISALESORDER
REPORT ZZGVBAPISALESORDER.
include constants
include crm_direct.
// GUIDs
data: lv_guid_h       type GUID_32,
      lv_guid_i       type GUID_32,
      lv_guid_sl      type GUID_32,
      lv_guid_p       type GUID_32.
// Handles
data: lv_current_handle type crmt_handle,
      lv_handle_h      type crmt_handle,
      lv_handle_i      type crmt_handle,
      lv_handle_sl     type crmt_handle,
      lv_handle_p      type crmt_handle.
// Administration header + item + etc
data: lt_salesorder_header type table of bapibus20001_header_ins,
      ls_salesorder_header type bapibus20001_header_ins,
      lt_salesorder_item   type table of bapibus20001_item,
      ls_salesorder_item   type bapibus20001_item,
      lt_scheduleline      type table of BAPIBUS20001_SCHEDLIN,
      ls_scheduleline      type BAPIBUS20001_SCHEDLIN,
      lt_partner           type table of BAPIBUS20001_PARTNER_INS,
      ls_partner           type BAPIBUS20001_PARTNER_INS,
      ls_logical_key       TYPE crmt_partner_logic_partner_key,
      lt_organisation      type table of BAPIBUS20001_ORGMAN_INS,
      ls_organisation      type BAPIBUS20001_ORGMAN_INS.
// Saved sales orders
data: lt_saved_process type table of bapibus20001_object_id,
      ls_saved_process type bapibus20001_object_id,
      ls_salesorder    type CRMT_RETURN_OBJECTS_STRUC.
data: lt_input_fields type table of bapibus20001_input_fields,
      ls_input_fields type bapibus20001_input_fields,
      lt_return type table of bapiret2,
      ls_return type bapiret2.
// Macro definition to populate structure and input field
This, called as
setfield ls_salesorder_header GUID lv_guid_h
is exploded as
ls_salesorder_header-GUID = lv_guid_h.
ls_input_fields-fieldname = 'GUID'.
append ls_input_fields to lt_input_fields.
Note 1: &2 (field name) MUST be uppercase
Note 2: for the salesorder header, I haven't used the macro,
to show how the code should look.
I've used the macro everywhere else.
define setfield.
&1-&2          = &3.
ls_input_fields-fieldname = '&2'.
append ls_input_fields to lt_input_fields.
end-of-definition.
// end of macro definition
// fill order administration header
perform get_guid changing lv_guid_h.
add 1 to lv_handle_h.
ls_salesorder_header-guid          = lv_guid_h.
ls_salesorder_header-handle        = lv_handle_h.
ls_salesorder_header-process_type = 'TA'.
clear ls_input_fields.
ls_input_fields-ref_handle = lv_handle_h.
ls_input_fields-ref_guid = lv_guid_h.
*ls_input_fields-ref_kind   = gc_object_ref_kind-orderadm_h.
ls_input_fields-objectname = gc_object_name-orderadm_h.
ls_input_fields-fieldname = 'GUID'.
append ls_input_fields to lt_input_fields.
ls_input_fields-fieldname = 'HANDLE'.
append ls_input_fields to lt_input_fields.
ls_input_fields-fieldname = 'PROCESS_TYPE'.
append ls_input_fields to lt_input_fields.
append ls_salesorder_header to lt_salesorder_header.
// fill organisation data (I needed this, you may rely on
sales org determination instead...)
clear ls_input_fields.
ls_input_fields-ref_handle = lv_handle_h.
ls_input_fields-ref_guid    = lv_guid_h.
ls_input_fields-ref_kind    = gc_object_ref_kind-orderadm_h.
ls_input_fields-objectname = gc_object_name-orgman.
setfield ls_organisation REF_GUID lv_guid_h.
setfield ls_organisation REF_HANDLE lv_handle_h.
setfield ls_organisation REF_KIND gc_object_ref_kind-orderadm_h.
setfield ls_organisation SALES_ORG_RESP salesOrgResp(input).
setfield ls_organisation SALES_ORG salesOrg(input).
setfield ls_organisation DIS_CHANNEL disChannel(input).
append ls_organisation to lt_organisation.
// fill order administration item
perform get_guid changing lv_guid_i.
lv_handle_i = lv_handle_h.
add 1 to lv_handle_i.
clear ls_input_fields.
ls_input_fields-ref_guid   = lv_guid_i.
ls_input_fields-ref_handle = lv_handle_i.
*ls_input_fields-ref_kind   = gc_object_ref_kind-orderadm_i.
ls_input_fields-objectname = gc_object_name-orderadm_i.
setfield ls_salesorder_item GUID lv_guid_i.
setfield ls_salesorder_item HEADER lv_guid_h.
setfield ls_salesorder_item HANDLE lv_handle_i.
setfield ls_salesorder_item HEADER_HANDLE lv_handle_h.
setfield ls_salesorder_item ORDERED_PROD product(input).
*_set_field ls_salesorder_item ITM_TYPE 'TAN'.
setfield ls_salesorder_item MODE 'A'.
*adjustment taken from standard include LCMS_MAPPERF04
*(see where-used-list for BAPI_SLSTRANSACT_CREATEMULTI, program LCMS_MAPPERU11)
delete lt_input_fields where fieldname = 'HANDLE'
                                OR
                             fieldname = 'HEADER_HANDLE'.
append ls_salesorder_item to lt_salesorder_item.
// fill schedule line for item
perform get_guid changing lv_guid_sl.
add 1 to lv_handle_sl.
clear ls_input_fields.
ls_input_fields-ref_guid   = lv_guid_i.
ls_input_fields-ref_handle = lv_handle_i.
ls_input_fields-ref_kind   = gc_object_ref_kind-orderadm_i.
ls_input_fields-objectname = gc_object_name-schedlin.
setfield ls_scheduleline ITEM_GUID lv_guid_i.
setfield ls_scheduleline GUID lv_guid_sl.
setfield ls_scheduleline HANDLE lv_handle_sl.
setfield ls_scheduleline ITEM_HANDLE lv_handle_i.
setfield ls_scheduleline QUANTITY '1.000'.
append ls_scheduleline to lt_scheduleline.
// fill partner line
*perform get_guid changing lv_guid_p.
*the partner use the logical key as well
ls_logical_key-ref_partner_handle = '0001'.
clear ls_input_fields.
ls_input_fields-ref_guid   = lv_guid_h.
ls_input_fields-ref_handle = lv_handle_h.
ls_input_fields-ref_kind   = gc_object_ref_kind-orderadm_h.
ls_input_fields-objectname = gc_object_name-partner.
ls_input_fields-logical_key = ls_logical_key.
setfield ls_partner REF_GUID lv_guid_h.
setfield ls_partner REF_HANDLE lv_handle_h.
setfield ls_partner REF_KIND gc_object_ref_kind-orderadm_h.
setfield ls_partner REF_PARTNER_HANDLE '0001'.
setfield ls_partner KIND_OF_ENTRY 'C'.
setfield ls_partner PARTNER_FCT '00000001'.
setfield ls_partner PARTNER_NO bpNumber(input).
setfield ls_partner NO_TYPE 'BP'.
setfield ls_partner DISPLAY_TYPE 'BP'.
move-corresponding ls_partner to ls_logical_key.
append ls_partner to lt_partner.
// example of a second partner function (custom) with data
    override
ls_logical_key-ref_partner_handle = '0002'.
clear ls_input_fields.
ls_input_fields-ref_guid   = lv_guid_h.
ls_input_fields-ref_handle = lv_handle_h.
ls_input_fields-ref_kind   = gc_object_ref_kind-orderadm_h.
ls_input_fields-objectname = gc_object_name-partner.
ls_input_fields-logical_key = ls_logical_key.
setfield ls_partner REF_GUID lv_guid_h.
setfield ls_partner REF_HANDLE lv_handle_h.
setfield ls_partner REF_KIND gc_object_ref_kind-orderadm_h.
setfield ls_partner REF_PARTNER_HANDLE '0002'.
setfield ls_partner KIND_OF_ENTRY 'B'.            "manual entry...
setfield ls_partner PARTNER_FCT customFct(input).
setfield ls_partner PARTNER_NO bpNumber(input).
setfield ls_partner NO_TYPE 'BP'.
setfield ls_partner DISPLAY_TYPE 'BP'.
setfield ls_partner TITLE 'Mr.'.
setfield ls_partner FIRSTNAME 'John'.
setfield ls_partner LASTNAME 'Smith'.
setfield ls_partner STR_SUPPL1 'John Smith and Co'.
setfield ls_partner STREET 'Street1'.
setfield ls_partner STR_SUPPL3 'Street4'.
setfield ls_partner HOUSE_NO '42'.
setfield ls_partner CITY 'Townville'.
setfield ls_partner DISTRICT 'Districtshire'.
setfield ls_partner POSTL_COD1 'AA1 2BB'.
note now ...
*adjustment taken from standard include LCMS_MAPPERF04
*(see where-used-list for BAPI_SLSTRANSACT_CREATEMULTI, program LCMS_MAPPERU11)
I don't use macro because name of the field in input_table is different
*_set_field ls_partner COUNTRYISO 'GB'.
*instead
ls_partner-COUNTRYISO = 'GB'.
ls_input_fields-fieldname = 'COUNTRY'.
append ls_input_fields to lt_input_fields.
*_set_field ls_partner LANGU_ISO 'EN'.
ls_partner-LANGU_ISO = 'EN'.
ls_input_fields-fieldname = 'LANGU'.
append ls_input_fields to lt_input_fields.
move-corresponding ls_partner to ls_logical_key.
append ls_partner to lt_partner.
Create sales orders                                                  *
call function 'BAPI_SLSTRANSACT_CREATEMULTI'
EXPORTING
    testrun       = false
TABLES
    header        = lt_salesorder_header[]
    item          = lt_salesorder_item[]
    partner       = lt_partner[]
    organisation = lt_organisation[]
    input_fields = lt_input_fields[]
    scheduleline = lt_scheduleline[]
    saved_process = lt_saved_process[]
    return        = lt_return[].
// get the GUID of the created object
call function 'BAPI_TRANSACTION_COMMIT'
EXPORTING
    wait = 'X'.
INCLUDE ZZGVBAPISALESORDER_GET_GUIDF01.
The include contains only this:
***INCLUDE ZZGVBAPISALESORDER_GET_GUIDF01 .
*&      Form get_guid
      text
     <--guid text
FORM get_guid CHANGING GUID.
CALL FUNCTION 'SYSTEM_UUID_C_CREATE'
      IMPORTING
           UUID    = GUID.
ENDFORM.                    " get_guid

How to add Services programmatically using BAPI_BUS2002_ACTELEM_CREATE_M

Similar Messages

Maybe you are looking for