MIr7 增强 LMR1M005
组件:LMR1M005
出口:EXIT_SAPLMRMC_002
事物代码:mir7
界面:1.产品价格 2.运费价格 3.产品加运费价格(一般不用,税率不同)
例子:对填入的数量进行验证, 填入的数量不能大于采购订单的数量。公司代码检查。
代码:
DATA: T_DRSEG LIKE TI_DRSEG WITH HEADER LINE. “加个抬头方便看数据
MOVE TI_DRSEG TO T_DRSEG[].
SELECT COUNT(*)
FROM EKKO
WHERE EBELN = T_DRSEG-EBELN
AND BUKRS = I_RBKPV-BUKRS.
IF SY-SUBRC <> 0.
MESSAGE '发票公司代码和采购订单公司代码不符' TYPE 'E'.
ENDIF.
T_DRSEG-KSCHL NE 'FRB1'