Skip to Content
0
Former Member
Feb 13, 2011 at 08:57 AM

problem in passing data

57 Views

Hello Friends,

I have created an application for equipment master...for create details...i m calling Bapi.....the following code for action event :

method ONACTIONB_CREATE .

data lv_bapi_itob type BAPI_ITOB.

data lv_BAPI_ITOB_EQ_ONLY type BAPI_ITOB_EQ_ONLY.

data lv_BAPI_ITOB_PARMS type BAPI_ITOB_PARMS-EQUIPMENT.

data lv_BAPI_FLEET type BAPI_FLEET.

data lv_BAPI_ITOB_EQ_INSTALL type BAPI_ITOB_EQ_INSTALL.

CALL FUNCTION 'BAPI_EQUI_CREATE'

EXPORTING

EXTERNAL_NUMBER = lv_BAPI_ITOB_PARMS

DATA_GENERAL = lv_BAPI_ITOB

DATA_SPECIFIC = lv_BAPI_ITOB_EQ_ONLY

DATA_FLEET = lv_BAPI_FLEET

VALID_DATE = SY-DATUM

DATA_INSTALL = lv_BAPI_ITOB_EQ_INSTALL .

  • IMPORTING

  • EQUIPMENT =

  • DATA_GENERAL_EXP =

  • DATA_SPECIFIC_EXP =

  • DATA_FLEET_EXP =

  • RETURN =

.

*---bapi

data: return type standard table of bapiret2.

data: ls_return type bapiret2.

DATA lo_nd_bapi_equip_display TYPE REF TO if_wd_context_node.

DATA lo_el_bapi_equip_display TYPE REF TO if_wd_context_element.

DATA ls_bapi_equip_display TYPE wd_this->Element_bapi_equip_display.

  • navigate from <CONTEXT> to <BAPI_EQUIP_DISPLAY> via lead selection

lo_nd_bapi_equip_display = wd_context->get_child_node( name = wd_this->wdctx_bapi_equip_display ).

  • @TODO handle non existant child

  • IF lo_nd_bapi_equip_display IS INITIAL.

  • ENDIF.

  • get element via lead selection

lo_el_bapi_equip_display = lo_nd_bapi_equip_display->get_element( ).

  • @TODO handle not set lead selection

IF lo_el_bapi_equip_display IS INITIAL.

ENDIF.

  • get all declared attributes

lo_el_bapi_equip_display->get_static_attributes(

IMPORTING

static_attributes = ls_bapi_equip_display ).

read table return into ls_return with key type = 'E'.

IF sy-subrc = 0.

else.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'

  • EXPORTING

  • WAIT =

IMPORTING

RETURN = ls_RETURN .

endif.

endmethod.

Pls help.

Thanks

Kiran