如何实现SAP跨系统取数

创建连接参数
公司在实施SAP后，可能会与其他业务系统进行集成。这样，就需要不同系统间进行同步数据，下面介绍SAP如何从其他数据库读取数据。以SQL为例。
第一步：创建数据库连接参数，键入DBCO，进入数据库连接总览界面。添加一个新的连接参数，输入连接名，DBS是指连接数据库的类型，SQL的为MSS,用户名，需在数据库系统中存在的，密码，连接信息：MSSQL_SERVER=IP adress MSSQL_DBNAME=dbname OBJECT_SOURCE=dbname；

ABAP编码
然后键入se38，新建一个报表程序。以下是代码内容。
REPORT YTEST003.

DATA g_conexion LIKE dbcon-con_name VALUE 'YANGTEST'.

DATA: exec_ref TYPE REF TO cx_sy_native_sql_error,
error_text TYPE string.

DATA: g_errorstr(250) TYPE c.

DATA: BEGIN OF WA_TRANS,
DEPARTMENTID TYPE N,
NAME(50) TYPE C,
DESCRIPTION(1000) TYPE C,
END OF WA_TRANS.

START-OF-SELECTION.

PERFORM sub_conndb USING g_conexion.
PERFORM getdata.
END-OF-SELECTION.

FORM sub_conndb USING conn LIKE dbcon-con_name.
CLEAR g_errorstr.
g_conexion = conn.
TRY.

EXEC SQL.
CONNECT TO :G_CONEXION
ENDEXEC.
EXEC SQL.
SET CONNECTION :G_CONEXION
ENDEXEC.
CATCH cx_sy_native_sql_error INTO exec_ref.
CONCATENATE '无法连接至SQL数据库 连接名:' g_conexion INTO g_errorstr.

ENDTRY.
ENDFORM.

FORM getdata.
TRY.
EXEC SQL.
OPEN CURSOR dbcur FOR
SELECT *
FROM DEPARTMENT
ENDEXEC.
DO.
EXEC SQL.
FETCH NEXT dbcur INTO :wa_trans.
ENDEXEC.
IF sy-subrc <> 0.
EXIT.
ELSE.
WRITE:/ WA_TRANS-NAME,WA_TRANS-DESCRIPTION.
ENDIF.
ENDDO.
EXEC SQL.
CLOSE dbcur
ENDEXEC.

CATCH cx_sy_native_sql_error INTO exec_ref.
g_errorstr = exec_ref->get_text( ).
CONCATENATE '读取数据出错, 连接名:' g_conexion g_errorstr INTO g_errorstr.

WRITE:/ g_errorstr.
ENDTRY.

ENDFORM.