ABAP Select data from SAP table FKK_CORR_PLUGIN 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 FKK_CORR_PLUGIN 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 FKK_CORR_PLUGIN. 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 FKK_CORR_PLUGIN 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_FKK_CORR_PLUGIN TYPE STANDARD TABLE OF FKK_CORR_PLUGIN,
      WA_FKK_CORR_PLUGIN TYPE FKK_CORR_PLUGIN,
      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: <FKK_CORR_PLUGIN> TYPE FKK_CORR_PLUGIN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FKK_CORR_PLUGIN
*  INTO TABLE @DATA(IT_FKK_CORR_PLUGIN2).
*--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_FKK_CORR_PLUGIN INDEX 1 INTO DATA(WA_FKK_CORR_PLUGIN2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FKK_CORR_PLUGIN ASSIGNING <FKK_CORR_PLUGIN>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FKK_CORR_PLUGIN>-MANDT = 1.
<FKK_CORR_PLUGIN>-COTYP = 1.
<FKK_CORR_PLUGIN>-GPART = 1.
<FKK_CORR_PLUGIN>-VKONT = 1.
<FKK_CORR_PLUGIN>-COKEY = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FKK_CORR_PLUGIN-GPART_GUID, sy-vline,
WA_FKK_CORR_PLUGIN-ORG_GPART, sy-vline,
WA_FKK_CORR_PLUGIN-ORG_GPART_GUID, sy-vline,
WA_FKK_CORR_PLUGIN-VTREF, sy-vline,
WA_FKK_CORR_PLUGIN-CDATE, sy-vline,
WA_FKK_CORR_PLUGIN-COIDT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FKK_CORR_PLUGIN 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_FKK_CORR_PLUGIN 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_FKK_CORR_PLUGIN INTO WA_FKK_CORR_PLUGIN. *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 GPART CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FKK_CORR_PLUGIN-GPART IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKK_CORR_PLUGIN-GPART.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit GJAHR, internal->external for field COCYR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_FKK_CORR_PLUGIN-COCYR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKK_CORR_PLUGIN-COCYR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field ADDR_NUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FKK_CORR_PLUGIN-ADDR_NUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKK_CORR_PLUGIN-ADDR_NUMBER.
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_FKK_CORR_PLUGIN_STR,
MANDT TYPE STRING,
COTYP TYPE STRING,
GPART TYPE STRING,
VKONT TYPE STRING,
COKEY TYPE STRING,
GPART_GUID TYPE STRING,
ORG_GPART TYPE STRING,
ORG_GPART_GUID TYPE STRING,
VTREF TYPE STRING,
CDATE TYPE STRING,
COIDT TYPE STRING,
COITM TYPE STRING,
COISSTSTMP TYPE STRING,
COISSTSTMPNEW TYPE STRING,
COISSUSER TYPE STRING,
COPRI TYPE STRING,
COPRITSTMP TYPE STRING,
COPRIUSER TYPE STRING,
COCYR TYPE STRING,
COPER TYPE STRING,
COPNR TYPE STRING,
COEMP TYPE STRING,
SALWA TYPE STRING,
SALBE TYPE STRING,
UMBUCH TYPE STRING,
BUKRS TYPE STRING,
CORR_STATUS TYPE STRING,
INCORR TYPE STRING,
INCORR_FAEDN TYPE STRING,
INCORR_INDATE TYPE STRING,
COPRI_LAUFD TYPE STRING,
COPRI_LAUFI TYPE STRING,
SUBAP TYPE STRING,
XTRIAL TYPE STRING,
TECH_STATUS TYPE STRING,
FORMKEY TYPE STRING,
FORMKEY_RDI TYPE STRING,
SENDCONTROL TYPE STRING,
ARCHIVE_STATUS TYPE STRING,
ARCHIVE_FLUD TYPE STRING,
REJECTION TYPE STRING,
BKKRS TYPE STRING,
ACNUM_INT TYPE STRING,
OBJECT_IDCMS TYPE STRING,
FLG_ORIGINALCMS TYPE STRING,
SENDCONTROLCMS TYPE STRING,
ADDR_DESC TYPE STRING,
ORIG_GPART_DESC TYPE STRING,
GPART_DESC TYPE STRING,
VKONT_DESC TYPE STRING,
VTREF_DESC TYPE STRING,
BUTXT TYPE STRING,
COTXT TYPE STRING,
SENDCONTROL_DESC TYPE STRING,
ADDR_NUMBER TYPE STRING,END OF T_EKKO_STR. DATA: WA_FKK_CORR_PLUGIN_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_FKK_CORR_PLUGIN_STR-MANDT sy-vline
WA_FKK_CORR_PLUGIN_STR-COTYP sy-vline
WA_FKK_CORR_PLUGIN_STR-GPART sy-vline
WA_FKK_CORR_PLUGIN_STR-VKONT sy-vline
WA_FKK_CORR_PLUGIN_STR-COKEY sy-vline
WA_FKK_CORR_PLUGIN_STR-GPART_GUID sy-vline
WA_FKK_CORR_PLUGIN_STR-ORG_GPART sy-vline
WA_FKK_CORR_PLUGIN_STR-ORG_GPART_GUID sy-vline
WA_FKK_CORR_PLUGIN_STR-VTREF sy-vline
WA_FKK_CORR_PLUGIN_STR-CDATE sy-vline
WA_FKK_CORR_PLUGIN_STR-COIDT sy-vline
WA_FKK_CORR_PLUGIN_STR-COITM sy-vline
WA_FKK_CORR_PLUGIN_STR-COISSTSTMP sy-vline
WA_FKK_CORR_PLUGIN_STR-COISSTSTMPNEW sy-vline
WA_FKK_CORR_PLUGIN_STR-COISSUSER sy-vline
WA_FKK_CORR_PLUGIN_STR-COPRI sy-vline
WA_FKK_CORR_PLUGIN_STR-COPRITSTMP sy-vline
WA_FKK_CORR_PLUGIN_STR-COPRIUSER sy-vline
WA_FKK_CORR_PLUGIN_STR-COCYR sy-vline
WA_FKK_CORR_PLUGIN_STR-COPER sy-vline
WA_FKK_CORR_PLUGIN_STR-COPNR sy-vline
WA_FKK_CORR_PLUGIN_STR-COEMP sy-vline
WA_FKK_CORR_PLUGIN_STR-SALWA sy-vline
WA_FKK_CORR_PLUGIN_STR-SALBE sy-vline
WA_FKK_CORR_PLUGIN_STR-UMBUCH sy-vline
WA_FKK_CORR_PLUGIN_STR-BUKRS sy-vline
WA_FKK_CORR_PLUGIN_STR-CORR_STATUS sy-vline
WA_FKK_CORR_PLUGIN_STR-INCORR sy-vline
WA_FKK_CORR_PLUGIN_STR-INCORR_FAEDN sy-vline
WA_FKK_CORR_PLUGIN_STR-INCORR_INDATE sy-vline
WA_FKK_CORR_PLUGIN_STR-COPRI_LAUFD sy-vline
WA_FKK_CORR_PLUGIN_STR-COPRI_LAUFI sy-vline
WA_FKK_CORR_PLUGIN_STR-SUBAP sy-vline
WA_FKK_CORR_PLUGIN_STR-XTRIAL sy-vline
WA_FKK_CORR_PLUGIN_STR-TECH_STATUS sy-vline
WA_FKK_CORR_PLUGIN_STR-FORMKEY sy-vline
WA_FKK_CORR_PLUGIN_STR-FORMKEY_RDI sy-vline
WA_FKK_CORR_PLUGIN_STR-SENDCONTROL sy-vline
WA_FKK_CORR_PLUGIN_STR-ARCHIVE_STATUS sy-vline
WA_FKK_CORR_PLUGIN_STR-ARCHIVE_FLUD sy-vline
WA_FKK_CORR_PLUGIN_STR-REJECTION sy-vline
WA_FKK_CORR_PLUGIN_STR-BKKRS sy-vline
WA_FKK_CORR_PLUGIN_STR-ACNUM_INT sy-vline
WA_FKK_CORR_PLUGIN_STR-OBJECT_IDCMS sy-vline
WA_FKK_CORR_PLUGIN_STR-FLG_ORIGINALCMS sy-vline
WA_FKK_CORR_PLUGIN_STR-SENDCONTROLCMS sy-vline
WA_FKK_CORR_PLUGIN_STR-ADDR_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-ORIG_GPART_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-GPART_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-VKONT_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-VTREF_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-BUTXT sy-vline
WA_FKK_CORR_PLUGIN_STR-COTXT sy-vline
WA_FKK_CORR_PLUGIN_STR-SENDCONTROL_DESC sy-vline
WA_FKK_CORR_PLUGIN_STR-ADDR_NUMBER sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.