Application Development 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
Showing results for 
Search instead for 
Did you mean: 

PGI for Delivery number - FM or BAPI

Former Member
0 Kudos

Hi all,

Can anyone suggest me on any FM or BAPI for doing the PGI for Delivery Number

1 ACCEPTED SOLUTION

Former Member
0 Kudos

ws_delivery_update

3 REPLIES 3

Former Member
0 Kudos

ws_delivery_update

0 Kudos

Hi,

I have Using that FM, But it is giving the error that no serial nos are there for the delivery no. how i will assign the serial no's.

Thanks & Regards,

Hari

0 Kudos

Did you post the goods issue manually ? if not post manually ,hopefully data problem,

see the code and i used this code to post the goods issue

  • Data Declaration Part for Post Goods Issue

DATA: l_vbeln LIKE likp-vbeln,

l_vbkok LIKE vbkok,

i_prot LIKE prott OCCURS 0 WITH HEADER LINE,

ef_error_any_0 TYPE c,

ef_error_in_item_deletion_0 TYPE c,

ef_error_in_pod_update_0 TYPE c,

ef_error_in_interface_0 TYPE c,

ef_error_in_goods_issue_0 TYPE c,

ef_error_in_final_check_0 TYPE c,

d_return LIKE bapireturn1.

  • Post Goods Issue

CLEAR: d_return,

i_prot,

l_vbeln,

l_vbkok.

REFRESH i_prot.

CLEAR: ef_error_in_item_deletion_0 ,

ef_error_in_pod_update_0 ,

ef_error_in_interface_0 ,

ef_error_in_goods_issue_0 ,

ef_error_in_final_check_0 .

  • carry out goods issue

l_vbeln = v_deliv.

l_vbkok-vbeln_vl = l_vbeln.

l_vbkok-wabuc = 'X'.

  • SET UPDATE TASK LOCAL.

CALL FUNCTION 'WS_DELIVERY_UPDATE'

EXPORTING

vbkok_wa = l_vbkok

synchron = 'X'

no_messages_update = ' '

update_picking = 'X'

commit = 'X'

delivery = l_vbeln

nicht_sperren = 'X'

if_error_messages_send_0 = space

IMPORTING

ef_error_any_0 = ef_error_any_0

ef_error_in_item_deletion_0 = ef_error_in_item_deletion_0

ef_error_in_pod_update_0 = ef_error_in_pod_update_0

ef_error_in_interface_0 = ef_error_in_interface_0

ef_error_in_goods_issue_0 = ef_error_in_goods_issue_0

ef_error_in_final_check_0 = ef_error_in_final_check_0

TABLES

prot = i_prot

EXCEPTIONS

error_message = 1

OTHERS = 2.

if sy-subrc ne 0.

message i010 with v_deliv.

else.

COMMIT WORK .

endif.

Reward Points if it is helpful

Thanks

Seshu