Skip to Content
0
Jun 24, 2015 at 02:26 PM

Create refurbishment Order with Service Line with BAPI_ALM_ORDER_MAINTAIN

492 Views

Hi All,

I am trying to create a Refurbishment Order through BAPI_ALM_ORDER_MAINTAIN, But my requirement is While creating Refurbishment order with Service Line for Control key "PM03", I am passing a required fields as

DATA : T_METHODS TYPE STANDARD TABLE OF BAPI_ALM_ORDER_METHOD,

LS_METHODS TYPE BAPI_ALM_ORDER_METHOD,

T_HEADER TYPE STANDARD TABLE OF BAPI_ALM_ORDER_HEADERS_I,

LS_HEADER TYPE BAPI_ALM_ORDER_HEADERS_I,

T_OPERATION TYPE STANDARD TABLE OF BAPI_ALM_ORDER_OPERATION,

LS_OPERATION TYPE BAPI_ALM_ORDER_OPERATION,

T_COMPONENT TYPE BAPI_ALM_ORDER_COMPONENT,

LS_COMPONENT TYPE BAPI_ALM_ORDER_COMPONENT,

T_REFORDER_ITEM TYPE STANDARD TABLE OF BAPI_REFORDER_ITEM_I,

LS_REFORDER_ITEM TYPE BAPI_REFORDER_ITEM_I,

T_SERVICELINE TYPE STANDARD TABLE OF BAPI_ALM_SRV_SERVICE_LINE,

LS_SERVICELINE TYPE BAPI_ALM_SRV_SERVICE_LINE,

T_SERVICELIMIT TYPE STANDARD TABLE OF BAPI_ALM_SRV_LIMIT_DATA,

LS_SERVICELIMIT TYPE BAPI_ALM_SRV_LIMIT_DATA,

T_RETURN TYPE STANDARD TABLE OF BAPIRET2.

CLEAR LS_METHODS.

LS_METHODS-REFNUMBER = '000001'.

LS_METHODS-OBJECTTYPE = 'HEADER '.

LS_METHODS-METHOD = 'CREATE'.

LS_METHODS-OBJECTKEY = '%00000000001'.

APPEND LS_METHODS TO T_METHODS.

CLEAR LS_METHODS.

LS_METHODS-REFNUMBER = '000001'.

LS_METHODS-OBJECTTYPE = 'OPERATION '.

LS_METHODS-METHOD = 'CREATE'.

LS_METHODS-OBJECTKEY = '%00000000001'.

APPEND LS_METHODS TO T_METHODS.

CLEAR LS_METHODS.

LS_METHODS-REFNUMBER = '000001'.

LS_METHODS-OBJECTTYPE = ' '.

LS_METHODS-METHOD = 'SAVE'.

APPEND LS_METHODS TO T_METHODS.

CLEAR LS_HEADER.

LS_HEADER-ORDERID = '%00000000001'

LS_HEADER-ORDER_TYPE = 'ZM07 '.

LS_HEADER-PLANPLANT = 'US05'.

LS_HEADER-MN_WK_CTR = 'PM00000'.

LS_HEADER-MATERIAL = '25000016'.

LS_HEADER-PLANGROUP = 'ELE'.

LS_HEADER-START_DATE = '23.06.2015'.

LS_HEADER-FINISH_DATE = '24.06.2015'.

LS_HEADER-PRIORITY = '4'.

LS_HEADER-SHORT_TEXT = 'Refurbishment Order'.

APPEND LS_HEADER TO T_HEADER.

CLEAR LS_OPERATION.

LS_OPERATION-ACTIVITY = '%00000000001'

LS_OPERATION-CONTROL_KEY = 'PM03 '.

LS_OPERATION-PLANT = 'US05'.

LS_OPERATION-WORK_CTR = 'PM00000'.

LS_OPERATION-DESCRIPTION = 'DEMO OPERATIONS'.

LS_OPERATION-QUANTITY = '3'.

LS_OPERATION-BASE_UOM= 'EA'.

LS_OPERATION-PURCH_ORG = 'USP1'.

LS_HEADER-PUR_GROUP = '201'.

LS_HEADER-MATL_GROUP = 'ANTIBIOTI'.

APPEND LS_OPERATION TO T_OPERATION.

CLEAR LS_REFORDER_ITEM.

LS_REFORDER_ITEM-ORDERID = '%00000000001'.

LS_REFORDER_ITEM-REQUIREMENT_QUANTITY = '2'.

LS_REFORDER_ITEM-REQUIREMENT_QUANTITY_UNIT = 'EA'.

LS_REFORDER_ITEM-PLANT_TO = 'US05'.

LS_REFORDER_ITEM-STGE_LOC_TO = 'L002'.

LS_REFORDER_ITEM-VAL_TYPE_TO = 'C2'

LS_REFORDER_ITEM-MATERIAL_TO = '25000016'.

LS_REFORDER_ITEM-PLANT_FROM = 'US05'.

LS_REFORDER_ITEM-STGE_LOC_FROM = 'US05'.

LS_REFORDER_ITEM-VAL_TYPE_FROM = 'C3'.

APPEND LS_REFORDER TO T_REFORDER_ITEM.


CLEAR LS_SERVICELINE.

LS_SERVICELINE-ACTIVITY = '0020'.

LS_SERVICELINE-SERVICE = '3000000'.

LS_SERVICELINE-SRV_LINE '0000000010'.

LS_SERVICELINE-SHORT_TEXT = 'DEMO REFURBISHEMENT OPERATION'.

LS_SERVICELINE-QUANTITY = '12'.

LS_SERVICELINE-UOM = 'AU'.

LS_SERVICELINE-GROSS_PRICE = '1234'.

LS_SERVICELINE-CURRENCY = 'USD'.

APPEND LS_SERVICELINE TO T_SERVICE_LINE.


CALL FUNCTION 'BAPI_ALM_ORDER_MAINTAIN'

EXPORTING

IV_MMSRV_EXTERNAL_MAINTENACE =

TABLES

IT_METHOD = T_METHODS

IT_HEADER = T_HEADER

* IT_HEADER_UP =

* IT_HEADER_SRV =

* IT_HEADER_SRV_UP =

* IT_USERSTATUS =

* IT_PARTNER =

* IT_PARTNER_UP =

IT_OPERATION = T_OPERATION

* 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_UP =

* IT_TASKLISTS =

* EXTENSION_IN =

RETURN = T_RETURN

* ET_NUMBERS =

IT_REFORDER_ITEM = T_REFORDER_ITEM.

* IT_REFORDER_ITEM_UP =

* IT_REFORDER_SERNO_OLIST_INS =

* IT_REFORDER_SERNO_OLIST_DEL =

* IT_PRT =

* IT_PRT_UP =

* IT_REFORDER_OPERATION =

* IT_SERVICEOUTLINE =

* IT_SERVICEOUTLINE_UP =

IT_SERVICELINES = T_SERVICE_LINE

* IT_SERVICELINES_UP =

* IT_SERVICELIMIT =

* IT_SERVICELIMIT_UP =

* IT_SERVICECONTRACTLIMITS =

* IT_SERVICECONTRACTLIMITS_UP =

* ET_NOTIFICATION_NUMBERS =

* IT_PERMIT =

* IT_PERMIT_UP =

* IT_PERMIT_ISSUE =

* IT_ESTIMATED_COSTS =


These values i am passing to BAPI_ALM_ORDER_MAINTAIN to create Refurbishment Order with Service line, But BAPI is executing successfully but

when i am checking in Iw33 service line is not appearing i guess i have passed the necessary values for Service Line, Please help