2008 Feb 15 8:58 AM
Hi All,
For example: there is one item in a delivery document which is batch splitted into a subitem 900001. now i want to pick this delivery in my program.
in foregroud, i need to input 'picking quantity' on subitem level(900001) so that the status can be changed from A to C meaning picking finished.
I tried using FM LE_MOB_DELIVERY_UPDATE but there isn't field for 'picking quantity'. some one advised using SD_DELIVERY_UPDATE_PICKING, but seems it has the same problem.
Thanks advance for your help.
Legend.
Hi All,
For example: there is one item in a delivery document which is batch splitted into a subitem 900001. now i want to pick this delivery in my program.
in foregroud, i need to input 'picking quantity' on subitem level(900001) so that the status can be changed from A to C meaning picking finished.
I tried using FM LE_MOB_DELIVERY_UPDATE but there isn't field for 'picking quantity'. some one advised using SD_DELIVERY_UPDATE_PICKING, but seems it has the same problem.
Thanks advance for your help.
Legend.
2008 Mar 19 1:32 AM
Resolved.
I am using function 'SD_DELIVERY_UPDATE_PICKING' for the picking:
Part 1. Populate VBKOK
REFRESH VBKOK.
Delivery# - DC2_VBELN
VBKOK-VBELN = DC2_VBELN.
VBKOK-VBELN_VL = DC2_VBELN.
APPEND VBKOK.
Part 2 Populate VBPOK
Delivery Items - ITAB_LIPS
REFRESH ITAB_LIPS.
SELECT * FROM LIPS
INTO TABLE ITAB_LIPS
WHERE VBELN = DC2_VBELN.
REFRESH VBPOK.
LOOP AT ITAB_LIPS.
CLEAR VBPOK.
VBPOK-VBELN_VL = ITAB_LIPS-VBELN."Delivery
VBPOK-POSNR_VL = ITAB_LIPS-POSNR."Delivery Item
VBPOK-POSNN = ITAB_LIPS-POSNR."Delivery Item
VBPOK-VBELN = ITAB_LIPS-VBELN."Pick Order
VBPOK-VBTYP_N = 'Q'.
Check UECHA to determine whether the item is splitted subitem,
because we only want pick the splitted subitem.
IF ITAB_LIPS-UECHA IS NOT INITIAL.
VBPOK-PIKMG = ITAB_LIPS-LFIMG."Picked Qty
VBPOK-MEINS = ITAB_LIPS-MEINS.
ENDIF.
VBPOK-NDIFM = 0.
VBPOK-TAQUI = ' '.
VBPOK-CHARG = ITAB_LIPS-CHARG.
VBPOK-MATNR = ITAB_LIPS-MATNR.
VBPOK-ORPOS = 0.
APPEND VBPOK.
ENDLOOP.
Picking
CALL FUNCTION 'SD_DELIVERY_UPDATE_PICKING'
EXPORTING
SYNCHRON = ''
NICHT_SPERREN = ''
VBKOK_WA = VBKOK
AUFRUFER_T = ''
TABLES
VBPOK_TAB = VBPOK
PROT = PROT.
COMMIT WORK.
Hope this help for those have the similar problem.
Thanks.
Legend.
| User | Count |
|---|---|
| 4 | |
| 2 | |
| 2 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |