abapdotabapdeveloper-tools
来源资料待手动核验
A
已确认开发工具与自动化
ABAP Seltab To Where
Convert ABAP range tables to SQL where clause
项目简介
Convert ABAP range tables to SQL where clause
abapabapgitdotabapdeveloper-tools
兼容性
ABAP community catalog信息不足
README · 源仓库内容
打开原始 README
abap_seltab_to_where
Convert ABAP selection range tables to a SQL where clause.
Demo 1
REPORT ZR_DEMO_SELTAB_TO_WHERE.
data: lt_seltab TYPE zcl_abap_seltab_to_where=>tt_named_seltables,
lt_rng_carrid TYPE RANGE OF sflight-carrid.
lt_rng_carrid = VALUE #( sign = 'I' option = 'EQ' ( low = 'ABC' ) ).
lt_seltab = VALUE #( ( name = 'CARRID' dref = ref #( lt_rng_carrid ) ) ).
data(lv_where_clause) = zcl_abap_seltab_to_where=>combine_seltabs(
it_named_seltabs = lt_seltab ).
write: lv_where_clause.
" --------- OUTPUT ---------------
" ( CARRID EQ 'ABC' )
" --------- OUTPUT ---------------
Demo 2
REPORT ZR_DEMO_SELTAB_TO_WHERE.
data: lt_seltab TYPE zcl_abap_seltab_to_where=>tt_named_seltables,
lt_rng_carrid TYPE RANGE OF sflight-carrid,
lt_rng_fldate TYPE RANGE OF sflight-fldate.
lt_rng_carrid = VALUE #( sign = 'I' option = 'EQ' ( low = 'ABC' )
( low = 'DEF' ) ).
lt_rng_fldate = VALUE #( sign = 'I' option = 'BT' ( low = '20200101' high = '20201231' ) ).
lt_seltab = VALUE #( ( name = 'CARRID' dref = ref #( lt_rng_carrid ) )
( name = 'FLDATE' dref = ref #( lt_rng_fldate ) ) ).
data(lv_where_clause) = zcl_abap_seltab_to_where=>combine_seltabs(
it_named_seltabs = lt_seltab ).
write: lv_where_clause.
" --------- OUTPUT ---------------
" ( CARRID EQ 'ABC' OR CARRID EQ 'DEF' ) AND ( FLDATE BETWEEN '20200101' AND '20201231' )
" --------- OUTPUT ---------------
PR is welcome!
- Unit Test class is provided. Feel free to add more test cases.
Credits and references
Class ZCL_ABAP_SELTAB_TO_WHERE is modified from class CL_SHDB_SELTAB (More detail can be found in this post https://blogs.sap.com/2015/03/30/handling-of-select-options-parameters-within-amdp/).