Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Update quantity on OBD

Former Member

‎2008 Aug 29 3:34 PM

0 Likes
449

Hi All,

I need to update the quantity on the OBD. I am using the function module WS_DELIVRY_UPDATE_2 however it is not changing the quantity. I am attaching my code, am sort of stuck here so any quick help will be greatly appreciated.

l_vbkok-vbeln_vl = p_vbeln.

l_vbkok-vbeln = p_vbeln.

*wa_vbpok-vbeln_VL = p_vbeln.

*wa_vbpok-posnr_VL = '10'.

wa_vbpok-vbeln = p_vbeln.

wa_vbpok-posnn = '10'.

wa_vbpok-matnr = '100001115'.

wa_vbpok-lfimg = '23.000'.

wa_vbpok-lianp = 'X'.

*wa_vbpok-lgmng = '23.000'.

Append wa_vbpok to it_vbpok.

*

CALL FUNCTION 'WS_DELIVERY_UPDATE_2'

EXPORTING

vbkok_wa = l_vbkok

*synchron = 'X'

  • NO_MESSAGES_UPDATE_1 = ' '

COMMIT = 'X'

delivery = p_vbeln

UPDATE_PICKING = 'X'

  • NICHT_SPERREN_1 = 'X'

*IF_CONFIRM_CENTRAL = 'X'

  • IF_WMPP = ' '

  • IF_GET_DELIVERY_BUFFERED = ' '

  • IF_NO_GENERIC_SYSTEM_SERVICE = ' '

IF_DATABASE_UPDATE_1 = '1'

  • IF_NO_INIT_1 = ' '

  • IF_NO_READ_1 = ' '

IF_ERROR_MESSAGES_SEND = v_err

  • IF_NO_BUFFER_REFRESH = ' '

  • IT_PARTNER_UPDATE =

  • IT_SERNR_UPDATE =

  • IF_NO_REMOTE_CHG_1 = ' '

  • IF_NO_MES_UPD_PACK = ' '

  • IMPORTING

  • EF_ERROR_ANY =

  • EF_ERROR_IN_ITEM_DELETION =

  • EF_ERROR_IN_POD_UPDATE =

  • EF_ERROR_IN_INTERFACE =

  • EF_ERROR_IN_GOODS_ISSUE =

  • EF_ERROR_IN_FINAL_CHECK =

  • EF_ERROR_PARTNER_UPDATE =

  • EF_ERROR_SERNR_UPDATE =

TABLES

VBPOK_TAB = it_vbpok

  • PROT =

  • verko_tab = lt_verko

  • verpo_tab = it_verpo_tab

  • VBSUPCON_TAB_1 =

  • IT_VERPO_SERNR =

  • IT_PACKING =

  • IT_PACKING_SERNR =

  • IT_REPACK =

  • IT_HANDLING_UNITS_1 = it_hu_rem

  • IT_OBJECTS =

*et_created_hus = lt_et_created_hus

  • TVPOD_TAB =

.

Thanks,

-Anthony.

Hi All,

I need to update the quantity on the OBD. I am using the function module WS_DELIVRY_UPDATE_2 however it is not changing the quantity. I am attaching my code, am sort of stuck here so any quick help will be greatly appreciated.

l_vbkok-vbeln_vl = p_vbeln.

l_vbkok-vbeln = p_vbeln.

*wa_vbpok-vbeln_VL = p_vbeln.

*wa_vbpok-posnr_VL = '10'.

wa_vbpok-vbeln = p_vbeln.

wa_vbpok-posnn = '10'.

wa_vbpok-matnr = '100001115'.

wa_vbpok-lfimg = '23.000'.

wa_vbpok-lianp = 'X'.

*wa_vbpok-lgmng = '23.000'.

Append wa_vbpok to it_vbpok.

*

CALL FUNCTION 'WS_DELIVERY_UPDATE_2'

EXPORTING

vbkok_wa = l_vbkok

*synchron = 'X'

  • NO_MESSAGES_UPDATE_1 = ' '

COMMIT = 'X'

delivery = p_vbeln

UPDATE_PICKING = 'X'

  • NICHT_SPERREN_1 = 'X'

*IF_CONFIRM_CENTRAL = 'X'

  • IF_WMPP = ' '

  • IF_GET_DELIVERY_BUFFERED = ' '

  • IF_NO_GENERIC_SYSTEM_SERVICE = ' '

IF_DATABASE_UPDATE_1 = '1'

  • IF_NO_INIT_1 = ' '

  • IF_NO_READ_1 = ' '

IF_ERROR_MESSAGES_SEND = v_err

  • IF_NO_BUFFER_REFRESH = ' '

  • IT_PARTNER_UPDATE =

  • IT_SERNR_UPDATE =

  • IF_NO_REMOTE_CHG_1 = ' '

  • IF_NO_MES_UPD_PACK = ' '

  • IMPORTING

  • EF_ERROR_ANY =

  • EF_ERROR_IN_ITEM_DELETION =

  • EF_ERROR_IN_POD_UPDATE =

  • EF_ERROR_IN_INTERFACE =

  • EF_ERROR_IN_GOODS_ISSUE =

  • EF_ERROR_IN_FINAL_CHECK =

  • EF_ERROR_PARTNER_UPDATE =

  • EF_ERROR_SERNR_UPDATE =

TABLES

VBPOK_TAB = it_vbpok

  • PROT =

  • verko_tab = lt_verko

  • verpo_tab = it_verpo_tab

  • VBSUPCON_TAB_1 =

  • IT_VERPO_SERNR =

  • IT_PACKING =

  • IT_PACKING_SERNR =

  • IT_REPACK =

  • IT_HANDLING_UNITS_1 = it_hu_rem

  • IT_OBJECTS =

*et_created_hus = lt_et_created_hus

  • TVPOD_TAB =

.

Thanks,

-Anthony.

Reply
1 REPLY 1
Read only

Former Member

‎2008 Aug 29 4:02 PM

0 Likes
388

Can somebody atleast help me with any other function module that can be used?