ABAP Select data from SAP table J_3RBS_LINE_1450 into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP J_3RBS_LINE_1450 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_1450. 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_1450 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_1450 TYPE STANDARD TABLE OF J_3RBS_LINE_1450,
      WA_J_3RBS_LINE_1450 TYPE J_3RBS_LINE_1450,
      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_1450> TYPE J_3RBS_LINE_1450.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RBS_LINE_1450
*  INTO TABLE @DATA(IT_J_3RBS_LINE_14502).
*--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_1450 INDEX 1 INTO DATA(WA_J_3RBS_LINE_14502).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_J_3RBS_LINE_1450 ASSIGNING <J_3RBS_LINE_1450>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RBS_LINE_1450>-14501BEG = 1.
<J_3RBS_LINE_1450>-14501END = 1.
<J_3RBS_LINE_1450>-14501BPY = 1.
<J_3RBS_LINE_1450>-14501NAME = 1.
<J_3RBS_LINE_1450>-14502BEG = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3RBS_LINE_1450-14502END, sy-vline,
  WA_J_3RBS_LINE_1450-14502BPY, sy-vline,
  WA_J_3RBS_LINE_1450-14502NAME, sy-vline,
  WA_J_3RBS_LINE_1450-14503BEG, sy-vline,
  WA_J_3RBS_LINE_1450-14503END, sy-vline,
  WA_J_3RBS_LINE_1450-14503BPY, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_3RBS_LINE_1450 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_1450 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_1450 INTO WA_J_3RBS_LINE_1450.


*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_1450_STR, 
14501BEG TYPE STRING,
14501END TYPE STRING,
14501BPY TYPE STRING,
14501NAME TYPE STRING,
14502BEG TYPE STRING,
14502END TYPE STRING,
14502BPY TYPE STRING,
14502NAME TYPE STRING,
14503BEG TYPE STRING,
14503END TYPE STRING,
14503BPY TYPE STRING,
14503NAME TYPE STRING,
14504BEG TYPE STRING,
14504END TYPE STRING,
14504BPY TYPE STRING,
14504NAME TYPE STRING,
14505BEG TYPE STRING,
14505END TYPE STRING,
14505BPY TYPE STRING,
14505NAME TYPE STRING,
14506BEG TYPE STRING,
14506END TYPE STRING,
14506BPY TYPE STRING,
14506NAME TYPE STRING,
14507BEG TYPE STRING,
14507END TYPE STRING,
14507BPY TYPE STRING,
14507NAME TYPE STRING,
14508BEG TYPE STRING,
14508END TYPE STRING,
14508BPY TYPE STRING,
14508NAME TYPE STRING,
14509BEG TYPE STRING,
14509END TYPE STRING,
14509BPY TYPE STRING,
14509NAME TYPE STRING,
14510BEG TYPE STRING,
14510END TYPE STRING,
14510BPY TYPE STRING,
14510NAME TYPE STRING,
14511BEG TYPE STRING,
14511END TYPE STRING,
14511BPY TYPE STRING,
14511NAME TYPE STRING,
14512BEG TYPE STRING,
14512END TYPE STRING,
14512BPY TYPE STRING,
14512NAME TYPE STRING,
14513BEG TYPE STRING,
14513END TYPE STRING,
14513BPY TYPE STRING,
14513NAME TYPE STRING,
14514BEG TYPE STRING,
14514END TYPE STRING,
14514BPY TYPE STRING,
14514NAME TYPE STRING,
14515BEG TYPE STRING,
14515END TYPE STRING,
14515BPY TYPE STRING,
14515NAME TYPE STRING,
14516BEG TYPE STRING,
14516END TYPE STRING,
14516BPY TYPE STRING,
14516NAME TYPE STRING,
14517BEG TYPE STRING,
14517END TYPE STRING,
14517BPY TYPE STRING,
14517NAME TYPE STRING,
14518BEG TYPE STRING,
14518END TYPE STRING,
14518BPY TYPE STRING,
14518NAME TYPE STRING,
14519BEG TYPE STRING,
14519END TYPE STRING,
14519BPY TYPE STRING,
14519NAME TYPE STRING,
14520BEG TYPE STRING,
14520END TYPE STRING,
14520BPY TYPE STRING,
14520NAME TYPE STRING,
WAERS TYPE STRING,
14501EXPL TYPE STRING,
14502EXPL TYPE STRING,
14503EXPL TYPE STRING,
14504EXPL TYPE STRING,
14505EXPL TYPE STRING,
14506EXPL TYPE STRING,
14507EXPL TYPE STRING,
14508EXPL TYPE STRING,
14509EXPL TYPE STRING,
14510EXPL TYPE STRING,
14511EXPL TYPE STRING,
14512EXPL TYPE STRING,
14513EXPL TYPE STRING,
14514EXPL TYPE STRING,
14515EXPL TYPE STRING,
14516EXPL TYPE STRING,
14517EXPL TYPE STRING,
14518EXPL TYPE STRING,
14519EXPL TYPE STRING,
14520EXPL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3RBS_LINE_1450_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_1450_STR-14501BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14501END sy-vline 
WA_J_3RBS_LINE_1450_STR-14501BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14501NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14502BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14502END sy-vline 
WA_J_3RBS_LINE_1450_STR-14502BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14502NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14503BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14503END sy-vline 
WA_J_3RBS_LINE_1450_STR-14503BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14503NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14504BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14504END sy-vline 
WA_J_3RBS_LINE_1450_STR-14504BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14504NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14505BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14505END sy-vline 
WA_J_3RBS_LINE_1450_STR-14505BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14505NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14506BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14506END sy-vline 
WA_J_3RBS_LINE_1450_STR-14506BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14506NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14507BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14507END sy-vline 
WA_J_3RBS_LINE_1450_STR-14507BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14507NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14508BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14508END sy-vline 
WA_J_3RBS_LINE_1450_STR-14508BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14508NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14509BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14509END sy-vline 
WA_J_3RBS_LINE_1450_STR-14509BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14509NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14510BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14510END sy-vline 
WA_J_3RBS_LINE_1450_STR-14510BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14510NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14511BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14511END sy-vline 
WA_J_3RBS_LINE_1450_STR-14511BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14511NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14512BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14512END sy-vline 
WA_J_3RBS_LINE_1450_STR-14512BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14512NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14513BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14513END sy-vline 
WA_J_3RBS_LINE_1450_STR-14513BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14513NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14514BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14514END sy-vline 
WA_J_3RBS_LINE_1450_STR-14514BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14514NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14515BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14515END sy-vline 
WA_J_3RBS_LINE_1450_STR-14515BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14515NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14516BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14516END sy-vline 
WA_J_3RBS_LINE_1450_STR-14516BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14516NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14517BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14517END sy-vline 
WA_J_3RBS_LINE_1450_STR-14517BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14517NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14518BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14518END sy-vline 
WA_J_3RBS_LINE_1450_STR-14518BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14518NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14519BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14519END sy-vline 
WA_J_3RBS_LINE_1450_STR-14519BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14519NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-14520BEG sy-vline 
WA_J_3RBS_LINE_1450_STR-14520END sy-vline 
WA_J_3RBS_LINE_1450_STR-14520BPY sy-vline 
WA_J_3RBS_LINE_1450_STR-14520NAME sy-vline 
WA_J_3RBS_LINE_1450_STR-WAERS sy-vline 
WA_J_3RBS_LINE_1450_STR-14501EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14502EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14503EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14504EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14505EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14506EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14507EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14508EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14509EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14510EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14511EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14512EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14513EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14514EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14515EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14516EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14517EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14518EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14519EXPL sy-vline 
WA_J_3RBS_LINE_1450_STR-14520EXPL sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.