ABAP Select data from SAP table J_3RBS_LINE_2460 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_2460 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_2460. 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_2460 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_2460 TYPE STANDARD TABLE OF J_3RBS_LINE_2460,
      WA_J_3RBS_LINE_2460 TYPE J_3RBS_LINE_2460,
      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_2460> TYPE J_3RBS_LINE_2460.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3RBS_LINE_2460
*  INTO TABLE @DATA(IT_J_3RBS_LINE_24602).
*--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_2460 INDEX 1 INTO DATA(WA_J_3RBS_LINE_24602).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3RBS_LINE_2460>-24601CURR = 1.
<J_3RBS_LINE_2460>-24601PREV = 1.
<J_3RBS_LINE_2460>-24601NAME = 1.
<J_3RBS_LINE_2460>-24602CURR = 1.
<J_3RBS_LINE_2460>-24602PREV = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3RBS_LINE_2460-24602NAME, sy-vline,
  WA_J_3RBS_LINE_2460-24603CURR, sy-vline,
  WA_J_3RBS_LINE_2460-24603PREV, sy-vline,
  WA_J_3RBS_LINE_2460-24603NAME, sy-vline,
  WA_J_3RBS_LINE_2460-24604CURR, sy-vline,
  WA_J_3RBS_LINE_2460-24604PREV, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_3RBS_LINE_2460 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_2460 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_2460 INTO WA_J_3RBS_LINE_2460.


*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_2460_STR, 
24601CURR TYPE STRING,
24601PREV TYPE STRING,
24601NAME TYPE STRING,
24602CURR TYPE STRING,
24602PREV TYPE STRING,
24602NAME TYPE STRING,
24603CURR TYPE STRING,
24603PREV TYPE STRING,
24603NAME TYPE STRING,
24604CURR TYPE STRING,
24604PREV TYPE STRING,
24604NAME TYPE STRING,
24605CURR TYPE STRING,
24605PREV TYPE STRING,
24605NAME TYPE STRING,
24606CURR TYPE STRING,
24606PREV TYPE STRING,
24606NAME TYPE STRING,
24607CURR TYPE STRING,
24607PREV TYPE STRING,
24607NAME TYPE STRING,
24608CURR TYPE STRING,
24608PREV TYPE STRING,
24608NAME TYPE STRING,
24609CURR TYPE STRING,
24609PREV TYPE STRING,
24609NAME TYPE STRING,
24610CURR TYPE STRING,
24610PREV TYPE STRING,
24610NAME TYPE STRING,
24611CURR TYPE STRING,
24611PREV TYPE STRING,
24611NAME TYPE STRING,
24612CURR TYPE STRING,
24612PREV TYPE STRING,
24612NAME TYPE STRING,
24613CURR TYPE STRING,
24613PREV TYPE STRING,
24613NAME TYPE STRING,
24614CURR TYPE STRING,
24614PREV TYPE STRING,
24614NAME TYPE STRING,
24615CURR TYPE STRING,
24615PREV TYPE STRING,
24615NAME TYPE STRING,
24616CURR TYPE STRING,
24616PREV TYPE STRING,
24616NAME TYPE STRING,
24617CURR TYPE STRING,
24617PREV TYPE STRING,
24617NAME TYPE STRING,
24618CURR TYPE STRING,
24618PREV TYPE STRING,
24618NAME TYPE STRING,
24619CURR TYPE STRING,
24619PREV TYPE STRING,
24619NAME TYPE STRING,
24620CURR TYPE STRING,
24620PREV TYPE STRING,
24620NAME TYPE STRING,
24601EXPL TYPE STRING,
24602EXPL TYPE STRING,
24603EXPL TYPE STRING,
24604EXPL TYPE STRING,
24605EXPL TYPE STRING,
24606EXPL TYPE STRING,
24607EXPL TYPE STRING,
24608EXPL TYPE STRING,
24609EXPL TYPE STRING,
24610EXPL TYPE STRING,
24611EXPL TYPE STRING,
24612EXPL TYPE STRING,
24613EXPL TYPE STRING,
24614EXPL TYPE STRING,
24615EXPL TYPE STRING,
24616EXPL TYPE STRING,
24617EXPL TYPE STRING,
24618EXPL TYPE STRING,
24619EXPL TYPE STRING,
24620EXPL TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3RBS_LINE_2460_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_2460_STR-24601CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24601PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24601NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24602CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24602PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24602NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24603CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24603PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24603NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24604CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24604PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24604NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24605CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24605PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24605NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24606CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24606PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24606NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24607CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24607PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24607NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24608CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24608PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24608NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24609CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24609PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24609NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24610CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24610PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24610NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24611CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24611PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24611NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24612CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24612PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24612NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24613CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24613PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24613NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24614CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24614PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24614NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24615CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24615PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24615NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24616CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24616PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24616NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24617CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24617PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24617NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24618CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24618PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24618NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24619CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24619PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24619NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24620CURR sy-vline 
WA_J_3RBS_LINE_2460_STR-24620PREV sy-vline 
WA_J_3RBS_LINE_2460_STR-24620NAME sy-vline 
WA_J_3RBS_LINE_2460_STR-24601EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24602EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24603EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24604EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24605EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24606EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24607EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24608EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24609EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24610EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24611EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24612EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24613EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24614EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24615EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24616EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24617EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24618EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24619EXPL sy-vline 
WA_J_3RBS_LINE_2460_STR-24620EXPL sy-vline      INTO ld_text SEPARATED BY SPACE.

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