SAP ABAP编程采购订单过账

最新推荐文章于 2025-01-18 11:15:22 发布

心丨悦_蜗牛在裸奔

最新推荐文章于 2025-01-18 11:15:22 发布

阅读量3.1k

点赞数

分类专栏： SAP ABAP编程

本文链接：https://blog.youkuaiyun.com/qinyuezhan/article/details/43014857

版权

这是一个SAP ABAP函数模块`zmm_jsd_post`，用于处理采购订单的过账操作。它获取采购订单号、行项目号和日期，然后通过调用BAPI函数获取订单详情，并创建服务条目进行过账。如果过账成功，将记录相关信息到数据表。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

FUNCTION zmm_jsd_post .
*"----------------------------------------------------------------------
*"*"Local interface:
*"  IMPORTING
*"     VALUE(EBELN) TYPE  EKPO-EBELN
*"     VALUE(EBELP) TYPE  EKPO-EBELP
*"     VALUE(PODATE) TYPE  SY-DATUM
*"  EXPORTING
*"     VALUE(E_FLAG) TYPE  CHAR1
*"     VALUE(E_INFO) TYPE  TEXT60
*"     VALUE(F_LBLNI) TYPE  CHAR10
*"----------------------------------------------------------------------
*     采购订单过账接口
*"----------------------------------------------------------------------
***数据定义
   DATA : g_jsd                TYPE zmm_ys_jsd_item -jsd .     " 结算单号
   DATA : nownum       TYPE n LENGTH 10 .   "流水号
   DATA : maxnum       TYPE n LENGTH 10 .   "流水号
   DATA : lw_jspost TYPE zmm_jspost_info .

***采购订单行项目
   DATA : gw_ekpo      TYPE ekpo .
   DATA : gt_ekpo      TYPE TABLE OF ekpo .

***采购订单行项目服务明细
   DATA : gw_esll_item TYPE esll ,
        gt_esll_item TYPE TABLE OF esll .

**  Bapi Create Post
   DATA : lw_esllc   TYPE bapiesllc .
   DATA : lt_esllc   TYPE TABLE OF bapiesllc .                  "通讯结构:创建服务行
   DATA : lw_essrc   TYPE bapiessrc .                           "通讯结构: 创建输入单
   DATA : po_item    TYPE TABLE OF bapiekpo WITH HEADER LINE . "传输结构:显示/清单PO条目
   DATA : po_serv    TYPE TABLE OF bapiesll WITH