SAP F-44 结算供应商清账的BDC源代码分享

最新推荐文章于 2024-07-14 08:30:00 发布

SAP爱好者

最新推荐文章于 2024-07-14 08:30:00 发布

阅读量2.8k

点赞数 3

本文链接：https://blog.csdn.net/dwjnhkbc123/article/details/120619629

版权

SAP ABAP 核心代码专栏收录该内容

27 篇文章 24 订阅

订阅专栏


      PERFORM SUB_BDC_DYNPRO      USING 'SAPMF05A' '0131'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_CURSOR'
                                    'RF05A-XPOS1(03)'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_OKCODE'
                                    '=PA'.
      PERFORM SUB_BDC_FIELD       USING 'RF05A-AGKON'
                                    GS_EPIC_7050-LIFNR.
      PERFORM SUB_BDC_FIELD       USING 'BKPF-BUDAT'
                                    SY-DATUM.
      PERFORM SUB_BDC_FIELD       USING 'BKPF-MONAT'
                                    SY-DATUM+4(2).
      PERFORM SUB_BDC_FIELD       USING 'BKPF-BUKRS'
                                   GS_EPIC_7050-BUKRS.
      PERFORM SUB_BDC_FIELD       USING 'BKPF-WAERS'
                                   GS_EPIC_7050-WAERS.
      IF GS_EPIC_7000-UMSKZ IS NOT INITIAL.
        PERFORM SUB_BDC_FIELD       USING 'RF05A-AGUMS'
                                     GS_EPIC_7050-UMSKZ.
      ENDIF.
      PERFORM SUB_BDC_FIELD       USING 'RF05A-XNOPS'
                                    'X'.
      PERFORM SUB_BDC_FIELD       USING 'RF05A-XPOS1(03)'
                                    'X'.
      PERFORM SUB_BDC_DYNPRO      USING 'SAPMF05A' '0731'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_CURSOR'
                                    'RF05A-SEL01(02)'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_OKCODE'
                                    '=PA'.
      PERFORM SUB_BDC_FIELD       USING 'RF05A-SEL01(01)'
                                    GS_EPIC_7050-BELNR.
      PERFORM SUB_BDC_FIELD       USING 'RF05A-SEL01(02)'
                                    GS_EPIC_7050-BELNR_FK .
      PERFORM SUB_BDC_DYNPRO      USING 'SAPDF05X' '3100'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_OKCODE'
                                     '=OMX' .
      PERFORM SUB_BDC_FIELD       USING 'BDC_CURSOR'
                                     'DF05B-PSSKT(01)' .
      PERFORM SUB_BDC_FIELD       USING 'RF05A-ABPOS'
                                     '1' .
      PERFORM SUB_BDC_DYNPRO      USING 'SAPDF05X' '3100'.

      PERFORM SUB_BDC_FIELD       USING 'BDC_OKCODE'
                                     '=Z+' .
      PERFORM SUB_BDC_FIELD       USING 'BDC_CURSOR'
                                    'DF05B-PSSKT(01)' .
      PERFORM SUB_BDC_FIELD       USING 'RF05A-ABPOS'
                               '1' .
      PERFORM SUB_BDC_DYNPRO      USING 'SAPDF05X' '3100'.
      PERFORM SUB_BDC_FIELD       USING 'BDC_OKCODE'
                               '=BU' .
      CALL TRANSACTION 'F-44' USING GT_BDCDATA MODE 'E' UPDATE 'S' MESSAGES INTO GT_MSG.
      READ TABLE GT_MSG INTO GS_MSG WITH  KEY MSGNR = '312' MSGID = 'F5'.

SAP清账相关事务代码

事务代码	短文本
F-44	结算供应商
F-51	过账（含清账）
F-54	供应商预付款清账
FB05	过账（含清账）
FB08	冲销凭证
FBRA	重置已结清项目

SAP清账相关函数

其实RFBIBL00也是用的这些。POSTING_INTERFACE_CLEARING
POSTING_INTERFACE_DOCUMENT
POSTING_INTERFACE_END
POSTING_INTERFACE_RESET_CLEAR
POSTING_INTERFACE_REVERSE_DOC
POSTING_INTERFACE_START

好像没有专门的BAPI用来做这个。

Q: What are some sample Direct input data transfer programs?
A: In MM for Material Master data - RMDATIND
FI - for Accounting Documents - RFBIBL00
PP - for Independent requirements - RM06IN00
CA - for Classification data - RCCLBI03