http://www.educity.cn　作者：佚名　来源：希赛教育
在ABAP编程中，有时候需要利用Native SQL操作数据库表(自定义和非业务数据的表，业务数据表我的建议还是应该通过SAP提供的类、函数，BAPI等技术操作)。下面的例子是通过游标操作Oracle的系统表的代码，供大家参考。

    *---------------------------------------------------------------------*
    * Read information about partitions of a table
    *---------------------------------------------------------------------*
    FORM get_partition_info
    USING
    i_tablnm TYPE rsd_tablnm
    CHANGING
    e_ts_part_info TYPE rsdu_ts_part_info.
    DATA:
    l_s_part_info TYPE rsdu_s_part_info.
    * this works only for Oracle
    CHECK sy-dbsys = 'ORACLE'.
    EXEC SQL.
    open csr for
    select partition_name, high_value
    from user_tab_partitions
    where table_name = :i_tablnm
    ENDEXEC.
    DO.
    EXEC SQL.
    fetch next csr into :l_s_part_info-partition_name,
    :l_s_part_info-high_value
    ENDEXEC.
    IF sy-subrc <> 0.
    EXIT.
    ENDIF.
    * Special treatment of upper limit (highvalue) in Oracle
    IF l_s_part_info-high_value EQ 'MAXVALUE'.
    l_s_part_info-high_value = rsdu_c_max_value.
    ENDIF.
    INSERT l_s_part_info INTO TABLE e_ts_part_info.
    ENDDO.
    EXEC SQL.
    close csr
    ENDEXEC.
    ENDFORM. " GET_PARTITION_INFO