Any bapi or FM for doing picking or PGI

Question

Hi All
I want to do picking and PGI for outbound deliveries.  i tried using ws_delivery_update, its taking the pick quantity but not the batch number, for picking I just want to put the pick quantity same as delivery quantity and the batch say 'XYZ' provide by the distibuter need to put in the batch.
any help will be highly appreciated.
thanks
A

Answer 1

Hi Anup,
I have created a z functional module which is calling 'WS_DELIVERY_UPDATE' and its working fine. Sample code of my z-object is attached for your reference.
function z_post_goods_issue.
""Local interface:
*"  TABLES
*"      I_INPUT STRUCTURE  ZTMP_PGI OPTIONAL
  loop at i_input.
    clear : i_vbkok,flag1,flag2,i_prot,i_prot[].
    i_vbkok-vbeln_vl = i_input-vbeln.
    i_vbkok-wabuc    = 'X'.
    call function 'WS_DELIVERY_UPDATE'
         exporting
              vbkok_wa                          = i_vbkok
              synchron                           = 'X'
              commit                              = 'X'
              delivery                              = i_input-vbeln
              nicht_sperren                     = 'X'
              if_database_update             = '1'
              if_error_messages_send_0  = 'X'
         importing
              ef_error_any_0                  = flag1
              ef_error_in_goods_issue_0 = flag2
         tables
              prot                                  = i_prot.
    if flag1 = 'X' and flag2 = 'X' and not i_prot[] is initial.
      loop at i_prot where msgty = 'E'.
        call function 'FORMAT_MESSAGE'
             exporting
                  id   = i_prot-msgid
                  lang = sy-langu
                  no   = i_prot-msgno
             importing
                  msg  = i_input-retrn.
        if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        endif.
      endloop.
    else.
      i_input-retrn = 'PGI has been done'.
    endif.
    modify i_input.
  endloop.
Regards,
NJ