Updating service orders

Question

Hi all,
I am using the following function to add partners
to a service order.
Function : CRM_PARTNER_MAINTAIN_SINGLE_OW
The function is able to add an new entry. Can I use the same function to modify a partner. Or do I use another
function..
Thanks & Regards,
Abhijeet A Kharade

Answer 1

Hi Abhijeet,
Use CRM_ORDER_MAINTAIN function module.
Refer the following code:
*& Report  YAM_TEST_CRMORDERMAINTAIN                                   *
REPORT  yam_test_crmordermaintain               .
DATA : lit_partner          TYPE crmt_partner_comt,
       wa_partner           LIKE LINE OF lit_partner,
       ls_input_field       TYPE crmt_input_field,
       ls_input_field_names TYPE crmt_input_field_names,
       lt_input_field_names TYPE crmt_input_field_names_tab,
       lt_input_fields      TYPE crmt_input_field_tab.
DATA : lit_header_guid TYPE crmt_object_guid_tab,
       wa_header_guid  LIKE LINE OF lit_header_guid.
* Populate the Input Field Structure
CLEAR ls_input_field_names.
ls_input_field_names-fieldname = 'PARTNER_FCT'.
INSERT ls_input_field_names INTO TABLE lt_input_field_names.
ls_input_field_names-fieldname = 'PARTNER_NO'.
INSERT ls_input_field_names INTO TABLE lt_input_field_names.
ls_input_field_names-fieldname = 'NO_TYPE'.
INSERT ls_input_field_names INTO TABLE lt_input_field_names.
ls_input_field_names-fieldname = 'DISPLAY_TYPE'.
INSERT ls_input_field_names INTO TABLE lt_input_field_names.
ls_input_field-ref_guid    = '00000000000000000000000000000000'.
ls_input_field-ref_kind    = 'A'.
ls_input_field-objectname  = 'PARTNER'.
ls_input_field-field_names = lt_input_field_names.
INSERT ls_input_field INTO TABLE lt_input_fields.
* Bill To Party
MOVE: '00000000000000000000000000000000'  TO wa_partner-ref_guid,
     'A'        TO wa_partner-ref_kind,
     '0001'     TO wa_partner-ref_partner_handle,
     '00000003' TO wa_partner-partner_fct,
     '10000073' TO wa_partner-partner_no,
     'BP'       TO wa_partner-no_type,
     'BP'       TO wa_partner-display_type,
     'X'        TO wa_partner-mainpartner.
APPEND wa_partner TO lit_partner.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
       EXPORTING
            it_partner = lit_partner
       CHANGING
            ct_input_fields = lt_input_fields
       EXCEPTIONS
            error_occurred = 1
            document_locked = 2
            no_change_allowed = 3
            no_authority = 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.
wa_header_guid = '00000000000000000000000000000000'.
APPEND wa_header_guid TO lit_header_guid.
Where ever I have passed the value for GUID as '00000000000000000000000000000000', you need to pass the GUID of your service order.
<b>Reward points if it helps.</b>