Использование нового синтаксиса для проверки sy-subrc

1 способ

LOOP AT t_ret INTO DATA(s_ret) WHERE type = 'E'.

    ENDLOOP.

    IF sy-subrc <> 0.
      COMMIT WORK AND WAIT.
    ELSE.
      cl_mess->add_message( it_bapiret = t_ret ).
      ROLLBACK WORK.
    ENDIF.

LOOP AT t_ret INTO DATA(s_ret) WHERE type = 'E'.

ENDLOOP.

IF sy-subrc <> 0.

COMMIT WORK AND WAIT.

ELSE.

cl_mess->add_message( it_bapiret = t_ret ).

ROLLBACK WORK.

ENDIF.

2 способ. Новый синтаксис.

if line_exists( t_ret[ type = 'E' ] ).

1	if line_exists( t_ret[ type = 'E' ] ).