ABAP Select data from SAP table IEQS_IO_03 into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP IEQS_IO_03 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 IEQS_IO_03. 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 IEQS_IO_03 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_IEQS_IO_03 TYPE STANDARD TABLE OF IEQS_IO_03,
      WA_IEQS_IO_03 TYPE IEQS_IO_03,
      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: <IEQS_IO_03> TYPE IEQS_IO_03.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IEQS_IO_03
*  INTO TABLE @DATA(IT_IEQS_IO_032).
*--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_IEQS_IO_03 INDEX 1 INTO DATA(WA_IEQS_IO_032).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IEQS_IO_03 ASSIGNING <IEQS_IO_03>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IEQS_IO_03>-EVENT_DATE = 1.
<IEQS_IO_03>-EVENT_TIME = 1.
<IEQS_IO_03>-EVENT_TYPE = 1.
<IEQS_IO_03>-DATBI = 1.
<IEQS_IO_03>-TIMBI = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IEQS_IO_03-LOWER_LIMIT_DATE, sy-vline,
WA_IEQS_IO_03-LOWER_LIMIT_TIME, sy-vline,
WA_IEQS_IO_03-NOTIF_CREATE, sy-vline,
WA_IEQS_IO_03-NOTIF_REFER, sy-vline,
WA_IEQS_IO_03-NOTIF_NOT_REQ, sy-vline,
WA_IEQS_IO_03-NOTIF_DELETE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IEQS_IO_03 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_IEQS_IO_03 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_IEQS_IO_03 INTO WA_IEQS_IO_03. *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.

*Conversion exit ALPHA, internal->external for field QMNUM_REMOVAL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-QMNUM_REMOVAL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-QMNUM_REMOVAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field QMNUM_INSTALL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-QMNUM_INSTALL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-QMNUM_INSTALL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field EQUNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-EQUNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-EQUNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ANLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-ANLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-ANLNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ANLUN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-ANLUN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-ANLUN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-KOSTL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field PROID CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_IEQS_IO_03-PROID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-PROID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field DAUFN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-DAUFN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-DAUFN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-AUFNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TPLNR, internal->external for field TPLNR CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT' EXPORTING input = WA_IEQS_IO_03-TPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-TPLNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field HEQUI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IEQS_IO_03-HEQUI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-HEQUI.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field SUBMT CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_IEQS_IO_03-SUBMT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IEQS_IO_03-SUBMT.
WRITE:/ 'New Value:', ld_input.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_IEQS_IO_03_STR,
EVENT_DATE TYPE STRING,
EVENT_TIME TYPE STRING,
EVENT_TYPE TYPE STRING,
DATBI TYPE STRING,
TIMBI TYPE STRING,
LOWER_LIMIT_DATE TYPE STRING,
LOWER_LIMIT_TIME TYPE STRING,
NOTIF_CREATE TYPE STRING,
NOTIF_REFER TYPE STRING,
NOTIF_NOT_REQ TYPE STRING,
NOTIF_DELETE TYPE STRING,
NOTIF_UNDEFINED TYPE STRING,
PROCESSED TYPE STRING,
QMNUM_REMOVAL TYPE STRING,
QMNUM_INSTALL TYPE STRING,
CCM_PLRMV TYPE STRING,
CCM_UPRMV TYPE STRING,
CCM_USCND TYPE STRING,
CCM_SVCND TYPE STRING,
CCM_UKCND TYPE STRING,
GUI_TITLE TYPE STRING,
TEXT_NOTIFICATION TYPE STRING,
TEXT_EVENT_TYPE TYPE STRING,
TEXT_PART_CONDITION TYPE STRING,
TEXT_PLRMV TYPE STRING,
TEXT_UPRMV TYPE STRING,
TEXT_USCND TYPE STRING,
TEXT_SVCND TYPE STRING,
TEXT_UKCND TYPE STRING,
FCODE TYPE STRING,
EQUNR TYPE STRING,
EQTYP TYPE STRING,
EQKTX TYPE STRING,
ARBPL TYPE STRING,
SWERK TYPE STRING,
PPSID TYPE STRING,
CR_OBJTY TYPE STRING,
GEWRKX TYPE STRING,
WERGW TYPE STRING,
IWERK TYPE STRING,
GEWRK TYPE STRING,
PM_OBJTY TYPE STRING,
MAPAR TYPE STRING,
BUKRS TYPE STRING,
GSBER TYPE STRING,
ANLNR TYPE STRING,
ANLUN TYPE STRING,
KOKRS TYPE STRING,
KOSTL TYPE STRING,
PROID TYPE STRING,
DAUFN TYPE STRING,
AUFNR TYPE STRING,
INGRP TYPE STRING,
STORT TYPE STRING,
MSGRP TYPE STRING,
BEBER TYPE STRING,
ABCKZ TYPE STRING,
EQFNR TYPE STRING,
TPLNR TYPE STRING,
PLTXT TYPE STRING,
HEQUI TYPE STRING,
HEQKTX TYPE STRING,
HEQNR TYPE STRING,
TIDNR TYPE STRING,
SUBMT TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
LIZNR TYPE STRING,
RBNR TYPE STRING,
FUNCID TYPE STRING,
FRCFIT TYPE STRING,
FRCRMV TYPE STRING,
TEXT_STRUCTURING TYPE STRING,
TEXT_LOCATION_DATA TYPE STRING,
TEXT_RESPONSIBILITIES TYPE STRING,
TEXT_ACCOUNT_ASSIGNMENT TYPE STRING,
TEXT_SALES_DISTRIBUTION TYPE STRING,
TEXT_LICENSE TYPE STRING,
TEXT_MANUFACTURER_DATA TYPE STRING,
DISPLAY_ONLY TYPE STRING,END OF T_EKKO_STR. DATA: WA_IEQS_IO_03_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_IEQS_IO_03_STR-EVENT_DATE sy-vline
WA_IEQS_IO_03_STR-EVENT_TIME sy-vline
WA_IEQS_IO_03_STR-EVENT_TYPE sy-vline
WA_IEQS_IO_03_STR-DATBI sy-vline
WA_IEQS_IO_03_STR-TIMBI sy-vline
WA_IEQS_IO_03_STR-LOWER_LIMIT_DATE sy-vline
WA_IEQS_IO_03_STR-LOWER_LIMIT_TIME sy-vline
WA_IEQS_IO_03_STR-NOTIF_CREATE sy-vline
WA_IEQS_IO_03_STR-NOTIF_REFER sy-vline
WA_IEQS_IO_03_STR-NOTIF_NOT_REQ sy-vline
WA_IEQS_IO_03_STR-NOTIF_DELETE sy-vline
WA_IEQS_IO_03_STR-NOTIF_UNDEFINED sy-vline
WA_IEQS_IO_03_STR-PROCESSED sy-vline
WA_IEQS_IO_03_STR-QMNUM_REMOVAL sy-vline
WA_IEQS_IO_03_STR-QMNUM_INSTALL sy-vline
WA_IEQS_IO_03_STR-CCM_PLRMV sy-vline
WA_IEQS_IO_03_STR-CCM_UPRMV sy-vline
WA_IEQS_IO_03_STR-CCM_USCND sy-vline
WA_IEQS_IO_03_STR-CCM_SVCND sy-vline
WA_IEQS_IO_03_STR-CCM_UKCND sy-vline
WA_IEQS_IO_03_STR-GUI_TITLE sy-vline
WA_IEQS_IO_03_STR-TEXT_NOTIFICATION sy-vline
WA_IEQS_IO_03_STR-TEXT_EVENT_TYPE sy-vline
WA_IEQS_IO_03_STR-TEXT_PART_CONDITION sy-vline
WA_IEQS_IO_03_STR-TEXT_PLRMV sy-vline
WA_IEQS_IO_03_STR-TEXT_UPRMV sy-vline
WA_IEQS_IO_03_STR-TEXT_USCND sy-vline
WA_IEQS_IO_03_STR-TEXT_SVCND sy-vline
WA_IEQS_IO_03_STR-TEXT_UKCND sy-vline
WA_IEQS_IO_03_STR-FCODE sy-vline
WA_IEQS_IO_03_STR-EQUNR sy-vline
WA_IEQS_IO_03_STR-EQTYP sy-vline
WA_IEQS_IO_03_STR-EQKTX sy-vline
WA_IEQS_IO_03_STR-ARBPL sy-vline
WA_IEQS_IO_03_STR-SWERK sy-vline
WA_IEQS_IO_03_STR-PPSID sy-vline
WA_IEQS_IO_03_STR-CR_OBJTY sy-vline
WA_IEQS_IO_03_STR-GEWRKX sy-vline
WA_IEQS_IO_03_STR-WERGW sy-vline
WA_IEQS_IO_03_STR-IWERK sy-vline
WA_IEQS_IO_03_STR-GEWRK sy-vline
WA_IEQS_IO_03_STR-PM_OBJTY sy-vline
WA_IEQS_IO_03_STR-MAPAR sy-vline
WA_IEQS_IO_03_STR-BUKRS sy-vline
WA_IEQS_IO_03_STR-GSBER sy-vline
WA_IEQS_IO_03_STR-ANLNR sy-vline
WA_IEQS_IO_03_STR-ANLUN sy-vline
WA_IEQS_IO_03_STR-KOKRS sy-vline
WA_IEQS_IO_03_STR-KOSTL sy-vline
WA_IEQS_IO_03_STR-PROID sy-vline
WA_IEQS_IO_03_STR-DAUFN sy-vline
WA_IEQS_IO_03_STR-AUFNR sy-vline
WA_IEQS_IO_03_STR-INGRP sy-vline
WA_IEQS_IO_03_STR-STORT sy-vline
WA_IEQS_IO_03_STR-MSGRP sy-vline
WA_IEQS_IO_03_STR-BEBER sy-vline
WA_IEQS_IO_03_STR-ABCKZ sy-vline
WA_IEQS_IO_03_STR-EQFNR sy-vline
WA_IEQS_IO_03_STR-TPLNR sy-vline
WA_IEQS_IO_03_STR-PLTXT sy-vline
WA_IEQS_IO_03_STR-HEQUI sy-vline
WA_IEQS_IO_03_STR-HEQKTX sy-vline
WA_IEQS_IO_03_STR-HEQNR sy-vline
WA_IEQS_IO_03_STR-TIDNR sy-vline
WA_IEQS_IO_03_STR-SUBMT sy-vline
WA_IEQS_IO_03_STR-VKORG sy-vline
WA_IEQS_IO_03_STR-VTWEG sy-vline
WA_IEQS_IO_03_STR-SPART sy-vline
WA_IEQS_IO_03_STR-VKBUR sy-vline
WA_IEQS_IO_03_STR-VKGRP sy-vline
WA_IEQS_IO_03_STR-LIZNR sy-vline
WA_IEQS_IO_03_STR-RBNR sy-vline
WA_IEQS_IO_03_STR-FUNCID sy-vline
WA_IEQS_IO_03_STR-FRCFIT sy-vline
WA_IEQS_IO_03_STR-FRCRMV sy-vline
WA_IEQS_IO_03_STR-TEXT_STRUCTURING sy-vline
WA_IEQS_IO_03_STR-TEXT_LOCATION_DATA sy-vline
WA_IEQS_IO_03_STR-TEXT_RESPONSIBILITIES sy-vline
WA_IEQS_IO_03_STR-TEXT_ACCOUNT_ASSIGNMENT sy-vline
WA_IEQS_IO_03_STR-TEXT_SALES_DISTRIBUTION sy-vline
WA_IEQS_IO_03_STR-TEXT_LICENSE sy-vline
WA_IEQS_IO_03_STR-TEXT_MANUFACTURER_DATA sy-vline
WA_IEQS_IO_03_STR-DISPLAY_ONLY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.