ABAP Select data from SAP table E1Q0764 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 E1Q0764 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 E1Q0764. 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 E1Q0764 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_E1Q0764 TYPE STANDARD TABLE OF E1Q0764,
      WA_E1Q0764 TYPE E1Q0764,
      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: <E1Q0764> TYPE E1Q0764.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM E1Q0764
*  INTO TABLE @DATA(IT_E1Q07642).
*--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_E1Q0764 INDEX 1 INTO DATA(WA_E1Q07642).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<E1Q0764>-UTD46 = 1.
<E1Q0764>-END46 = 1.
<E1Q0764>-BEV46 = 1.
<E1Q0764>-UTD47 = 1.
<E1Q0764>-END47 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_E1Q0764-BEV47, sy-vline,
  WA_E1Q0764-ACT48, sy-vline,
  WA_E1Q0764-UTD48, sy-vline,
  WA_E1Q0764-END48, sy-vline,
  WA_E1Q0764-BEV48, sy-vline,
  WA_E1Q0764-ACT49, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_E1Q0764 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_E1Q0764 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_E1Q0764 INTO WA_E1Q0764.


*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_E1Q0764_STR, 
UTD46 TYPE STRING,
END46 TYPE STRING,
BEV46 TYPE STRING,
UTD47 TYPE STRING,
END47 TYPE STRING,
BEV47 TYPE STRING,
ACT48 TYPE STRING,
UTD48 TYPE STRING,
END48 TYPE STRING,
BEV48 TYPE STRING,
ACT49 TYPE STRING,
UTD49 TYPE STRING,
END49 TYPE STRING,
BEV49 TYPE STRING,
ACT50 TYPE STRING,
UTD50 TYPE STRING,
END50 TYPE STRING,
BEV50 TYPE STRING,
ACT51 TYPE STRING,
UTD51 TYPE STRING,
END51 TYPE STRING,
BEV51 TYPE STRING,
ACT52 TYPE STRING,
UTD52 TYPE STRING,
END52 TYPE STRING,
BEV52 TYPE STRING,
ACT53 TYPE STRING,
UTD53 TYPE STRING,
END53 TYPE STRING,
BEV53 TYPE STRING,
ACT54 TYPE STRING,
UTD54 TYPE STRING,
END54 TYPE STRING,
BEV54 TYPE STRING,
ACT55 TYPE STRING,
UTD55 TYPE STRING,
END55 TYPE STRING,
BEV55 TYPE STRING,
ACT56 TYPE STRING,
UTD56 TYPE STRING,
END56 TYPE STRING,
BEV56 TYPE STRING,
ACT57 TYPE STRING,
UTD57 TYPE STRING,
END57 TYPE STRING,
BEV57 TYPE STRING,
ACT58 TYPE STRING,
UTD58 TYPE STRING,
END58 TYPE STRING,
BEV58 TYPE STRING,
ACT59 TYPE STRING,
UTD59 TYPE STRING,
END59 TYPE STRING,
BEV59 TYPE STRING,
ACT60 TYPE STRING,
UTD60 TYPE STRING,
END60 TYPE STRING,
BEV60 TYPE STRING,
ACT61 TYPE STRING,
UTD61 TYPE STRING,
END61 TYPE STRING,
BEV61 TYPE STRING,
ACT62 TYPE STRING,
UTD62 TYPE STRING,
END62 TYPE STRING,
BEV62 TYPE STRING,
ACT63 TYPE STRING,
UTD63 TYPE STRING,
END63 TYPE STRING,
BEV63 TYPE STRING,
ACT64 TYPE STRING,
UTD64 TYPE STRING,
END64 TYPE STRING,
BEV64 TYPE STRING,
ACT65 TYPE STRING,
UTD65 TYPE STRING,
END65 TYPE STRING,
BEV65 TYPE STRING,
ACT66 TYPE STRING,
UTD66 TYPE STRING,
END66 TYPE STRING,
BEV66 TYPE STRING,
ACT67 TYPE STRING,
UTD67 TYPE STRING,
END67 TYPE STRING,
BEV67 TYPE STRING,
ACT68 TYPE STRING,
UTD68 TYPE STRING,
END68 TYPE STRING,
BEV68 TYPE STRING,
ACT69 TYPE STRING,
UTD69 TYPE STRING,
END69 TYPE STRING,
BEV69 TYPE STRING,
ACT70 TYPE STRING,
UTD70 TYPE STRING,
END70 TYPE STRING,
BEV70 TYPE STRING,
ACT71 TYPE STRING,
UTD71 TYPE STRING,
END71 TYPE STRING,
BEV71 TYPE STRING,
ACT72 TYPE STRING,
UTD72 TYPE STRING,
END72 TYPE STRING,
BEV72 TYPE STRING,
ACT73 TYPE STRING,
UTD73 TYPE STRING,
END73 TYPE STRING,
BEV73 TYPE STRING,
ACT74 TYPE STRING,
UTD74 TYPE STRING,
END74 TYPE STRING,
BEV74 TYPE STRING,
ACT75 TYPE STRING,
UTD75 TYPE STRING,
END75 TYPE STRING,
BEV75 TYPE STRING,
ACT76 TYPE STRING,
UTD76 TYPE STRING,
END76 TYPE STRING,
BEV76 TYPE STRING,
ACT77 TYPE STRING,
UTD77 TYPE STRING,
END77 TYPE STRING,
BEV77 TYPE STRING,
ACT78 TYPE STRING,
UTD78 TYPE STRING,
END78 TYPE STRING,
BEV78 TYPE STRING,
ACT79 TYPE STRING,
UTD79 TYPE STRING,
END79 TYPE STRING,
BEV79 TYPE STRING,
ACT80 TYPE STRING,
UTD80 TYPE STRING,
END80 TYPE STRING,
BEV80 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_E1Q0764_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_E1Q0764_STR-UTD46 sy-vline 
WA_E1Q0764_STR-END46 sy-vline 
WA_E1Q0764_STR-BEV46 sy-vline 
WA_E1Q0764_STR-UTD47 sy-vline 
WA_E1Q0764_STR-END47 sy-vline 
WA_E1Q0764_STR-BEV47 sy-vline 
WA_E1Q0764_STR-ACT48 sy-vline 
WA_E1Q0764_STR-UTD48 sy-vline 
WA_E1Q0764_STR-END48 sy-vline 
WA_E1Q0764_STR-BEV48 sy-vline 
WA_E1Q0764_STR-ACT49 sy-vline 
WA_E1Q0764_STR-UTD49 sy-vline 
WA_E1Q0764_STR-END49 sy-vline 
WA_E1Q0764_STR-BEV49 sy-vline 
WA_E1Q0764_STR-ACT50 sy-vline 
WA_E1Q0764_STR-UTD50 sy-vline 
WA_E1Q0764_STR-END50 sy-vline 
WA_E1Q0764_STR-BEV50 sy-vline 
WA_E1Q0764_STR-ACT51 sy-vline 
WA_E1Q0764_STR-UTD51 sy-vline 
WA_E1Q0764_STR-END51 sy-vline 
WA_E1Q0764_STR-BEV51 sy-vline 
WA_E1Q0764_STR-ACT52 sy-vline 
WA_E1Q0764_STR-UTD52 sy-vline 
WA_E1Q0764_STR-END52 sy-vline 
WA_E1Q0764_STR-BEV52 sy-vline 
WA_E1Q0764_STR-ACT53 sy-vline 
WA_E1Q0764_STR-UTD53 sy-vline 
WA_E1Q0764_STR-END53 sy-vline 
WA_E1Q0764_STR-BEV53 sy-vline 
WA_E1Q0764_STR-ACT54 sy-vline 
WA_E1Q0764_STR-UTD54 sy-vline 
WA_E1Q0764_STR-END54 sy-vline 
WA_E1Q0764_STR-BEV54 sy-vline 
WA_E1Q0764_STR-ACT55 sy-vline 
WA_E1Q0764_STR-UTD55 sy-vline 
WA_E1Q0764_STR-END55 sy-vline 
WA_E1Q0764_STR-BEV55 sy-vline 
WA_E1Q0764_STR-ACT56 sy-vline 
WA_E1Q0764_STR-UTD56 sy-vline 
WA_E1Q0764_STR-END56 sy-vline 
WA_E1Q0764_STR-BEV56 sy-vline 
WA_E1Q0764_STR-ACT57 sy-vline 
WA_E1Q0764_STR-UTD57 sy-vline 
WA_E1Q0764_STR-END57 sy-vline 
WA_E1Q0764_STR-BEV57 sy-vline 
WA_E1Q0764_STR-ACT58 sy-vline 
WA_E1Q0764_STR-UTD58 sy-vline 
WA_E1Q0764_STR-END58 sy-vline 
WA_E1Q0764_STR-BEV58 sy-vline 
WA_E1Q0764_STR-ACT59 sy-vline 
WA_E1Q0764_STR-UTD59 sy-vline 
WA_E1Q0764_STR-END59 sy-vline 
WA_E1Q0764_STR-BEV59 sy-vline 
WA_E1Q0764_STR-ACT60 sy-vline 
WA_E1Q0764_STR-UTD60 sy-vline 
WA_E1Q0764_STR-END60 sy-vline 
WA_E1Q0764_STR-BEV60 sy-vline 
WA_E1Q0764_STR-ACT61 sy-vline 
WA_E1Q0764_STR-UTD61 sy-vline 
WA_E1Q0764_STR-END61 sy-vline 
WA_E1Q0764_STR-BEV61 sy-vline 
WA_E1Q0764_STR-ACT62 sy-vline 
WA_E1Q0764_STR-UTD62 sy-vline 
WA_E1Q0764_STR-END62 sy-vline 
WA_E1Q0764_STR-BEV62 sy-vline 
WA_E1Q0764_STR-ACT63 sy-vline 
WA_E1Q0764_STR-UTD63 sy-vline 
WA_E1Q0764_STR-END63 sy-vline 
WA_E1Q0764_STR-BEV63 sy-vline 
WA_E1Q0764_STR-ACT64 sy-vline 
WA_E1Q0764_STR-UTD64 sy-vline 
WA_E1Q0764_STR-END64 sy-vline 
WA_E1Q0764_STR-BEV64 sy-vline 
WA_E1Q0764_STR-ACT65 sy-vline 
WA_E1Q0764_STR-UTD65 sy-vline 
WA_E1Q0764_STR-END65 sy-vline 
WA_E1Q0764_STR-BEV65 sy-vline 
WA_E1Q0764_STR-ACT66 sy-vline 
WA_E1Q0764_STR-UTD66 sy-vline 
WA_E1Q0764_STR-END66 sy-vline 
WA_E1Q0764_STR-BEV66 sy-vline 
WA_E1Q0764_STR-ACT67 sy-vline 
WA_E1Q0764_STR-UTD67 sy-vline 
WA_E1Q0764_STR-END67 sy-vline 
WA_E1Q0764_STR-BEV67 sy-vline 
WA_E1Q0764_STR-ACT68 sy-vline 
WA_E1Q0764_STR-UTD68 sy-vline 
WA_E1Q0764_STR-END68 sy-vline 
WA_E1Q0764_STR-BEV68 sy-vline 
WA_E1Q0764_STR-ACT69 sy-vline 
WA_E1Q0764_STR-UTD69 sy-vline 
WA_E1Q0764_STR-END69 sy-vline 
WA_E1Q0764_STR-BEV69 sy-vline 
WA_E1Q0764_STR-ACT70 sy-vline 
WA_E1Q0764_STR-UTD70 sy-vline 
WA_E1Q0764_STR-END70 sy-vline 
WA_E1Q0764_STR-BEV70 sy-vline 
WA_E1Q0764_STR-ACT71 sy-vline 
WA_E1Q0764_STR-UTD71 sy-vline 
WA_E1Q0764_STR-END71 sy-vline 
WA_E1Q0764_STR-BEV71 sy-vline 
WA_E1Q0764_STR-ACT72 sy-vline 
WA_E1Q0764_STR-UTD72 sy-vline 
WA_E1Q0764_STR-END72 sy-vline 
WA_E1Q0764_STR-BEV72 sy-vline 
WA_E1Q0764_STR-ACT73 sy-vline 
WA_E1Q0764_STR-UTD73 sy-vline 
WA_E1Q0764_STR-END73 sy-vline 
WA_E1Q0764_STR-BEV73 sy-vline 
WA_E1Q0764_STR-ACT74 sy-vline 
WA_E1Q0764_STR-UTD74 sy-vline 
WA_E1Q0764_STR-END74 sy-vline 
WA_E1Q0764_STR-BEV74 sy-vline 
WA_E1Q0764_STR-ACT75 sy-vline 
WA_E1Q0764_STR-UTD75 sy-vline 
WA_E1Q0764_STR-END75 sy-vline 
WA_E1Q0764_STR-BEV75 sy-vline 
WA_E1Q0764_STR-ACT76 sy-vline 
WA_E1Q0764_STR-UTD76 sy-vline 
WA_E1Q0764_STR-END76 sy-vline 
WA_E1Q0764_STR-BEV76 sy-vline 
WA_E1Q0764_STR-ACT77 sy-vline 
WA_E1Q0764_STR-UTD77 sy-vline 
WA_E1Q0764_STR-END77 sy-vline 
WA_E1Q0764_STR-BEV77 sy-vline 
WA_E1Q0764_STR-ACT78 sy-vline 
WA_E1Q0764_STR-UTD78 sy-vline 
WA_E1Q0764_STR-END78 sy-vline 
WA_E1Q0764_STR-BEV78 sy-vline 
WA_E1Q0764_STR-ACT79 sy-vline 
WA_E1Q0764_STR-UTD79 sy-vline 
WA_E1Q0764_STR-END79 sy-vline 
WA_E1Q0764_STR-BEV79 sy-vline 
WA_E1Q0764_STR-ACT80 sy-vline 
WA_E1Q0764_STR-UTD80 sy-vline 
WA_E1Q0764_STR-END80 sy-vline 
WA_E1Q0764_STR-BEV80 sy-vline      INTO ld_text SEPARATED BY SPACE.

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