ABAP Select data from SAP table J_1BIMIFTAX 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_1BIMIFTAX 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_1BIMIFTAX. 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_1BIMIFTAX 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_1BIMIFTAX TYPE STANDARD TABLE OF J_1BIMIFTAX,
      WA_J_1BIMIFTAX TYPE J_1BIMIFTAX,
      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_1BIMIFTAX> TYPE J_1BIMIFTAX.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_1BIMIFTAX
*  INTO TABLE @DATA(IT_J_1BIMIFTAX2).
*--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_1BIMIFTAX INDEX 1 INTO DATA(WA_J_1BIMIFTAX2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_1BIMIFTAX>-TINP0 = 1.
<J_1BIMIFTAX>-TINP1 = 1.
<J_1BIMIFTAX>-TINP2 = 1.
<J_1BIMIFTAX>-TINP3 = 1.
<J_1BIMIFTAX>-TINP4 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_1BIMIFTAX-TINP5, sy-vline,
  WA_J_1BIMIFTAX-TINP6, sy-vline,
  WA_J_1BIMIFTAX-TINP7, sy-vline,
  WA_J_1BIMIFTAX-TINP8, sy-vline,
  WA_J_1BIMIFTAX-TINP9, sy-vline,
  WA_J_1BIMIFTAX-TINPA, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_1BIMIFTAX 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_1BIMIFTAX 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_1BIMIFTAX INTO WA_J_1BIMIFTAX.


*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_1BIMIFTAX_STR, 
TINP0 TYPE STRING,
TINP1 TYPE STRING,
TINP2 TYPE STRING,
TINP3 TYPE STRING,
TINP4 TYPE STRING,
TINP5 TYPE STRING,
TINP6 TYPE STRING,
TINP7 TYPE STRING,
TINP8 TYPE STRING,
TINP9 TYPE STRING,
TINPA TYPE STRING,
TINPB TYPE STRING,
TINPC TYPE STRING,
TINPD TYPE STRING,
TINPE TYPE STRING,
TINPF TYPE STRING,
TOUT0 TYPE STRING,
TOUT1 TYPE STRING,
TOUT2 TYPE STRING,
TOUT3 TYPE STRING,
TOUT4 TYPE STRING,
TOUT5 TYPE STRING,
TOUT6 TYPE STRING,
TOUT7 TYPE STRING,
TOUT8 TYPE STRING,
TOUT9 TYPE STRING,
TOUTA TYPE STRING,
TOUTB TYPE STRING,
TOUTC TYPE STRING,
TOUTD TYPE STRING,
TOUTE TYPE STRING,
TOUTF TYPE STRING,
TOUTY TYPE STRING,
TOUTY1 TYPE STRING,
TOUTY2 TYPE STRING,
TOUTY3 TYPE STRING,
TINPY TYPE STRING,
TINPY1 TYPE STRING,
TINPY2 TYPE STRING,
TINPY3 TYPE STRING,
TOUTZ TYPE STRING,
TOUTZ1 TYPE STRING,
TINPZ1 TYPE STRING,
TOUTR1 TYPE STRING,
TOUTR2 TYPE STRING,
TOUTR3 TYPE STRING,
TOUTR4 TYPE STRING,
TOUTR5 TYPE STRING,
TOUTR6 TYPE STRING,
TOUTX TYPE STRING,
TINPX TYPE STRING,
TAX01 TYPE STRING,
TAX02 TYPE STRING,
TAX03 TYPE STRING,
TAX04 TYPE STRING,
TAX05 TYPE STRING,
TAX06 TYPE STRING,
TAX07 TYPE STRING,
TAX08 TYPE STRING,
TAX09 TYPE STRING,
TAX10 TYPE STRING,
TAX11 TYPE STRING,
TAX12 TYPE STRING,
TAX13 TYPE STRING,
TAX14 TYPE STRING,
TAX15 TYPE STRING,
TAX16 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_1BIMIFTAX_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_1BIMIFTAX_STR-TINP0 sy-vline 
WA_J_1BIMIFTAX_STR-TINP1 sy-vline 
WA_J_1BIMIFTAX_STR-TINP2 sy-vline 
WA_J_1BIMIFTAX_STR-TINP3 sy-vline 
WA_J_1BIMIFTAX_STR-TINP4 sy-vline 
WA_J_1BIMIFTAX_STR-TINP5 sy-vline 
WA_J_1BIMIFTAX_STR-TINP6 sy-vline 
WA_J_1BIMIFTAX_STR-TINP7 sy-vline 
WA_J_1BIMIFTAX_STR-TINP8 sy-vline 
WA_J_1BIMIFTAX_STR-TINP9 sy-vline 
WA_J_1BIMIFTAX_STR-TINPA sy-vline 
WA_J_1BIMIFTAX_STR-TINPB sy-vline 
WA_J_1BIMIFTAX_STR-TINPC sy-vline 
WA_J_1BIMIFTAX_STR-TINPD sy-vline 
WA_J_1BIMIFTAX_STR-TINPE sy-vline 
WA_J_1BIMIFTAX_STR-TINPF sy-vline 
WA_J_1BIMIFTAX_STR-TOUT0 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT1 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT2 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT3 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT4 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT5 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT6 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT7 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT8 sy-vline 
WA_J_1BIMIFTAX_STR-TOUT9 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTA sy-vline 
WA_J_1BIMIFTAX_STR-TOUTB sy-vline 
WA_J_1BIMIFTAX_STR-TOUTC sy-vline 
WA_J_1BIMIFTAX_STR-TOUTD sy-vline 
WA_J_1BIMIFTAX_STR-TOUTE sy-vline 
WA_J_1BIMIFTAX_STR-TOUTF sy-vline 
WA_J_1BIMIFTAX_STR-TOUTY sy-vline 
WA_J_1BIMIFTAX_STR-TOUTY1 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTY2 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTY3 sy-vline 
WA_J_1BIMIFTAX_STR-TINPY sy-vline 
WA_J_1BIMIFTAX_STR-TINPY1 sy-vline 
WA_J_1BIMIFTAX_STR-TINPY2 sy-vline 
WA_J_1BIMIFTAX_STR-TINPY3 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTZ sy-vline 
WA_J_1BIMIFTAX_STR-TOUTZ1 sy-vline 
WA_J_1BIMIFTAX_STR-TINPZ1 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR1 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR2 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR3 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR4 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR5 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTR6 sy-vline 
WA_J_1BIMIFTAX_STR-TOUTX sy-vline 
WA_J_1BIMIFTAX_STR-TINPX sy-vline 
WA_J_1BIMIFTAX_STR-TAX01 sy-vline 
WA_J_1BIMIFTAX_STR-TAX02 sy-vline 
WA_J_1BIMIFTAX_STR-TAX03 sy-vline 
WA_J_1BIMIFTAX_STR-TAX04 sy-vline 
WA_J_1BIMIFTAX_STR-TAX05 sy-vline 
WA_J_1BIMIFTAX_STR-TAX06 sy-vline 
WA_J_1BIMIFTAX_STR-TAX07 sy-vline 
WA_J_1BIMIFTAX_STR-TAX08 sy-vline 
WA_J_1BIMIFTAX_STR-TAX09 sy-vline 
WA_J_1BIMIFTAX_STR-TAX10 sy-vline 
WA_J_1BIMIFTAX_STR-TAX11 sy-vline 
WA_J_1BIMIFTAX_STR-TAX12 sy-vline 
WA_J_1BIMIFTAX_STR-TAX13 sy-vline 
WA_J_1BIMIFTAX_STR-TAX14 sy-vline 
WA_J_1BIMIFTAX_STR-TAX15 sy-vline 
WA_J_1BIMIFTAX_STR-TAX16 sy-vline      INTO ld_text SEPARATED BY SPACE.

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