ABAP Select data from SAP table J_3RBS_LINE_1210 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_1210 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_1210. 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_1210 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_1210 TYPE STANDARD TABLE OF J_3RBS_LINE_1210,
      WA_J_3RBS_LINE_1210 TYPE J_3RBS_LINE_1210,
      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_1210> TYPE J_3RBS_LINE_1210.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RBS_LINE_1210
*  INTO TABLE @DATA(IT_J_3RBS_LINE_12102).
*--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_1210 INDEX 1 INTO DATA(WA_J_3RBS_LINE_12102).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RBS_LINE_1210>-12101BEG = 1.
<J_3RBS_LINE_1210>-12101END = 1.
<J_3RBS_LINE_1210>-12101BPY = 1.
<J_3RBS_LINE_1210>-12101NAME = 1.
<J_3RBS_LINE_1210>-12102BEG = 1.

ENDLOOP.

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

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


*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_1210_STR, 
12101BEG TYPE STRING,
12101END TYPE STRING,
12101BPY TYPE STRING,
12101NAME TYPE STRING,
12102BEG TYPE STRING,
12102END TYPE STRING,
12102BPY TYPE STRING,
12102NAME TYPE STRING,
12103BEG TYPE STRING,
12103END TYPE STRING,
12103BPY TYPE STRING,
12103NAME TYPE STRING,
12104BEG TYPE STRING,
12104END TYPE STRING,
12104BPY TYPE STRING,
12104NAME TYPE STRING,
12105BEG TYPE STRING,
12105END TYPE STRING,
12105BPY TYPE STRING,
12105NAME TYPE STRING,
12106BEG TYPE STRING,
12106END TYPE STRING,
12106BPY TYPE STRING,
12106NAME TYPE STRING,
12107BEG TYPE STRING,
12107END TYPE STRING,
12107BPY TYPE STRING,
12107NAME TYPE STRING,
12108BEG TYPE STRING,
12108END TYPE STRING,
12108BPY TYPE STRING,
12108NAME TYPE STRING,
12109BEG TYPE STRING,
12109END TYPE STRING,
12109BPY TYPE STRING,
12109NAME TYPE STRING,
12110BEG TYPE STRING,
12110END TYPE STRING,
12110BPY TYPE STRING,
12110NAME TYPE STRING,
12111BEG TYPE STRING,
12111END TYPE STRING,
12111BPY TYPE STRING,
12111NAME TYPE STRING,
12112BEG TYPE STRING,
12112END TYPE STRING,
12112BPY TYPE STRING,
12112NAME TYPE STRING,
12113BEG TYPE STRING,
12113END TYPE STRING,
12113BPY TYPE STRING,
12113NAME TYPE STRING,
12114BEG TYPE STRING,
12114END TYPE STRING,
12114BPY TYPE STRING,
12114NAME TYPE STRING,
12115BEG TYPE STRING,
12115END TYPE STRING,
12115BPY TYPE STRING,
12115NAME TYPE STRING,
12116BEG TYPE STRING,
12116END TYPE STRING,
12116BPY TYPE STRING,
12116NAME TYPE STRING,
12117BEG TYPE STRING,
12117END TYPE STRING,
12117BPY TYPE STRING,
12117NAME TYPE STRING,
12118BEG TYPE STRING,
12118END TYPE STRING,
12118BPY TYPE STRING,
12118NAME TYPE STRING,
12119BEG TYPE STRING,
12119END TYPE STRING,
12119BPY TYPE STRING,
12119NAME TYPE STRING,
12120BEG TYPE STRING,
12120END TYPE STRING,
12120BPY TYPE STRING,
12120NAME TYPE STRING,
WAERS TYPE STRING,
12101EXPL TYPE STRING,
12102EXPL TYPE STRING,
12103EXPL TYPE STRING,
12104EXPL TYPE STRING,
12105EXPL TYPE STRING,
12106EXPL TYPE STRING,
12107EXPL TYPE STRING,
12108EXPL TYPE STRING,
12109EXPL TYPE STRING,
12110EXPL TYPE STRING,
12111EXPL TYPE STRING,
12112EXPL TYPE STRING,
12113EXPL TYPE STRING,
12114EXPL TYPE STRING,
12115EXPL TYPE STRING,
12116EXPL TYPE STRING,
12117EXPL TYPE STRING,
12118EXPL TYPE STRING,
12119EXPL TYPE STRING,
12120EXPL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3RBS_LINE_1210_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_1210_STR-12101BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12101END sy-vline 
WA_J_3RBS_LINE_1210_STR-12101BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12101NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12102BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12102END sy-vline 
WA_J_3RBS_LINE_1210_STR-12102BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12102NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12103BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12103END sy-vline 
WA_J_3RBS_LINE_1210_STR-12103BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12103NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12104BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12104END sy-vline 
WA_J_3RBS_LINE_1210_STR-12104BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12104NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12105BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12105END sy-vline 
WA_J_3RBS_LINE_1210_STR-12105BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12105NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12106BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12106END sy-vline 
WA_J_3RBS_LINE_1210_STR-12106BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12106NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12107BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12107END sy-vline 
WA_J_3RBS_LINE_1210_STR-12107BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12107NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12108BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12108END sy-vline 
WA_J_3RBS_LINE_1210_STR-12108BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12108NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12109BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12109END sy-vline 
WA_J_3RBS_LINE_1210_STR-12109BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12109NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12110BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12110END sy-vline 
WA_J_3RBS_LINE_1210_STR-12110BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12110NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12111BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12111END sy-vline 
WA_J_3RBS_LINE_1210_STR-12111BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12111NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12112BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12112END sy-vline 
WA_J_3RBS_LINE_1210_STR-12112BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12112NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12113BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12113END sy-vline 
WA_J_3RBS_LINE_1210_STR-12113BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12113NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12114BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12114END sy-vline 
WA_J_3RBS_LINE_1210_STR-12114BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12114NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12115BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12115END sy-vline 
WA_J_3RBS_LINE_1210_STR-12115BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12115NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12116BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12116END sy-vline 
WA_J_3RBS_LINE_1210_STR-12116BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12116NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12117BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12117END sy-vline 
WA_J_3RBS_LINE_1210_STR-12117BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12117NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12118BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12118END sy-vline 
WA_J_3RBS_LINE_1210_STR-12118BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12118NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12119BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12119END sy-vline 
WA_J_3RBS_LINE_1210_STR-12119BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12119NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-12120BEG sy-vline 
WA_J_3RBS_LINE_1210_STR-12120END sy-vline 
WA_J_3RBS_LINE_1210_STR-12120BPY sy-vline 
WA_J_3RBS_LINE_1210_STR-12120NAME sy-vline 
WA_J_3RBS_LINE_1210_STR-WAERS sy-vline 
WA_J_3RBS_LINE_1210_STR-12101EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12102EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12103EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12104EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12105EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12106EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12107EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12108EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12109EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12110EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12111EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12112EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12113EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12114EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12115EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12116EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12117EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12118EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12119EXPL sy-vline 
WA_J_3RBS_LINE_1210_STR-12120EXPL sy-vline      INTO ld_text SEPARATED BY SPACE.

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