|
Buenos dias,
igual te sirve
* order_header_inx
order_header_inx-updateflag = 'U'.
* Informamos la cantidad
* SD_ORDER_SCHEDULES_IN
sd_order_schedules_in-itm_number = wf_vbap-posnr.
sd_order_schedules_in-sched_line = '0001'.
sd_order_schedules_in-req_qty = list_tab-kwmeng.
sd_order_schedules_inx-itm_number = wf_vbap-posnr.
sd_order_schedules_inx-sched_line = '0001'.
sd_order_schedules_inx-req_qty = 'X'.
sd_order_schedules_inx-updateflag = 'U'.
APPEND sd_order_schedules_in.
APPEND sd_order_schedules_inx.
* SD_ORDER_ITEMS_IN
sd_order_items_in1-po_itm_no = wf_vbap-posnr.
sd_order_items_in1-itm_number = wf_vbap-posnr.
sd_order_items_inx1-itm_number = wf_vbap-posnr.
sd_order_items_inx1-updateflag = 'U'.
* sd_order_items_in1-material = quota_tab-matnr.
* sd_order_items_inx1-material = 'X'.
list_tab-kwmeng = list_tab-kwmeng * 1000.
sd_order_items_in1-target_qty = list_tab-kwmeng.
* sd_order_items_inx1-target_qty = 'X'.
sd_order_items_in1-reason_rej = d_bloqueo. "ABGRU
sd_order_items_inx1-reason_rej = 'X'.
APPEND sd_order_items_in1.
APPEND sd_order_items_inx1.
|