CLASS model IMPLEMENTATION.
  METHOD main.
    DATA:  sql        TYPE REF TO cl_sql_prepared_statement,
           result     TYPE REF TO cl_sql_result_set,
           err        TYPE REF TO cx_sql_exception,
           cols       TYPE adbc_column_tab,
           city       TYPE zavs_t_adress-city,
           street     TYPE zavs_t_adress-street,
           house      TYPE zavs_t_adress-house,
           flat       TYPE zavs_t_adress-flat,
           status     TYPE zavs_t_adress-status,
           dref1      TYPE REF TO data,
           dref2      TYPE REF TO data,
          street_tab TYPE TABLE OF zavs_t_adress-street,
    lv_city     TYPE zavs_t_adress-city VALUE 'блабла'.

    APPEND 'CITY' TO cols.
    APPEND 'STREET' TO cols.
    APPEND 'блаблабла' TO street_tab.
    TRY.
        CREATE OBJECT sql
          EXPORTING
            statement = `SELECT * ` && `FROM zavs_t_adress ` && `WHERE city = '` && lv_city && `' AND street = ?`.
        GET REFERENCE OF street      INTO dref1.
        GET REFERENCE OF result_line INTO dref2.
        sql->set_param( dref1 ).
        LOOP AT street_tab INTO street .
          result = sql->execute_query( ).
          result->set_param_struct( struct_ref = dref2
                                    corresponding_fields = cols ).
          WHILE result->next( ) > 0.
            APPEND result_line TO result_tab.
          ENDWHILE.
        ENDLOOP.
        sql->close( ).
        display( ).
      CATCH cx_sql_exception INTO err.
        MESSAGE err TYPE 'I' DISPLAY LIKE 'E'.
    ENDTRY.
  ENDMETHOD.                    "main
  METHOD display.
    DATA alv TYPE REF TO cl_salv_table.
    DATA err TYPE REF TO cx_salv_msg.
    TRY.
        cl_salv_table=>factory(
          IMPORTING r_salv_table = alv
          CHANGING  t_table      = result_tab ).
        alv->display( ).
      CATCH cx_salv_msg INTO err.
        MESSAGE err TYPE 'I' DISPLAY LIKE 'E'.
    ENDTRY.
  ENDMETHOD.                    "display
ENDCLASS.                    "model IMPLEMENTATION

statement = `SELECT * ` && `FROM zavs_t_adress ` && `WHERE city = '` && lv_city && `' AND street = ?`.