- 函数组与函数概念与关系
- 本地函数与远程函数
- SE37函数的定义（import、export、table等参数）
- 函数的调用
- 系统标准预留函数BAPI
一、RFC是什么
RFC是SAP系统和其他（SAP或非SAP）系统间的一个重要而常用的双向接口技术，也被视为SAP与外部通信的基本协议。简单地说，RFC过程就是系统调用当前系统外的程序模块，从而实现某个功能，而且调用系统和被调用系统中至少有一个必须是SAPABAP系统。这种远程功能调用也可在同一系统内部进行（如本地SAP系统内的远程调用）；但通常情况下，调用程序和被调用程序处于不同系统。
二、RFC开发技巧
- 属性定义
- 导入定义
- 导出定义
- 正在更改
- 表
- 例外
- 源代码
三、RFC开发实战(TCODE: SE37)
业务背景
因为业务需要多个业务场景需要获取学员的信息，包含学员基本信息、学员考勤等信息；现在需要把此功能封装供不用业务场景共同调用。
功能分析
1）创建共享共享程序块RFC。
2）RFC中实现，学员信息查询功能。
1.首先创建函数组（function group）
se80 输入将要创建的函数组名称“”，点击回车进行创建
输入描述信息，然后保存到自己的包和请求号下
创建成功，并激活
2.创建rfc函数（function module）
se37 输入将要创建的RFC函数“ZFM_HY01_SXQ01”，进行创建
输入刚才创建的函数组和描述信息
属性定义：改为远程调用，并进行激活
导入定义：修改输入参数
导出定义：修改输出参数
表：定义学员考勤表
例外（异常）：定义异常
源代码：写入代码
FUNCTION zfm_hy01_sxq01.
*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING
*" VALUE(PI_ZXH) TYPE ZDEKY_XH OPTIONAL
*" VALUE(PI_ZBJ) TYPE ZDEKY_BJ OPTIONAL
*" EXPORTING
*" VALUE(PE_ZXYXX) LIKE ZTKT_XYXX STRUCTURE ZTKT_XYXX
*" TABLES
*" ET_ZXYKQ STRUCTURE ZTKT_XYKQ OPTIONAL
*" EXCEPTIONS
*" Z_NO_XYXX
*" Z_NO_XYKQ
*" Z_NO_ALL
*"----------------------------------------------------------------------
* 获取：学员基本信息
SELECT SINGLE *
INTO CORRESPONDING FIELDS OF pe_zxyxx
FROM ztkt_xyxx
WHERE zxh = pi_zxh
AND zbj = pi_zbj.
*抛出三个异常
IF SY-SUBRC <> 0.
*3.获取：学员考勤记录表
SELECT *
INTO CORRESPONDING FIELDS OF TABLE ET_ZXYKQ
FROM ZTKT_XYKQ
WHERE ZXH = PI_ZXH
AND ZBJ = PI_ZBJ.
IF SY-SUBRC = 0."无学员信息，有考勤记录
*3.1.抛出异常:无学员信息
RAISE Z_NO_XYXX.
ELSE.
*3.抛出异常:无任何信息
RAISE Z_NO_ALL.
ENDIF.
ELSE.
*2.获取：学员考勤记录表
SELECT *
INTO CORRESPONDING FIELDS OF TABLE ET_ZXYKQ
FROM ZTKT_XYKQ
WHERE ZXH = PI_ZXH
AND ZBJ = PI_ZBJ.
IF SY-SUBRC NE 0.
*2.抛出异常:无考勤记录
RAISE E_NO_KQJL.
ENDIF.
ENDIF.
ENDFUNCTION.
3.运行结果查看，输入学号班级
执行查看
表中考勤记录查看
4.异常信息查看，输入不存在的学号
执行查看抛出的异常
5.调用rfc
（1）SE38 创建新的可执行程序
（2）Pattern快速调用RFC
显示
（3）定义变量
DATA: L_ZXH LIKE ZTKT_XYXX-ZXH VALUE 'HY101',
L_ZBJ LIKE ZTKT_XYXX-ZBJ VALUE 'H1',
LS_ZXYXX LIKE ZTKT_XYXX,
LT_ZXYKQ LIKE TABLE OF ZTKT_XYKQ WITH HEADER LINE.
全部代码
*&---------------------------------------------------------------------*
*& Report ZHYR01_20220721_HY101
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZHYR01_20220721_HY101.
DATA: L_ZXH LIKE ZTKT_XYXX-ZXH VALUE 'HY101',
L_ZBJ LIKE ZTKT_XYXX-ZBJ VALUE 'H1',
LS_ZXYXX LIKE ZTKT_XYXX,
LT_ZXYKQ LIKE TABLE OF ZTKT_XYKQ WITH HEADER LINE.
CALL FUNCTION 'ZFM_HY01_SXQ01'
EXPORTING
pi_zxh = L_ZXH
pi_zbj = L_ZBJ
IMPORTING
PE_ZXYXX = LS_ZXYXX
TABLES
ET_ZXYKQ = LT_ZXYKQ
EXCEPTIONS
E_NO_ALL = 1
OTHERS = 2
.
IF sy-subrc <> 0.
* Implement suitable error handling here
MESSAGE '无此学员信息' TYPE 'I'.
ELSE.
WRITE LS_ZXYXX-ZXM.
MESSAGE '获取学员信息成功' TYPE 'S'.
ENDIF.
运行结果查看
对比 修改输入的序号为表中不存在的学号
输出“无此学员信息”
