on 09-08-2008 3:26 PM
Hello experts,
I want to set an service order with the bapi 'BAPI_ALM_ORDER_MAINTAIN'
to technical complete.
I've following programm, but is does not work.
Has anybody an idea ?
REPORT ZBAPI_ALM_ORDER_MAINTAIN.
DATA: IT_METHODS TYPE BAPI_ALM_ORDER_METHOD OCCURS 0 WITH HEADER LINE,
IT_HEADER TYPE BAPI_ALM_ORDER_HEADERS_I OCCURS 0 WITH HEADER LINE,
IT_HEADER_UP TYPE BAPI_ALM_ORDER_HEADERS_UP OCCURS 0 WITH HEADER LINE,
IT_PARTNER TYPE BAPI_ALM_ORDER_PARTN_MUL OCCURS 0 WITH HEADER LINE,
IT_PARTNER_UP TYPE BAPI_ALM_ORDER_PARTN_MUL_UP OCCURS 0 WITH HEADER
LINE,
IT_OPERATION TYPE BAPI_ALM_ORDER_OPERATION OCCURS 0 WITH HEADER LINE,
IT_OPERATION_UP TYPE BAPI_ALM_ORDER_OPERATION_UP OCCURS 0 WITH HEADER
LINE,
*IT_SRULE TYPE BAPI_ALM_ORDER_SRULE OCCURS 0 WITH HEADER LINE,
*IT_SRULE_UP TYPE BAPI_ALM_ORDER_SRULE_UP OCCURS 0 WITH HEADER LINE,
RETURN TYPE BAPIRET2 OCCURS 0 WITH HEADER LINE,
ET_NUMBERS TYPE BAPI_ALM_NUMBERS OCCURS 0 WITH HEADER LINE.
IT_METHODS-REFNUMBER = 1.
IT_METHODS-OBJECTTYPE = 'HEADER'.
IT_METHODS-METHOD = 'TECHNICALCOMPLETE '.
IT_METHODS-OBJECTKEY = '000007092117'.
APPEND IT_METHODS.
*IT_METHODS-REFNUMBER = 1.
*IT_METHODS-OBJECTTYPE = ''.
*IT_METHODS-METHOD = 'SAVE'.
*IT_METHODS-OBJECTKEY = '000000020664'.
*APPEND IT_METHODS.
IT_HEADER-ORDERID = '000007092117'.
*IT_HEADER-CONTROL_KEY = 'SM01'.
*IT_HEADER-WORK_CNTR = 'M1A1'.
*IT_HEADER-PLANT = '110A'.
*IT_HEADER-STANDARD_TEXT_KEY = 'C2-'.
*IT_HEADER-DESCRIPTION = 'Description 1'.
*IT_HEADER-LANGU = 'E'.
APPEND IT_HEADER.
*IT_OPERATION-ACTIVITY = '0040'.
*IT_OPERATION-CONTROL_KEY = 'SM01'.
*IT_OPERATION-WORK_CNTR = 'M1A1'.
*IT_OPERATION-PLANT = '110A'.
*IT_OPERATION-STANDARD_TEXT_KEY = 'ZSTAND'.
*IT_OPERATION-DESCRIPTION = 'Description 2'.
*IT_OPERATION-LANGU = 'E'.
*APPEND IT_OPERATION.
*IT_OPERATION_UP-ACTIVITY = 'X'.
*IT_OPERATION_UP-CONTROL_KEY = 'X'.
*IT_OPERATION_UP-WORK_CNTR = 'X'.
*IT_OPERATION_UP-PLANT = 'X'.
*IT_OPERATION_UP-STANDARD_TEXT_KEY = 'X'.
*IT_OPERATION_UP-DESCRIPTION = 'X'.
*IT_OPERATION_UP-LANGU = 'X'.
*APPEND IT_OPERATION_UP.
*APPEND IT_OPERATION_UP.
CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'
TABLES
IT_METHODS = IT_METHODS
IT_HEADER = IT_HEADER
IT_HEADER_UP = IT_HEADER_UP
*IT_HEADER_SRV =
*IT_HEADER_SRV_UP =
*IT_USERSTATUS =
IT_PARTNER = IT_PARTNER
IT_PARTNER_UP = IT_PARTNER_UP
IT_OPERATION = IT_OPERATION
IT_OPERATION_UP = IT_OPERATION_UP
*IT_RELATION =
*IT_RELATION_UP =
*IT_COMPONENT =
*IT_COMPONENT_UP =
*IT_OBJECTLIST =
*IT_OBJECTLIST_UP =
*IT_OLIST_RELATION =
*IT_TEXT =
*IT_TEXT_LINES =
*IT_SRULE = IT_SRULE
*IT_SRULE_UP = IT_SRULE_UP
*IT_TASKLISTS =
*EXTENSION_IN =
RETURN = RETURN
ET_NUMBERS = ET_NUMBERS.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'.
Thanks Gerd
Hi
What is the message in the RETURN table
Regards
MD
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
Hello again, problem solved with this coding:
DATA: it_methods TYPE bapi_alm_order_method OCCURS 0 WITH HEADER LINE,
it_header TYPE bapi_alm_order_headers_i OCCURS 0 WITH HEADER LINE,
it_header_up TYPE bapi_alm_order_headers_up OCCURS 0 WITH HEADER LINE,
it_partner TYPE bapi_alm_order_partn_mul OCCURS 0 WITH HEADER LINE,
it_partner_up TYPE bapi_alm_order_partn_mul_up OCCURS 0 WITH HEADER
LINE,
it_operation TYPE bapi_alm_order_operation OCCURS 0 WITH HEADER LINE,
it_operation_up TYPE bapi_alm_order_operation_up OCCURS 0 WITH HEADER
LINE,
*IT_SRULE TYPE BAPI_ALM_ORDER_SRULE OCCURS 0 WITH HEADER LINE,
*IT_SRULE_UP TYPE BAPI_ALM_ORDER_SRULE_UP OCCURS 0 WITH HEADER LINE,
*return TYPE bapiret2 OCCURS 0 WITH HEADER LINE,
et_numbers TYPE bapi_alm_numbers OCCURS 0 WITH HEADER LINE.
DATA: gt_return LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
DATA: gt_return2 LIKE bapiret2 OCCURS 0 WITH HEADER LINE.
it_methods-refnumber = 1.
it_methods-objecttype = 'HEADER'.
it_methods-method = 'TECHNICALCOMPLETE '.
it_methods-objectkey = lv_aufnr. " '000007092118'.
APPEND it_methods.
*IT_METHODS-REFNUMBER = 1.
it_methods-objecttype = ''.
it_methods-method = 'SAVE'.
*IT_METHODS-OBJECTKEY = '000000020664'.
APPEND it_methods.
it_header-orderid = lv_aufnr. " '000007092118'.
*IT_HEADER-CONTROL_KEY = 'SM01'.
*IT_HEADER-WORK_CNTR = 'M1A1'.
*IT_HEADER-PLANT = '110A'.
*IT_HEADER-STANDARD_TEXT_KEY = 'C2-'.
*IT_HEADER-DESCRIPTION = 'Description 1'.
*IT_HEADER-LANGU = 'E'.
APPEND it_header.
*IT_OPERATION-ACTIVITY = '0040'.
*IT_OPERATION-CONTROL_KEY = 'SM01'.
*IT_OPERATION-WORK_CNTR = 'M1A1'.
*IT_OPERATION-PLANT = '110A'.
*IT_OPERATION-STANDARD_TEXT_KEY = 'ZSTAND'.
*IT_OPERATION-DESCRIPTION = 'Description 2'.
*IT_OPERATION-LANGU = 'E'.
*APPEND IT_OPERATION.
*IT_OPERATION_UP-ACTIVITY = 'X'.
*IT_OPERATION_UP-CONTROL_KEY = 'X'.
*IT_OPERATION_UP-WORK_CNTR = 'X'.
*IT_OPERATION_UP-PLANT = 'X'.
*IT_OPERATION_UP-STANDARD_TEXT_KEY = 'X'.
*IT_OPERATION_UP-DESCRIPTION = 'X'.
*IT_OPERATION_UP-LANGU = 'X'.
*APPEND IT_OPERATION_UP.
*APPEND IT_OPERATION_UP.
CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'
TABLES
it_methods = it_methods
it_header = it_header
it_header_up = it_header_up
*IT_HEADER_SRV =
*IT_HEADER_SRV_UP =
*IT_USERSTATUS =
it_partner = it_partner
it_partner_up = it_partner_up
it_operation = it_operation
it_operation_up = it_operation_up
*IT_RELATION =
*IT_RELATION_UP =
*IT_COMPONENT =
*IT_COMPONENT_UP =
*IT_OBJECTLIST =
*IT_OBJECTLIST_UP =
*IT_OLIST_RELATION =
*IT_TEXT =
*IT_TEXT_LINES =
*IT_SRULE = IT_SRULE
*IT_SRULE_UP = IT_SRULE_UP
*IT_TASKLISTS =
*EXTENSION_IN =
return = lt_return_close_order
et_numbers = et_numbers.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'
IMPORTING
return = lt_return_close_order.
ENDFUNCTION.
It seems that I have to save the method , now it works.
Thanks Gerd
see post
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
107 | |
12 | |
11 | |
6 | |
5 | |
4 | |
4 | |
3 | |
3 | |
3 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.