DATA: lo_model TYPE REF TO if_usmd_model_ext,
ls_sel TYPE usmd_s_sel,
lt_sel TYPE usmd_ts_sel,
lt_crequest TYPE SORTED TABLE OF usmd_s_crequest
WITH UNIQUE KEY usmd_crequest,
lt_message TYPE usmd_t_message.
CALL METHOD cl_usmd_model_ext=>get_instance
EXPORTING
i_usmd_model =
IMPORTING
eo_instance = lo_model
et_message = et_message.
IF lo_model IS BOUND.
ls_sel-fieldname = usmd0_cs_fld-crequest.
ls_sel-sign = usmd0_cs_ra-sign_i.
ls_sel-option = usmd0_cs_ra-option_eq.
ls_sel-low = iv_creq_id.
INSERT ls_sel INTO TABLE lt_sel.
ENDIF.
lo_model->read_char_value(
EXPORTING
i_fieldname = usmd0_cs_fld-crequest
it_sel = lt_sel
if_no_flush = abap_true
IMPORTING
et_data = lt_crequest
et_message = lt_message ).
APPEND LINES OF lt_message TO et_message.
READ TABLE lt_crequest INTO es_crequest WITH TABLE KEY usmd_crequest = iv_creq_id.