ABAP Select data from SAP table J_3RBS_LINE_2300 into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP J_3RBS_LINE_2300 table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to J_3RBS_LINE_2300. See here for more generic Select statement tips.

Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.

There is also a full declaration of the J_3RBS_LINE_2300 table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.

DATA: IT_J_3RBS_LINE_2300 TYPE STANDARD TABLE OF J_3RBS_LINE_2300,
      WA_J_3RBS_LINE_2300 TYPE J_3RBS_LINE_2300,
      GD_STR TYPE STRING.

DATA: lo_typedescr type REF TO cl_abap_typedescr.
DATA: lv_fieldname type fieldname.

FIELD-SYMBOLS: <FIELD> TYPE any.
FIELD-SYMBOLS: <J_3RBS_LINE_2300> TYPE J_3RBS_LINE_2300.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_J_3RBS_LINE_2300.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM J_3RBS_LINE_2300
  INTO TABLE IT_J_3RBS_LINE_2300.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RBS_LINE_2300
*  INTO TABLE @DATA(IT_J_3RBS_LINE_23002).
*--Further methods of using ABAP code to  select data from SAP database tables

*You can also declare the header/work area using the in-line DATA declaration method
READ TABLE IT_J_3RBS_LINE_2300 INDEX 1 INTO DATA(WA_J_3RBS_LINE_23002).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_J_3RBS_LINE_2300 ASSIGNING <J_3RBS_LINE_2300>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RBS_LINE_2300>-23001CURR = 1.
<J_3RBS_LINE_2300>-23001PREV = 1.
<J_3RBS_LINE_2300>-23001NAME = 1.
<J_3RBS_LINE_2300>-23002CURR = 1.
<J_3RBS_LINE_2300>-23002PREV = 1.
ENDLOOP.

LOOP AT IT_J_3RBS_LINE_2300 INTO WA_J_3RBS_LINE_2300.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3RBS_LINE_2300-23002NAME, sy-vline,
WA_J_3RBS_LINE_2300-23003CURR, sy-vline,
WA_J_3RBS_LINE_2300-23003PREV, sy-vline,
WA_J_3RBS_LINE_2300-23003NAME, sy-vline,
WA_J_3RBS_LINE_2300-23004CURR, sy-vline,
WA_J_3RBS_LINE_2300-23004PREV, sy-vline.
ENDLOOP. *Add any further fields from structure WA_J_3RBS_LINE_2300 you want to display... WRITE:/ sy-uline. * Aternatively use generic code to Write field values (and NAME) to screen report DO. ASSIGN COMPONENT sy-index OF STRUCTURE wa_J_3RBS_LINE_2300 TO <field>. IF sy-subrc <> 0. EXIT. ENDIF. WRITE:/ 'Field Value', <field>, sy-vline. gd_str = <field> . lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ). lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ). WRITE:/ 'Field Name', lv_fieldname. ENDDO. *Redo loop but convert all fields from internal to out value LOOP AT IT_J_3RBS_LINE_2300 INTO WA_J_3RBS_LINE_2300. *Write horizonal line to screen report. WRITE:/ sy-uline. *Convert all fields to display/output versions using conversion routines PERFORM convert_all_field_values CHANGING wa_EKKO. ENDLOOP. *&---------------------------------------------------------------------* *& Form convert_all_field_values *&---------------------------------------------------------------------* FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO. DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_J_3RBS_LINE_2300_STR,
23001CURR TYPE STRING,
23001PREV TYPE STRING,
23001NAME TYPE STRING,
23002CURR TYPE STRING,
23002PREV TYPE STRING,
23002NAME TYPE STRING,
23003CURR TYPE STRING,
23003PREV TYPE STRING,
23003NAME TYPE STRING,
23004CURR TYPE STRING,
23004PREV TYPE STRING,
23004NAME TYPE STRING,
23005CURR TYPE STRING,
23005PREV TYPE STRING,
23005NAME TYPE STRING,
23006CURR TYPE STRING,
23006PREV TYPE STRING,
23006NAME TYPE STRING,
23007CURR TYPE STRING,
23007PREV TYPE STRING,
23007NAME TYPE STRING,
23008CURR TYPE STRING,
23008PREV TYPE STRING,
23008NAME TYPE STRING,
23009CURR TYPE STRING,
23009PREV TYPE STRING,
23009NAME TYPE STRING,
23010CURR TYPE STRING,
23010PREV TYPE STRING,
23010NAME TYPE STRING,
23011CURR TYPE STRING,
23011PREV TYPE STRING,
23011NAME TYPE STRING,
23012CURR TYPE STRING,
23012PREV TYPE STRING,
23012NAME TYPE STRING,
23013CURR TYPE STRING,
23013PREV TYPE STRING,
23013NAME TYPE STRING,
23014CURR TYPE STRING,
23014PREV TYPE STRING,
23014NAME TYPE STRING,
23015CURR TYPE STRING,
23015PREV TYPE STRING,
23015NAME TYPE STRING,
23016CURR TYPE STRING,
23016PREV TYPE STRING,
23016NAME TYPE STRING,
23017CURR TYPE STRING,
23017PREV TYPE STRING,
23017NAME TYPE STRING,
23018CURR TYPE STRING,
23018PREV TYPE STRING,
23018NAME TYPE STRING,
23019CURR TYPE STRING,
23019PREV TYPE STRING,
23019NAME TYPE STRING,
23020CURR TYPE STRING,
23020PREV TYPE STRING,
23020NAME TYPE STRING,
23001EXPL TYPE STRING,
23002EXPL TYPE STRING,
23003EXPL TYPE STRING,
23004EXPL TYPE STRING,
23005EXPL TYPE STRING,
23006EXPL TYPE STRING,
23007EXPL TYPE STRING,
23008EXPL TYPE STRING,
23009EXPL TYPE STRING,
23010EXPL TYPE STRING,
23011EXPL TYPE STRING,
23012EXPL TYPE STRING,
23013EXPL TYPE STRING,
23014EXPL TYPE STRING,
23015EXPL TYPE STRING,
23016EXPL TYPE STRING,
23017EXPL TYPE STRING,
23018EXPL TYPE STRING,
23019EXPL TYPE STRING,
23020EXPL TYPE STRING,END OF T_EKKO_STR. DATA: WA_J_3RBS_LINE_2300_STR type T_EKKO_STR. DATA: ld_text TYPE string. LOOP AT IT_EKKO INTO WA_EKKO. MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR. CONCATENATE: sy-vline
WA_J_3RBS_LINE_2300_STR-23001CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23001PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23001NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23002CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23002PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23002NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23003CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23003PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23003NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23004CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23004PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23004NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23005CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23005PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23005NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23006CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23006PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23006NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23007CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23007PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23007NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23008CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23008PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23008NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23009CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23009PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23009NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23010CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23010PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23010NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23011CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23011PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23011NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23012CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23012PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23012NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23013CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23013PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23013NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23014CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23014PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23014NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23015CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23015PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23015NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23016CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23016PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23016NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23017CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23017PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23017NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23018CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23018PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23018NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23019CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23019PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23019NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23020CURR sy-vline
WA_J_3RBS_LINE_2300_STR-23020PREV sy-vline
WA_J_3RBS_LINE_2300_STR-23020NAME sy-vline
WA_J_3RBS_LINE_2300_STR-23001EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23002EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23003EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23004EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23005EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23006EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23007EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23008EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23009EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23010EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23011EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23012EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23013EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23014EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23015EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23016EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23017EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23018EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23019EXPL sy-vline
WA_J_3RBS_LINE_2300_STR-23020EXPL sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.