среда, 18 июля 2018 г.

Изящная очистка таблицы от чего-либо


*"  Очистка от null
    gt_fields CAST cl_abap_structdescr(
        CAST cl_abap_tabledescr(
            cl_abap_tabledescr=>describe_by_dataRESULT_PACKAGE )
        )->get_table_line_type(
        )
    )->get_components(
    ).

    LOOP AT RESULT_PACKAGE ASSIGNING <result_fields>.
      LOOP AT gt_fields ASSIGNING FIELD-SYMBOL(<fs_fields>).
        ASSIGN COMPONENT <fs_fields>-name OF STRUCTURE <result_fields>
          TO FIELD-SYMBOL(<fs_field>).

        field <fs_field>.
        REPLACE ALL OCCURRENCES OF `null`
             IN field
           WITH ``
        IGNORING CASE.
        <fs_field> field.

      ENDLOOP.
    ENDLOOP.

Комментариев нет:

Отправить комментарий