点击此处---> 群内免费提供SAP练习系统(在群公告中)
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
你好
我一直在尝试使用类:/SCWM/CL_SR_BO_TU->方法:ADD_TU_DLV。将交付(仅在运行时创建)分配给TU。
已成功将交货分配给TU,但是TU的"标头"部分下的运输计划类型和"接收系统"字段未从交货中得到更新,尽管当我在"事务/SCWM/TU"中手动执行此操作时,它也会得到更新。 同样在调试模式下,我检查了传递给方法的所有参数值:ADD_TU_DLV与手动进行操作时完全相同。
如果我在此处缺少任何内容,请提供帮助,以使TU的标头部分中的这些字段从交货值中更新。
提前谢谢!
此致
Raj
嗨,拉吉,
我无法使用ADD_TU_DLV将交货分配给TU。 您能否提供有关此操作方式的任何见解? 文件很少。
谢谢
Tamara
TU必须与Delivery同步。 调用方法Add_tu_Dlv如下。
lo_bo_tu-> add_tu_dlv(
导出
iv_check_only = abap_false
iv_action_only = abap_true
it_bo_tu_dlv_no_sort = lt_bo_tu_dlv_no_sort_uc_s_cess_lv_cess_lv_s_p_sv_lv_tu_lv
使用以下示例代码:
数据:
) 。。
)。
-bo_ref-> add_tu_dlv(
-bo_ref-> add_tu_dlv( <_ abap_true。
lo_log类型参考到/scwm/cl_log,
lo_sr_bom类型参考到/scwm/cl_sr_bom,
lo_tu_query类型参考到/scwm/cl_sr_tu_query。
DATA:< br> lt_bo_tu类型/scwm/tt_bo_tunit,
lt_do_tu类型/scwm/tt_bo_door。
数据:
lst_asp_tu类型/scwm/s_asp_tu,
lst_tu_door类型/scwm/s_bo_t lst_sel_tu_num_ext TYPE/scwm/s_sel_tu_num_ext。
DATA:
lv_seq_num TYPE/scmb/de_seq_num,
ls_tu_dlv TYPE/scwm/s_bo_tu_dlv,
lt_tu_dlv _lv_tu_lv_tu_lv_tu_lv_tu_lv_tu_lv_sort/scwm/tt_bo_tu_dlv_no_sort,
lt_bo_tu_dlv_cross TYPE/scwm/tt_bo_tu_dlv,
lt_bo_tu_dlv_success TYPE/scwm/tt_bo_tu_dlv_no_sort,
lo_bo_tu_s/s_r_s_r_s_r_s_r_s_s_r_s lt_protocol TYPE bapirettab。
lst_tu_door-tu_num = is_bo_tu_dlv-tu_num。
lst_tu_door-tu_sr_act_num = is_bo_tu_dlv-tu_sr_act_num。 => cleanup()。
* Crea 业务对象管理器的实例--------------------------
免费eo_log。
清除ev_rejected。
尝试。< br> lo_sr_bom =/scwm/cl_sr_bom => get_instance()。
eo_log = lo_sr_bom-> get_log()。
CATCH/scwm/cx_sr_error。
ENDTRY。
lo_tu_query = NEW (eo_log)。
lst_sel_tu_num_ext-sign =/scdl/if_dl_query_c => sc_sign_include。
lst_sel_tu_num_ext-option =/scdl/if_dl_query_c => sc_option_eq。 = OUT} |
lo_tu_query-> add_tu_num_ext(is_tu_num_ext = lst_sel_tu_num_ext)。
*执行查询
尝试。
调用方法lo_sr_bom-> query
导出
io_tu_query = lo_tu_query
导入
et_bo_tu = lt_bo_tu
et_bo_door = lt_do_tu。
捕获/scwm/cx_sr_error。 " #EC NO_HANDLER
返回。
ENDTRY。
数据:ls_bo_data TYPE/scwm/s_bo_tu_data。
"分配交货
遍历it_docid分配字段符号(
lv_seq_num = lv_seq_num + 1.
清除ls_tu_dlv。 (当iv_doccat被提供后iv_doccat ELSE wmegc_doccat_pdo时)。
ls_tu_dlv-docid =
ls_tu_dlv-seq_num = lv_seq_num。
ls_tu_d_lv_dlv-lgnum。
ENDLOOP。
循环到lt_bo_tu ASSIGNING FIELD-SYMBOL(
尝试。
导出
> iv_check_only = abap_true
iv_action_only = abap_false
it_bo_tu_dlv_no_sort = lt_bo_tu_dlv_no_sort
iv_cross_hu_add = abap_true
IMPORTING
et_bo_tu_d_lv_tu_d_lv_tu = lv
如果eo_log-> mp_severity CA'E'。
ev_rejected = abap_true。
退出。
ENDIF。
导出< br> iv_check_only = abap_false
iv_action_only = abap_true
it_bo_tu_dlv_no_sort = lt_bo_tu_dlv_no_sort
IMPORTING
et_bo_tu_dlv_no_sort_success = lt_bo_tu_dlv_br -s
退出。
ELSE。
lo_sr_bom-> save()。
/scwm/cl_sr_tm => tm()。
进行工作并等待。
< br> ENDIF。
捕获cx_root INTO DATA(lx_root)。
DATA(l_message)= lx_root-> get_text()。
ENDTRY。
ENDLOOP。
一周热门 更多>