Internal Table Expressions in ABAP 7.4

In this Post will show you what operation we can perform in Internal table in ABAP 7.4 New Syntax.

➢While reading data from Internal table, if records not found in Internal table then it through dump, To avoid dump we used TRY and CATCH to capture the exceptions. But If you don't want to use TRY and CATHC then we have another option we can used OPTIONAL key to avoid dump.

➤ Read data from Internal table based on Index.

➢ Before 7.4

READ TABLE lt_vbak INTO ls_vbak INDEX 1.
IF sy-subrc EQ 0.

ENDIF.

➢ After 7.4

TRY.
    DATA(ls_vbak) = lt_vbak[ 1 ].
  CATCH cx_sy_itab_line_not_found .
ENDTRY.

➣If you don't want to use TRY and CATCH then use below syntax: 

DATA(ls_vbak) = VALUE #( lt_vbak[ 1 ] OPTIONAL ).

➤ Read data from Internal table with key.

➢ Before 7.4

READ TABLE lt_vbak INTO ls_vbak WITH KEY vbeln = ls_vbap-vbeln
                                         erdat = ls_vbap-erdat.
IF sy-subrc EQ 0.

ENDIF.

➢ After 7.4

TRY.
    DATA(ls_vbak) = lt_vbak[ vbeln = ls_vbap-vbeln
                             erdat = ls_vbap-erdat  ].
  CATCH cx_sy_itab_line_not_found.
ENDTRY.

OR

DATA(ls_vbak) = VALUE #( lt_vbak[ vbeln = ls_vbap-vbeln
                                  erdat = ls_vbap-erdat ] OPTIONAL ).

➤ Records exist in internal table.

➢ Before 7.4

READ TABLE lt_vbak INTO ls_vbak TRANSPORTING
          NO FIELDS WITH KEY vbeln = ls_vbap-vbeln.
IF sy-subrc EQ 0.

ENDIF.

➢ After 7.4

IF line_exists( lt_vbak[ vbeln = ls_vbap-vbeln ] ).

ENDIF.

➤ Get the Index number from Internal table 

➢ Before 7.4

READ TABLE lt_vbak INTO ls_vbak WITH KEY vbeln = ls_vbap-vbeln.
IF sy-subrc EQ 0.
  lv_index = sy-tabix.
ENDIF.

➢ After 7.4

DATA(lv_index) = line_index( lt_vbak[ vbeln = ls_vbap-vbeln ] ).