To simplify the code example, the below code contains hard-coded values that need to be replaced with values that are relevant for the system where the code is executed.
DATA: lref_data TYPE REF TO data, lx_error TYPE REF TO cx_root, lv_count TYPE int4.FIELD-SYMBOLS: <lt_data> TYPE STANDARD TABLE.TRY . CREATE DATA lref_data TYPE TABLE OF ('/BIC/AZJG_AD012'). ASSIGN lref_data->* to <lt_data>. CALL METHOD cl_rsda_infoprov_query=>select EXPORTING i_infoprov = 'ZJG_AD01' i_where_condition = `CALYEAR >= '2005'` CHANGING c_t_data = <lt_data>. lv_count = LINES( <lt_data> ). WRITE: 'Lines of data read: ', lv_count. EXIT.CATCH cx_root INTO lx_error.ENDTRY.
