Filter with single value new syntax in ABAP
Refer- Introduction to filters in ABAP
Report-Single
REPORT zab_rp_filter_new.
TABLES: vbak.
TYPES: BEGIN OF ls_vbak,
vbeln TYPE vbeln_va,
vbtyp TYPE vbtypl,
END OF ls_vbak.
DATA: lt_vbak TYPE SORTED TABLE OF ls_vbak WITH NON-UNIQUE KEY vbtyp,
lr_vbak TYPE ls_vbak,
lt_filter TYPE TABLE OF ls_vbak,
lr_filter TYPE ls_vbak..
SELECT-OPTIONS : s_vbeln FOR vbak-vbeln.
IF s_vbeln IS NOT INITIAL.
SELECT vbeln vbtyp
FROM vbak
INTO TABLE lt_vbak
WHERE vbeln IN s_vbeln.
ENDIF.
lt_filter = FILTER #( lt_vbak WHERE vbtyp = CONV vbtypl( 'A' ) ).
cl_demo_output=>display( lt_filter ).
Input
Output
Report- Except
REPORT zab_rp_filter_new.
TABLES: vbak.
TYPES: BEGIN OF ls_vbak,
vbeln TYPE vbeln_va,
vbtyp TYPE vbtypl,
END OF ls_vbak.
DATA: lt_vbak TYPE SORTED TABLE OF ls_vbak WITH NON-UNIQUE KEY vbtyp,
lr_vbak TYPE ls_vbak,
lt_filter TYPE TABLE OF ls_vbak,
lr_filter TYPE ls_vbak..
SELECT-OPTIONS : s_vbeln FOR vbak-vbeln.
IF s_vbeln IS NOT INITIAL.
SELECT vbeln vbtyp
FROM vbak
INTO TABLE lt_vbak
WHERE vbeln IN s_vbeln.
ENDIF.
lt_filter = FILTER #( lt_vbak EXCEPT WHERE vbtyp = CONV vbtypl( 'A' ) ).
cl_demo_output=>display( lt_filter ).
Input
Output
********************************Thank You*****************************
Comments
Post a Comment