业务场景和目的
F110在付款运行成功之后,将支付客户或供应商的未清项目、结清这些项目以及创建可发送给银行的付款媒介。
在未清项目中,可以指定不同于凭证货币的付款货币。还可以指定要支付项目的金额而不是总额。这表示它代表以付款货币支付的项目总额。
当激活了支付发布清单和直联支付(EPIC)应用程序后,将使用电子支付中心(EPIC)而不是传统的付款程序(F110)。
本文重点讨论的业务场景:bapi调用f110创建付款建议,传输到hec系统再通过摩根大通付款的各种操作。
创建付款建议
(1)f110创建付款建议前台操作
(2)调用bapi创建
CALL FUNCTION 'BAPI_ACC_GL_POSTING_POST' "BAPI调用
EXPORTING
documentheader = documentheader
IMPORTING
obj_type = obj_type
obj_key = obj_key
obj_sys = obj_sys
TABLES
accountgl = accountgl
currencyamount = currencyamount
extension1 = extension1
return = return.
删除付款建议
(1)f110删除付款建议前台操作
(2)调用bapi删除
CALL FUNCTION 'DELETE_PAYMENT_PROPOSAL'
EXPORTING
date = t_reguh-laufd
identification = t_reguh-laufi
EXCEPTIONS
abnormal_end = 1
no_delete_authority = 2
OTHERS = 3.
IF sy-subrc = 0.
CALL FUNCTION 'DELETE_PAYMENT_PARAMETERS_DB'
EXPORTING
i_laufd = t_reguh-laufd
i_laufi = t_reguh-laufi
EXCEPTIONS
deletion_not_allowed = 1
OTHERS = 2.
Endif.
运行付款建议
(1)手动运行:点击收付运行,勾选立即开始,点确定
2)调用BDC运行
"进入f110
PERFORM bdc_dynpro USING 'SAPF110V' '0200'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'F110V-LAUFD'"运行日期
gs_zhec001-laufd.
PERFORM bdc_field USING 'F110V-LAUFI'"标识
gs_zhec001-laufi.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPF110V'.
"点击运行按钮
PERFORM bdc_dynpro USING 'SAPF110V' '0200'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ZAEX'.
"运行付款建议
PERFORM bdc_dynpro USING 'SAPF110V' '1106'.
PERFORM bdc_field USING 'BDC_CURSOR'
'F110V-XSTRF'.
PERFORM bdc_field USING 'F110V-STRDT' "日期
gs_zhec001-strdt.
PERFORM bdc_field USING 'F110V-XSTRF' "立即开始标识
'X'.
PERFORM bdc_field USING 'F110V-STRZT' "时间
'00:00:00'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=EP'.
"调用事务代码
CALL TRANSACTION 'F110' USING it_bdcdata
MODE 'N'
UPDATE 'S'
MESSAGES INTO it_message.
冲销运行生成的付款建议
(1)调用fbra手动冲销
(2)调用BDC冲销
* BDC模式参数
opt-dismode = 'N'. "显示模式
opt-defsize = 'X'. "默认大小
opt-nobinpt = 'X'. "不是批量输入
* 进入fbra
PERFORM bdc_dynpro USING 'SAPMF05R' 0100.
PERFORM bdc_field USING 'BDC_OKCODE' '=RAGL'.
PERFORM bdc_field USING 'RF05R-AUGBL' ls_zbukr1-vblnr."凭证号
PERFORM bdc_field USING 'RF05R-BUKRS' ls_zbukr-zbukr."公司代码
PERFORM bdc_field USING 'RF05R-GJAHR' p_zhec001-laufd+0(4)."年度
* 选择重置并冲销
PERFORM bdc_dynpro USING 'SAPLSPO2' 0100.
PERFORM bdc_field USING 'BDC_OKCODE' '=OPT2'."重置并冲销
* 填入冲销信息
PERFORM bdc_dynpro USING 'SAPMF05R' 0300.
PERFORM bdc_field USING 'BDC_OKCODE' '=ENTR'.
PERFORM bdc_field USING 'RF05R-STGRD' '03'."冲销原因
* PERFORM bdc_field USING 'RF05R-BUDAT' sy-datum."日期
"调用事务代码
CALL TRANSACTION 'FBRA'
USING it_bdcdata
OPTIONS FROM opt
MESSAGES INTO it_message.
Fb03查询冲销凭证