SAP ABAP FI行项目替代与完全凭证替代 区别

执行顺序:先行项目替代后完全凭证替代

区别      :F-02回车即执行行项目替代,保存凭证触发完全凭证替代 。

SAP提供了标准的替代示例:RGGBS000

行项目替代:

 exits-name  = 'U100'.
  exits-param = c_exit_param_none.
  exits-title = text-100.             "Cost center from CSKS
  APPEND exits.

FORM u100.

*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
* PLEASE DELETE THE FIRST '*' FORM THE BEGINING OF THE FOLLOWING LINES *
*        IF THE ACCOUNTING MODULE IS INSTALLED IN YOUR SYSTEM:         *
*  SELECT * FROM CSKS
*            WHERE KOSTL EQ COBL-KOSTL
*              AND KOKRS EQ COBL-KOKRS.
*    IF CSKS-DATBI >= SY-DATUM AND
*       CSKS-DATAB <= SY-DATUM.
*
*      MOVE CSKS-ABTEI TO COBL-KOSTL.
*
*    ENDIF.
*  ENDSELECT.

ENDFORM.  

完全凭证替代

 exits-name  = 'U102'.
  exits-param = C_EXIT_PARAM_CLASS.
  exits-title = text-100.             "Cost center from CSKS
  APPEND exits.

FORM u102 USING bool_data TYPE gb002_015.
DATA: SUM(10) TYPE C.

    LOOP AT BOOL_DATA-BSEG INTO BSEG
                    WHERE    SHKZG = 'S'.
       BSEG-ZUONR = 'Test'.
       MODIFY BOOL_DATA-BSEG FROM BSEG.
       ADD BSEG-DMBTR TO SUM.
    ENDLOOP.

    BKPF-XBLNR = TEXT-001.
    REPLACE '&' WITH SUM INTO BKPF-XBLNR.

ENDFORM.

  • 1
    点赞
  • 12
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值