* 交货单过账
  DATA:  LS_HEADER_DATA           TYPE BAPIIBDLVHDRCON,
              LS_HEADER_CONTROL   TYPE BAPIIBDLVHDRCTRLCON,
             LW_DELIVERY                    TYPE BAPIOBDLVHDRCON-DELIV_NUMB,
             IT_RETURN                         TYPE TABLE OF BAPIRET2 ,
            IS_RETURN                          TYPE BAPIRET2.

  LS_HEADER_DATA-DELIV_NUMB          = 交货单号.
  LS_HEADER_CONTROL-DELIV_NUMB  = 交货单号.
  LS_HEADER_CONTROL-POST_GI_FLG = 'X'   .
  LW_DELIVERY                                           = 交货单号.
  CALL FUNCTION 'BAPI_OUTB_DELIVERY_CONFIRM_DEC'

"CALL FUNCTION 'BAPI_INB_DELIVERY_CONFIRM_DEC'
    EXPORTING
      HEADER_DATA    = LS_HEADER_DATA
      HEADER_CONTROL = LS_HEADER_CONTROL
      DELIVERY       = LW_DELIVERY
    TABLES
      RETURN         = IT_RETURN.
  LOOP AT IT_RETURN INTO IS_RETURN WHERE TYPE = 'E' OR TYPE = 'A'.
    CONDENSE IS_RETURN-ID NO-GAPS.
    CONDENSE IS_RETURN-MESSAGE NO-GAPS.
    CONCATENATE IS_RETURN-ID
                IS_RETURN-MESSAGE
                报错信息
                INTO 报错信息
                SEPARATED BY ' '.
    CLEAR IS_RETURN.
  ENDLOOP.
  IF SY-SUBRC = 0.
    CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
  ELSE.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      EXPORTING
        WAIT = 'X'.
  ENDIF.

最新文章

  1. 【一起学OpenFOAM】系列由来
  2. 【PRINCE2是什么】PRINCE2认证之七大原则(3)
  3. SAP 中的用户类型
  4. vim 正则替换
  5. dede 留言板访问的目录
  6. 关于使用 jBox 对话框的提交问题
  7. linux gdb基本概念
  8. efwplusUI框架,支持在Liunx服务器运行的Web开发框架,C#开发
  9. 15套java互联网架构师、高并发、集群、负载均衡、高可用、数据库设计、缓存、性能优化、大型分布式 项目实战视频教程
  10. Dynamics CRM2011 导入解决方案报根组件插入错误的解决方法
  11. Android 增强版百分比布局库 为了适配而扩展
  12. eclipse--常见问题
  13. python中import问题
  14. Redis持久化存储(AOF与RDB两种模式)
  15. C++类有继承时,析构函数必须为虚函数
  16. 近期ASP.NET问题汇总及对应的解决办法
  17. Django后端项目---- rest framework(3)
  18. combineReducers 对数据进行拆分管以及使用immutable.js
  19. BlockingQueue之DelayQueue的学习使用
  20. Xstream将XML转换为javabean的问题

热门文章

  1. JavaScrip核心基础(讲师李立超)
  2. 使用WTM框架项目的部署遇到的问题及解决方式
  3. python读取Excel指定单元格的值
  4. python获取某一年的所有节假日
  5. Fast Report 分栏分页
  6. 查询redis路径,清除redis缓存
  7. pytorch学习笔记(10)--完整的模型训练(待完善)
  8. Django里ORM常用关键字
  9. 如何修改驱动使得NVIDIA Geforce GTX 970, 980, 980 TI and Titan X等显卡可以在Win XP/Win 2003 server x64下驱动?
  10. Selenium私房菜系列9 -- Selenium RC服务器命令行参数列表【VV】