ABAP Select data from SAP table J_3RBS_LINE_1410 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_1410 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_1410. 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_1410 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_1410 TYPE STANDARD TABLE OF J_3RBS_LINE_1410,
      WA_J_3RBS_LINE_1410 TYPE J_3RBS_LINE_1410,
      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_1410> TYPE J_3RBS_LINE_1410.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RBS_LINE_1410
*  INTO TABLE @DATA(IT_J_3RBS_LINE_14102).
*--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_1410 INDEX 1 INTO DATA(WA_J_3RBS_LINE_14102).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RBS_LINE_1410>-14101BEG = 1.
<J_3RBS_LINE_1410>-14101END = 1.
<J_3RBS_LINE_1410>-14101BPY = 1.
<J_3RBS_LINE_1410>-14101NAME = 1.
<J_3RBS_LINE_1410>-14102BEG = 1.

ENDLOOP.

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

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


*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_1410_STR, 
14101BEG TYPE STRING,
14101END TYPE STRING,
14101BPY TYPE STRING,
14101NAME TYPE STRING,
14102BEG TYPE STRING,
14102END TYPE STRING,
14102BPY TYPE STRING,
14102NAME TYPE STRING,
14103BEG TYPE STRING,
14103END TYPE STRING,
14103BPY TYPE STRING,
14103NAME TYPE STRING,
14104BEG TYPE STRING,
14104END TYPE STRING,
14104BPY TYPE STRING,
14104NAME TYPE STRING,
14105BEG TYPE STRING,
14105END TYPE STRING,
14105BPY TYPE STRING,
14105NAME TYPE STRING,
14106BEG TYPE STRING,
14106END TYPE STRING,
14106BPY TYPE STRING,
14106NAME TYPE STRING,
14107BEG TYPE STRING,
14107END TYPE STRING,
14107BPY TYPE STRING,
14107NAME TYPE STRING,
14108BEG TYPE STRING,
14108END TYPE STRING,
14108BPY TYPE STRING,
14108NAME TYPE STRING,
14109BEG TYPE STRING,
14109END TYPE STRING,
14109BPY TYPE STRING,
14109NAME TYPE STRING,
14110BEG TYPE STRING,
14110END TYPE STRING,
14110BPY TYPE STRING,
14110NAME TYPE STRING,
14111BEG TYPE STRING,
14111END TYPE STRING,
14111BPY TYPE STRING,
14111NAME TYPE STRING,
14112BEG TYPE STRING,
14112END TYPE STRING,
14112BPY TYPE STRING,
14112NAME TYPE STRING,
14113BEG TYPE STRING,
14113END TYPE STRING,
14113BPY TYPE STRING,
14113NAME TYPE STRING,
14114BEG TYPE STRING,
14114END TYPE STRING,
14114BPY TYPE STRING,
14114NAME TYPE STRING,
14115BEG TYPE STRING,
14115END TYPE STRING,
14115BPY TYPE STRING,
14115NAME TYPE STRING,
14116BEG TYPE STRING,
14116END TYPE STRING,
14116BPY TYPE STRING,
14116NAME TYPE STRING,
14117BEG TYPE STRING,
14117END TYPE STRING,
14117BPY TYPE STRING,
14117NAME TYPE STRING,
14118BEG TYPE STRING,
14118END TYPE STRING,
14118BPY TYPE STRING,
14118NAME TYPE STRING,
14119BEG TYPE STRING,
14119END TYPE STRING,
14119BPY TYPE STRING,
14119NAME TYPE STRING,
14120BEG TYPE STRING,
14120END TYPE STRING,
14120BPY TYPE STRING,
14120NAME TYPE STRING,
WAERS TYPE STRING,
14101EXPL TYPE STRING,
14102EXPL TYPE STRING,
14103EXPL TYPE STRING,
14104EXPL TYPE STRING,
14105EXPL TYPE STRING,
14106EXPL TYPE STRING,
14107EXPL TYPE STRING,
14108EXPL TYPE STRING,
14109EXPL TYPE STRING,
14110EXPL TYPE STRING,
14111EXPL TYPE STRING,
14112EXPL TYPE STRING,
14113EXPL TYPE STRING,
14114EXPL TYPE STRING,
14115EXPL TYPE STRING,
14116EXPL TYPE STRING,
14117EXPL TYPE STRING,
14118EXPL TYPE STRING,
14119EXPL TYPE STRING,
14120EXPL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3RBS_LINE_1410_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_1410_STR-14101BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14101END sy-vline 
WA_J_3RBS_LINE_1410_STR-14101BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14101NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14102BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14102END sy-vline 
WA_J_3RBS_LINE_1410_STR-14102BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14102NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14103BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14103END sy-vline 
WA_J_3RBS_LINE_1410_STR-14103BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14103NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14104BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14104END sy-vline 
WA_J_3RBS_LINE_1410_STR-14104BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14104NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14105BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14105END sy-vline 
WA_J_3RBS_LINE_1410_STR-14105BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14105NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14106BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14106END sy-vline 
WA_J_3RBS_LINE_1410_STR-14106BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14106NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14107BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14107END sy-vline 
WA_J_3RBS_LINE_1410_STR-14107BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14107NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14108BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14108END sy-vline 
WA_J_3RBS_LINE_1410_STR-14108BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14108NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14109BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14109END sy-vline 
WA_J_3RBS_LINE_1410_STR-14109BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14109NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14110BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14110END sy-vline 
WA_J_3RBS_LINE_1410_STR-14110BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14110NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14111BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14111END sy-vline 
WA_J_3RBS_LINE_1410_STR-14111BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14111NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14112BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14112END sy-vline 
WA_J_3RBS_LINE_1410_STR-14112BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14112NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14113BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14113END sy-vline 
WA_J_3RBS_LINE_1410_STR-14113BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14113NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14114BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14114END sy-vline 
WA_J_3RBS_LINE_1410_STR-14114BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14114NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14115BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14115END sy-vline 
WA_J_3RBS_LINE_1410_STR-14115BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14115NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14116BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14116END sy-vline 
WA_J_3RBS_LINE_1410_STR-14116BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14116NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14117BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14117END sy-vline 
WA_J_3RBS_LINE_1410_STR-14117BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14117NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14118BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14118END sy-vline 
WA_J_3RBS_LINE_1410_STR-14118BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14118NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14119BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14119END sy-vline 
WA_J_3RBS_LINE_1410_STR-14119BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14119NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-14120BEG sy-vline 
WA_J_3RBS_LINE_1410_STR-14120END sy-vline 
WA_J_3RBS_LINE_1410_STR-14120BPY sy-vline 
WA_J_3RBS_LINE_1410_STR-14120NAME sy-vline 
WA_J_3RBS_LINE_1410_STR-WAERS sy-vline 
WA_J_3RBS_LINE_1410_STR-14101EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14102EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14103EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14104EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14105EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14106EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14107EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14108EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14109EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14110EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14111EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14112EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14113EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14114EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14115EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14116EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14117EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14118EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14119EXPL sy-vline 
WA_J_3RBS_LINE_1410_STR-14120EXPL sy-vline      INTO ld_text SEPARATED BY SPACE.

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