*&---------------------------------------------------------------------*
*& Report Z99_134
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z99_134.

*" ABAP 7.40 릴리즈 이전
DATA: LT_SBOOK  TYPE TABLE OF SBOOK,
      LT_FILTER LIKE LT_SBOOK.

SELECT *
  FROM SBOOK
  INTO CORRESPONDING FIELDS OF TABLE @LT_SBOOK.

LT_FILTER = LT_SBOOK.
DELETE LT_FILTER WHERE CARRID NE 'LH'.

CL_DEMO_OUTPUT=>DISPLAY( LT_FILTER ).


**" ABAP 7.40 릴리즈 이후
*DATA:
*  LT_FILTER TYPE TABLE OF SBOOK,
*  LT_SBOOK  TYPE TABLE OF SBOOK
*           WITH NON-UNIQUE SORTED KEY FILTER_KEY
*           COMPONENTS CARRID CONNID.
*
*SELECT *
*  FROM SBOOK
*  INTO CORRESPONDING FIELDS OF TABLE @LT_SBOOK.
*
*LT_FILTER =
*  FILTER #( LT_SBOOK USING KEY FILTER_KEY
*                     WHERE CARRID EQ CONV #( 'LH' ) ).
*
*CL_DEMO_OUTPUT=>DISPLAY( LT_FILTER ).