BAPI:SD销售订单修改：BAPI_SALESORDER_CHANGE_放弃幻想_的博客-程序员秘密

技术标签： ABAP

REPORT y_test_lzy .

DATA: salesdocument LIKE bapivbeln-vbeln,
order_header_inx LIKE bapisdh1x,
order_header_in LIKE bapisdh1,
return TYPE STANDARD TABLE OF bapiret2 WITH HEADER LINE,
conditions_in TYPE STANDARD TABLE OF bapicond WITH HEADER LINE,
conditions_inx TYPE STANDARD TABLE OF bapicondx WITH HEADER LINE,
logic_switch LIKE bapisdls.

DATA:lv_msgtxt TYPE char100.
LOOP AT p
t_ztxnth INTO DATA(ls_ztxnth) WHERE bz = 1.

READ TABLE lt_konv_th INTO DATA(ls_konv_th) WITH KEY vbeln = ls_ztxnth-vbeln_th
posnr = ls_ztxnth-posnr_th.
IF sy-subrc = 0.

salesdocument = ls_ztxnth-vbeln_th.
logic_switch-cond_handl = 'X'.
order_header_inx-updateflag = 'U'.

conditions_in-itm_number = ls_ztxnth-posnr_th.
conditions_in-cond_type = 'YA04'.
"差价 = 原销售订单总价格 - 退回订单总价
conditions_in-cond_value = ls_ztxnth-kbetr - ls_konv_th-kbetr.
conditions_in-currency = 'CNY'.
conditions_in-cond_p_unt  = 1.
APPEND conditions_in.

conditions_in-itm_number = ls_ztxnth-posnr_th.
conditions_inx-cond_type = 'YA04'.
conditions_inx-updateflag = 'U'.
conditions_inx-cond_value = 'X'.
conditions_inx-currency = 'X'.
conditions_inx-cond_p_unt  = 1.
APPEND conditions_inx.

ENDIF.

ls_ztxnth-kbetr_th = conditions_in-cond_value + ls_konv_th-kbetr.

ls_ztxnth-bz = 2.
MODIFY pt_ztxnth FROM ls_ztxnth.

ENDLOOP.

DELETE conditions_in WHERE cond_value = 0.

IF conditions_in[] IS NOT INITIAL.

PERFORM sapgui_progress_indicator USING ‘退货销售订单正在调整差价’."进度条显示

CALL FUNCTION ‘BAPI_SALESORDER_CHANGE’
EXPORTING
salesdocument = salesdocument
order_header_in = order_header_in
order_header_inx = order_header_inx
logic_switch = logic_switch
TABLES
return = return
conditions_in = conditions_in
conditions_inx = conditions_inx.

CLEAR lv_msgtxt.
LOOP AT return INTO DATA(la_return)
WHERE type = ‘E’
OR type = ‘A’
OR ( type = ‘W’ AND id = ‘V1’ AND number = ‘555’ ).
IF lv_msgtxt NS la_return-message.
CONCATENATE lv_msgtxt la_return-message INTO lv_msgtxt SEPARATED BY ‘/’ .
ENDIF.
ENDLOOP.

ENDIF.

本文链接：https://blog.csdn.net/FQHX_116/article/details/119535773

原作者删帖不实内容删帖广告或垃圾文章投诉

智能推荐

用java手动实现一个链表的增删改查_慕安凉的博客-程序员秘密

链表实际上就是用很多个Node节点组成的，每个节点Node又包含对象部分和指向下一个节点的指针。对链表的操作其实归根到底就是对节点指针的操作。链表的插入： 1、头插法：每次把新插入的节点当着头结点； 2、尾插法：每次把新插入的节点放在尾部； 3、指定位置插入法：每次在指定位置插入某个节点。链表的删除：删除指定位置上的某个节点链表的查询： 1、根据节点位置查询该节点； ...

Windows XP Professional SP2 原版_weixin_30333885的博客-程序员秘密

CD-KEY HCQ9D-TVCWX-X9QRG-J4B2Y-GR2TT QC986-27D34-6M3TY-JJXP9-TBGMD MRX3F-47B9T-2487J-KWKMF-RPWBY DP7CM-PD6MC-6BKXT-M8JJ6-RPXGJ F4297-RCWJP-P482C-YY23Y-XH8W3 迅雷下载Windows XP P...

使用kotlin<一>__Alan_WANG的博客-程序员秘密

使用kotlin<一>: 协程coroutines简述

python模拟点击手机_python3 selenuim PC端使用chrome模拟手机进行H5自动化_weixin_39617685的博客-程序员秘密

情况说明：初次在做PC端使用chrome进行H5自动化测试时，以为和app端自动化一样使用click()就可以对按钮进行点击，找了好几天也没有找到解决方法，有些人说是工程问题，有些人是使用微信进行H5测试，终于找到一篇文章介绍使用TouchAction模拟移动端触摸操作。环境：win10+python3+pycharm+webdriver 2.40+chrome 68.0.3440.75问题：使...

如何查看UVC设备的功能单元组成_go_str的博客-程序员秘密

前言 UVC的Spec在制定时考虑到了诸多不同UVC设备可能存在的特性，为保证Spec具有最大范围的适用性和兼容性，将UVC设备内可能存在的每个功能模块划分为逻辑意义上的功能单元(Entity)，并要求具体UVC设备的开发者必须为每个Entity指定ID号，且该ID号能唯一标识某一指定的功能单元，以便Host端的UVC驱动能依此对设备内不同的功能单元进行操作和配置。根据以上依据，我们...