Startseite Beiträge getaggt mit "LIKE"

Schlagwort: LIKE

[ABAP] NativeSQL: Case-Insensitive Suche mit SELECT … UPPER 

TYPES: BEGIN OF ty_s_tableline,
         matnr TYPE matnr,
         spras TYPE spras,
         maktx TYPE maktx,
       END OF ty_s_tableline.

TYPES: ty_it_table TYPE STANDARD TABLE OF ty_s_tableline WITH DEFAULT KEY.

START-OF-SELECTION.

  TRY.
* Open Cursor and SELECT mit UPPER-CASE-Funktion
* ist im Standard-OpenSQL nicht möglich
      EXEC SQL.
        OPEN dbcur FOR
        SELECT matnr,
               spras,
               maktx
        FROM makt
        WHERE spras = 'D'
          AND UPPER(maktx) LIKE 'SCH%'
      ENDEXEC.

      IF sy-subrc = 0.
        DATA: lv_line TYPE ty_s_tableline.
        DATA: it_table TYPE ty_it_table.

* Loop Cursor Data
        DO.
* DB-Cursor auf nächsten Datensatz setzen, solange, wie Daten vorhanden sind
          EXEC SQL.
            FETCH NEXT dbcur INTO :lv_line
          ENDEXEC.
          IF sy-subrc = 0.
* Daten an itab anfügen
            APPEND lv_line TO it_table.
          ELSE.
            EXIT.
          ENDIF.
        ENDDO.

* Close Cursor
        EXEC SQL.
          CLOSE dbcur
        ENDEXEC.

* Daten ausgeben
        cl_demo_output=>display( it_table ).
      ENDIF.

    CATCH cx_sy_native_sql_error INTO DATA(e_txt).
      WRITE: / e_txt->get_text( ).
  ENDTRY.

[ABAP] OpenSQL: Wildcards (%) im SELECT-Statement verwenden

Beispiel 1: PARAMETERS mit Wildcard (%)

DATA: it_spfli TYPE STANDARD TABLE OF spfli.

PARAMETERS: p_carr TYPE spfli-carrid DEFAULT '%'.
  
* SELECT mit LIKE, für % als Wildcard
SELECT * FROM spfli
  INTO TABLE @it_spfli
  WHERE carrid LIKE @p_carr.

Beispiel 2: WHERE-Clause mit Wildcard (%)

DATA: it_usr TYPE STANDARD TABLE OF usr02 WITH DEFAULT KEY.

* alle Namen, die mit "Z" beginnen
SELECT * FROM usr02 INTO TABLE it_usr WHERE bname LIKE 'Z%'.

[ABAP] Interne Tabelle in einem ALV-Grid anzeigen, Spalten ausblenden 

DATA: it_spfli TYPE STANDARD TABLE OF spfli.

DATA: o_dock TYPE REF TO cl_gui_docking_container.
DATA: o_alv TYPE REF TO cl_gui_alv_grid.

PARAMETERS: p_carr TYPE spfli-carrid DEFAULT '%'.

INITIALIZATION.
* Container und ALV-Grid erzeugen
  IF NOT o_dock IS BOUND.

* Container für ALV-Grid erzeugen
    o_dock = NEW #( side  = cl_gui_docking_container=>dock_at_bottom
                    ratio = 80 ).

* Feldkatalog automatisch erstellen lassen
    DATA: o_salv TYPE REF TO cl_salv_table.

    cl_salv_table=>factory( IMPORTING
                              r_salv_table = o_salv
                            CHANGING
                              t_table      = it_spfli ).

    DATA(it_fcat) = cl_salv_controller_metadata=>get_lvc_fieldcatalog( r_columns = o_salv->get_columns( )
                                                                       r_aggregations = o_salv->get_aggregations( ) ).

* Spalten/Zell-Eigenschaften (Anzeige, F4-Hilfe, Edit ...) des Feldkatalogs setzen
    LOOP AT it_fcat ASSIGNING FIELD-SYMBOL(<fs_fcat>).
      CASE <fs_fcat>-fieldname.
        WHEN 'MANDT'.
          <fs_fcat>-no_out = abap_true.     " ausblenden
      ENDCASE.
    ENDLOOP.

* ALV-Grid erzeugen
    o_alv = NEW #( i_parent      = o_dock
                   i_appl_events = abap_true ).

* ALV-Grid initialisieren
    DATA(lv_layout) = VALUE lvc_s_layo( grid_title = 'Flugverbindungen' " Titel
                                        no_toolbar = abap_false         " Toolbar sichtbar
                                        smalltitle = abap_false         " große Überschrift
                                        zebra      = abap_true          " Zebrastreifen
                                        cwidth_opt = abap_true ).       " Spaltenbreiten optimieren

    o_alv->set_table_for_first_display( EXPORTING
                                          is_layout            = lv_layout
                                          i_bypassing_buffer   = abap_false
                                        CHANGING
                                          it_fieldcatalog      = it_fcat
                                          it_outtab            = it_spfli ).
  ENDIF.

AT SELECTION-SCREEN OUTPUT.

  IF o_alv IS BOUND.
* SELECT mit LIKE, für % als Wildcard
    SELECT * FROM spfli
      INTO TABLE @it_spfli
      WHERE carrid LIKE @p_carr.

* Inhalt neu darstellen
    o_alv->refresh_table_display( ).

* Spaltenbreiten erneut optimieren
    DATA: lv_ucomm  TYPE sy-ucomm VALUE '&OPT'.
    o_alv->set_function_code( CHANGING
                                c_ucomm = lv_ucomm ).
  ENDIF.