Announcement:
wanna exchange links? contact me at sapchatroom@gmail.com.
Posted by
Admin at
Reply from prasannakumar-basantaray on Dec 20 at 12:28 AM Hi,
Check this function module, I think it will help you.
*&--- -&> Collect Object Number
wa_object-objnr = PM order object no.
APPEND wa_object TO gt_object.
*&--- ----&> Collect Object Status
wa_jstat-stat = 'I0002'. "Release
gs_jstat-inact = 'X'.
APPEND gs_jstat TO gt_jstat.
CLEAR : gs_jstat.
gs_jstat-stat = 'I0045'. "TECO
wa_jstat-inact = space.
APPEND wa_jstat TO gt_jstat.
CALL FUNCTION 'STATUS_CHANGE_INTERN_MULTI'
EXPORTING
client = sy-mandt
TABLES
status = it_jstat
OBJECTS = it_object
EXCEPTIONS
object_not_found = 1
status_inconsistent = 2
status_not_allowed = 3
OTHERS = 4.
| | | ---------------Original Message---------------
From: Avik Ghosh
Sent: Thursday, December 19, 2013 8:51 AM
Subject: BAPI For PM Order TECO
Hi All,
Thanks for your reply, I found the issue and corrected it.
w_methods-refnumber = 1.
w_methods-objecttype = 'HEADER'.
w_methods-method = 'TECHNICALCOMPLETE '.
w_methods-objectkey = g_aufnr.
APPEND w_methods TO it_methods.
CLEAR w_methods.
w_methods-refnumber = 1.
w_methods-objecttype = ''.
w_methods-method = 'SAVE'.
APPEND w_methods TO it_methods.
CLEAR w_methods.
SELECT SINGLE aufnr
auart
werks
prctr
func_area FROM aufk INTO w_aufk WHERE
aufnr EQ g_aufnr.
IF sy-subrc = 0.
w_header-orderid = w_aufk-aufnr.
w_header-order_type = w_aufk-auart.
w_header-plant = w_aufk-werks.
w_header-profit_ctr = w_aufk-prctr.
w_header-func_area = w_aufk-func_area.
w_header-teco_ref_date = sy-datum.
w_header-teco_ref_time = sy-uzeit.
APPEND w_header TO it_header.
CLEAR w_header.
ENDIF.
CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'
TABLES
it_methods = it_methods
it_header = it_header
return = i_return
et_numbers = et_numbers.
Regards,
Avik |
| Reply to this email to post your response. __.____._ |   _.____.__ |
