fi会计凭证过账增加记账码

《fi会计凭证过账增加记账码》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、会计凭证过账开发我们在生成凭证时候，可以选择用BDC的方式，但是由于凭证多种多样，使用BDC的话会力不从心，SAP提供了BAPI_ACC_DOCUMENT_POST这一BAPI来实现批量凭证的生成。使用该BAPI是必须做一个BADI增强，主要是把诸如记账码之类的行项目必须输入的字段导入。事务码：SE11，创建一个结构激活它。 创建Badi，事务码：SE19下面增加一个Filter：新增一条BKPFF(会计凭证直接输入)的Filter，这个参考业务类型一定要选，否则不会调用保存，如果保存时出现了下面这个消息，说明你必须将

2、你做的ClassicBadi迁移到NewBadi。此时可以选择已有的或创建新的BadiEnhancementImplementation。我们选择创建新的。下面已经增加成功建好之后系统提示：激活它。删除原始ClassicBadi，事务码：SE19回到SE19，如果进行了迁移，则在双击我们新建的NewBadi的时候会报出消息：所以我们删除我们之前创建的Z_MY_ACC_DOCUMENT，才能保证这个增强能够被正常调用。删除ClassicBadi时，系统首先提示：这个选择Yes随后系统又提示：这个提示的意思是询问，是否删除

3、从这个ClassicBadi迁移过去的NewBadi。显然要保留，这个选择No编辑代码在NewBadi里面显示Z_MY_ACC_DOCUMENT，此时将不会报出需要删除ClassicBadi的警告了。双击CHANGE方法即可进入编辑。代码示例：method IF_EX_ACC_DOCUMENT~CHANGE.  data: WA_EXTENSION type BAPIPAREX,        ZEXT_DATA    type ZFIDOCEXT.  field-symbols:  type ACCIT

4、.  if C_EXTENSION2[] is not initial.    loop at C_EXTENSION2 into WA_EXTENSION    where STRUCTURE = 'ZFIDOCEXT'.      ZEXT_DATA = WA_EXTENSION-VALUEPART1.      read table C_ACCIT assigning  with key POSNR = ZEXT_DATA-POSNR.      if SY-SUBRC = 0.        

5、CCIT>-BSCHL = ZEXT_DATA-BSCHL.        -RSTGR = ZEXT_DATA-RSTGR.      endif.    endloop.  endif.endmethod.代码释义CHANGE方法中参数FLT_VAL，C_ACCHD，C_ACCIT，C_ACCCR，C_ACCWT，C_ACCTX均与凭证数据相关。C_EXTENSION2中传入的数据即为BAPI_ACC_DOCUMENT_POST中EXTENSION2参数。BAPIPAREX-TE_STRUC为数据字典

6、中结构的名称，其余为扩展数据。上面例子中，生成BAPI的EXTENTION2参数时，就是按照ZFIDOCEXT的数据结构顺序写入的，读取时也按照相同的方式读取即可。根据参数里面的类型和说明来判断某个参数对应凭证中的什么数据，将BAPI中无法传入的数据从EXTENTION2里面取出，传入CHANGE的参数里面即可。下面是一个调用的例子程序，在ECC6下测试通过*&---------------------------------------------------------------------**& Report 

7、 ZFI090*&*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*report  ZFI090.tables: ZFIDOCEXT.data: WA_ZFIDOCEXT like ZFIDOCEXT occurs 0 with header line.data: HEADER

8、 like BAPIACHE09 occurs 0 with header line.data: WA_ACCOUNTTAX  like BAPIACTX09 occurs 0 with header line.data: WA_ACCOUNTGL  like BAPIACGL09  occurs 0 with header li