SAP BW/HANA 数据源创建示例

操作实例

在ABAP中创建：

1、RSO2——创建数据源——明明规则：Z+ZZ/BZ/HY_PP/MM/SD/FI_数据表名

如果表数据中存在货币或者数量关联不是本表需要走RFC提取

根据RFC提取：

函数组—ZBW_GROUP_FI

创建RFC：ZBW_FUN_ZCOT007E

代码：

FUNCTION ZBW_FUN_ZCOT007E.
*"----------------------------------------------------------------------
*"*"本地接口：
*"  IMPORTING
*"     VALUE(I_REQUNR) TYPE  SRSC_S_IF_SIMPLE-REQUNR
*"     VALUE(I_DSOURCE) TYPE  SRSC_S_IF_SIMPLE-DSOURCE OPTIONAL
*"     VALUE(I_MAXSIZE) TYPE  SRSC_S_IF_SIMPLE-MAXSIZE OPTIONAL
*"     VALUE(I_INITFLAG) TYPE  SRSC_S_IF_SIMPLE-INITFLAG OPTIONAL
*"     VALUE(I_READ_ONLY) TYPE  SRSC_S_IF_SIMPLE-READONLY OPTIONAL
*"     VALUE(I_REMOTE_CALL) TYPE  SBIWA_FLAG DEFAULT SBIWA_C_FLAG_OFF
*"  TABLES
*"      E_T_DATA STRUCTURE  ZCOT007E_BW OPTIONAL
*"      I_T_SELECT TYPE  SRSC_S_IF_SIMPLE-T_SELECT OPTIONAL
*"      I_T_FIELDS TYPE  SRSC_S_IF_SIMPLE-T_FIELDS OPTIONAL
*"  EXCEPTIONS
*"      NO_MORE_DATA
*"      ERROR_PASSED_TO_MESS_HANDLER
*"----------------------------------------------------------------------* Example: DataSource for table SFLIGHT* Auxiliary Selection criteria structureDATA: L_S_SELECT TYPE SRSC_S_SELECT,WA_DATA LIKE E_T_DATA.
* Maximum number of lines for DB tableSTATICS: S_S_IF TYPE SRSC_S_IF_SIMPLE,* counterS_COUNTER_DATAPAKID LIKE SY-TABIX,* cursorS_CURSOR TYPE CURSOR.* Initialization mode (first call by SAPI) or data transfer mode
* (following calls) ?IF I_INITFLAG = SBIWA_C_FLAG_ON.************************************************************************
* Initialization: check input parameters
*                 buffer input parameters
*                 prepare data selection
************************************************************************* Check DataSource validityCASE I_DSOURCE.WHEN 'ZZZ_PP_ZCOT007E'.WHEN OTHERS.IF 1 = 2. MESSAGE E009(R3). ENDIF.
* this is a typical log call. Please write every error message like thisLOG_WRITE 'E'                  "message type'R3'                 "message class'009'                "message numberI_DSOURCE   "message variable 1' '.                 "message variable 2RAISE ERROR_PASSED_TO_MESS_HANDLER.ENDCASE.APPEND LINES OF I_T_SELECT TO S_S_IF-T_SELECT.* Fill parameter buffer for data extraction callsS_S_IF-REQUNR    = I_REQUNR.S_S_IF-DSOURCE = I_DSOURCE.S_S_IF-MAXSIZE   = I_MAXSIZE.* Fill field list table for an optimized select statement
* (in case that there is no 1:1 relation between InfoSource fields
* and database table fields this may be far from beeing trivial)APPEND LINES OF I_T_FIELDS TO S_S_IF-T_FIELDS.ELSE.                 "Initialization mode or data extraction ?************************************************************************
* Data transfer: First Call      OPEN CURSOR + FETCH
*                Following Calls FETCH only
************************************************************************* First data package -> OPEN CURSORIF S_COUNTER_DATAPAKID = 0.* Determine number of database records to be read per FETCH statement
* from input parameter I_MAXSIZE. If there is a one to one relation
* between DataSource table lines and database entries, this is trivial.
* In other cases, it may be impossible and some estimated value has to
* be determined.OPEN CURSOR WITH HOLD S_CURSOR FORSELECT *FROM ZCOT007E.ENDIF.                             "First data package ?* Fetch records into interface table.
*   named E_T_'Name of extract structure'.FETCH NEXT CURSOR S_CURSORAPPENDING CORRESPONDING FIELDSOF TABLE E_T_DATAPACKAGE SIZE S_S_IF-MAXSIZE.IF SY-SUBRC <> 0.CLOSE CURSOR S_CURSOR.RAISE NO_MORE_DATA.ENDIF.S_COUNTER_DATAPAKID = S_COUNTER_DATAPAKID + 1.ENDIF.              "Initialization mode or data extraction ?ENDFUNCTION.

然后点击保存