ABAP批次拆分的BAPI

BAPI_PRODORD_CREATE_FROM_DATA: 创建生产订单并将其与批次一起拆分。

BAPI_BATCH_CREATE: 创建批次并将其与物料一起拆分。

BAPI_BATCH_CHANGE: 更改现有批次的信息，包括数量和状态。

BAPI_BATCH_GETDETAIL: 获取批次的详细信息，包括库存和状态。

BAPI_BATCH_CREATE_GOODSMVT: 创建批次并将其用于物料移动。例如，从库存地点转移物料并将其与新的批次一起拆分。

BAPI_BATCH_CHANGE_GOODSMVT: 更改物料移动的现有批次的信息，包括数量和状态。

相关问题

ABAP批次拆分BAPI

以下是一个简单的ABAP程序，可用于批次拆分BAPI：

REPORT z_batch_split_bapi.

* 定义变量
DATA: lv_batchnum TYPE chabn,
      lt_batchsplit TYPE STANDARD TABLE OF bapivbfs,
      ls_batchsplit TYPE bapivbfs,
      lv_split_qty TYPE mara-menge.

* 输入批次号和拆分数量
PARAMETERS: p_batchnum TYPE chabn,
            p_split_qty TYPE mara-menge.

* 获取批次信息
SELECT SINGLE * FROM mcha WHERE charg = p_batchnum INTO @DATA(ls_batch).

* 计算剩余数量
lv_split_qty = ls_batch-labst - p_split_qty.

* 准备拆分表
ls_batchsplit-mblnr = ls_batch-mblnr.
ls_batchsplit-zeile = ls_batch-zeile.
ls_batchsplit-posnr = ls_batch-posnr.
ls_batchsplit-charg = p_batchnum.
ls_batchsplit-menge = p_split_qty.
ls_batchsplit-meins = ls_batch-meins.

APPEND ls_batchsplit TO lt_batchsplit.

CLEAR ls_batchsplit.
ls_batchsplit-mblnr = ls_batch-mblnr.
ls_batchsplit-zeile = ls_batch-zeile.
ls_batchsplit-posnr = ls_batch-posnr + 1.
ls_batchsplit-charg = lv_batchnum.
ls_batchsplit-menge = lv_split_qty.
ls_batchsplit-meins = ls_batch-meins.

APPEND ls_batchsplit TO lt_batchsplit.

* 调用拆分BAPI
CALL FUNCTION 'BAPI_BATCH_CHANGE'
  EXPORTING
    change_data_general = abap_true
  TABLES
    batchsplit = lt_batchsplit
  EXCEPTIONS
    error_occurred = 1
    OTHERS = 2.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
  COMMIT WORK.
  WRITE: / 'Batch', p_batchnum, 'has been split into', lv_batchnum, 'and remaining quantity is', lv_split_qty.
ENDIF.

在这个示例中，我们首先从MCHA表中获取了批次信息，然后计算出剩余数量，并对BAPI_VBFS表进行填充。

然后我们调用了BAPI_BATCH_CHANGE来进行拆分操作。

您需要替换一些变量名称以适应您自己的系统。此代码仅供参考，应进行适当的测试和优化。

ABAP 查询交货单合并批次拆分的SQL

在ABAP (Advanced Business Application Programming) 中，查询物料凭证（即交货单）可能会涉及到数据的合并和拆分操作，特别是处理批量发货的情况。这里并没有直接的SQL查询语法，因为ABAP更倾向于使用事务码、数据库表之间的逻辑连接以及循环结构（如LOOPS或SELECT-OPTIONS）来处理这类业务逻辑。然而，如果你需要编写一个基本的SQL查询作为参考，假设我们正在操作一个名为`MARA`（主物料清单）的表，它包含了物料的批次信息，你可以尝试这样的示例：

-- 查询所有未拆分的交货单
SELECT * FROM MARA WHERE BATCHING_STATUS = 'UN_SPLIT'

-- 查询特定批次的交货单
SELECT * FROM MARA WHERE BATCH_ID = <批次号>

-- 模拟合并批次查询（假设存在一个包含批次汇总的临时表TEMP_BATCHES）
SELECT MARA.* 
FROM MARA 
JOIN TEMP_BATCHES ON MARA.MATERIAL = TEMP_BATCHES.Material AND MARA.SHIPPING_DOC_NUMBER = TEMP_BATCHES.ShippingDocNumber
WHERE TEMP_BATCHES.BATCH_ID = <目标批次>

-- 如果要拆分批次
UPDATE MARA SET BATCHING_STATUS = 'SPLIT'
WHERE BATCH_ID IN (
   SELECT BATCH_ID FROM TEMP_BATCHES_SPLITTING
   WHERE SHIPPING_DOC_NUMBER = <具体文档编号>
)

--