ABAP Select data from SAP table GLE_STR_ADB_KFC_ENH 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 GLE_STR_ADB_KFC_ENH 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 GLE_STR_ADB_KFC_ENH. 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 GLE_STR_ADB_KFC_ENH 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_GLE_STR_ADB_KFC_ENH TYPE STANDARD TABLE OF GLE_STR_ADB_KFC_ENH,
      WA_GLE_STR_ADB_KFC_ENH TYPE GLE_STR_ADB_KFC_ENH,
      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: <GLE_STR_ADB_KFC_ENH> TYPE GLE_STR_ADB_KFC_ENH.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM GLE_STR_ADB_KFC_ENH
*  INTO TABLE @DATA(IT_GLE_STR_ADB_KFC_ENH2).
*--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_GLE_STR_ADB_KFC_ENH INDEX 1 INTO DATA(WA_GLE_STR_ADB_KFC_ENH2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_GLE_STR_ADB_KFC_ENH ASSIGNING <GLE_STR_ADB_KFC_ENH>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<GLE_STR_ADB_KFC_ENH>-PRDAYBAL_T = 1.
<GLE_STR_ADB_KFC_ENH>-CURDAYACT_T = 1.
<GLE_STR_ADB_KFC_ENH>-CURMONTHBAL_T = 1.
<GLE_STR_ADB_KFC_ENH>-YTODATEBAL_T = 1.
<GLE_STR_ADB_KFC_ENH>-PRMONTHBAL_T = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_GLE_STR_ADB_KFC_ENH-CURMONTHAVG_T, sy-vline,
WA_GLE_STR_ADB_KFC_ENH-QTODATEAVG_T, sy-vline,
WA_GLE_STR_ADB_KFC_ENH-YTODATEAVG_T, sy-vline,
WA_GLE_STR_ADB_KFC_ENH-AVGACT_T, sy-vline,
WA_GLE_STR_ADB_KFC_ENH-QTODATEACT_T, sy-vline,
WA_GLE_STR_ADB_KFC_ENH-TCUR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_GLE_STR_ADB_KFC_ENH 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_GLE_STR_ADB_KFC_ENH 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_GLE_STR_ADB_KFC_ENH INTO WA_GLE_STR_ADB_KFC_ENH. *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_GLE_STR_ADB_KFC_ENH_STR,
PRDAYBAL_T TYPE STRING,
CURDAYACT_T TYPE STRING,
CURMONTHBAL_T TYPE STRING,
YTODATEBAL_T TYPE STRING,
PRMONTHBAL_T TYPE STRING,
CURMONTHAVG_T TYPE STRING,
QTODATEAVG_T TYPE STRING,
YTODATEAVG_T TYPE STRING,
AVGACT_T TYPE STRING,
QTODATEACT_T TYPE STRING,
TCUR TYPE STRING,
PRDAYBAL_H TYPE STRING,
CURDAYACT_H TYPE STRING,
CURMONTHBAL_H TYPE STRING,
YTODATEBAL_H TYPE STRING,
PRMONTHBAL_H TYPE STRING,
CURMONTHAVG_H TYPE STRING,
QTODATEAVG_H TYPE STRING,
YTODATEAVG_H TYPE STRING,
AVGACT_H TYPE STRING,
QTODATEACT_H TYPE STRING,
HCUR TYPE STRING,
PRDAYBAL_K TYPE STRING,
CURDAYACT_K TYPE STRING,
CURMONTHBAL_K TYPE STRING,
YTODATEBAL_K TYPE STRING,
PRMONTHBAL_K TYPE STRING,
CURMONTHAVG_K TYPE STRING,
QTODATEAVG_K TYPE STRING,
YTODATEAVG_K TYPE STRING,
AVGACT_K TYPE STRING,
QTODATEACT_K TYPE STRING,
KCUR TYPE STRING,
PRDAYBAL_O TYPE STRING,
CURDAYACT_O TYPE STRING,
CURMONTHBAL_O TYPE STRING,
YTODATEBAL_O TYPE STRING,
PRMONTHBAL_O TYPE STRING,
CURMONTHAVG_O TYPE STRING,
QTODATEAVG_O TYPE STRING,
YTODATEAVG_O TYPE STRING,
AVGACT_O TYPE STRING,
QTODATEACT_O TYPE STRING,
OCUR TYPE STRING,
PRDAYBAL_V TYPE STRING,
CURDAYACT_V TYPE STRING,
CURMONTHBAL_V TYPE STRING,
YTODATEBAL_V TYPE STRING,
PRMONTHBAL_V TYPE STRING,
CURMONTHAVG_V TYPE STRING,
QTODATEAVG_V TYPE STRING,
YTODATEAVG_V TYPE STRING,
AVGACT_V TYPE STRING,
QTODATEACT_V TYPE STRING,
VCUR TYPE STRING,
PRDAYBAL_B TYPE STRING,
CURDAYACT_B TYPE STRING,
CURMONTHBAL_B TYPE STRING,
YTODATEBAL_B TYPE STRING,
PRMONTHBAL_B TYPE STRING,
CURMONTHAVG_B TYPE STRING,
QTODATEAVG_B TYPE STRING,
YTODATEAVG_B TYPE STRING,
AVGACT_B TYPE STRING,
QTODATEACT_B TYPE STRING,
BCUR TYPE STRING,
PRDAYBAL_C TYPE STRING,
CURDAYACT_C TYPE STRING,
CURMONTHBAL_C TYPE STRING,
YTODATEBAL_C TYPE STRING,
PRMONTHBAL_C TYPE STRING,
CURMONTHAVG_C TYPE STRING,
QTODATEAVG_C TYPE STRING,
YTODATEAVG_C TYPE STRING,
AVGACT_C TYPE STRING,
QTODATEACT_C TYPE STRING,
CCUR TYPE STRING,
PRDAYBAL_D TYPE STRING,
CURDAYACT_D TYPE STRING,
CURMONTHBAL_D TYPE STRING,
YTODATEBAL_D TYPE STRING,
PRMONTHBAL_D TYPE STRING,
CURMONTHAVG_D TYPE STRING,
QTODATEAVG_D TYPE STRING,
YTODATEAVG_D TYPE STRING,
AVGACT_D TYPE STRING,
QTODATEACT_D TYPE STRING,
DCUR TYPE STRING,
PRDAYBAL_E TYPE STRING,
CURDAYACT_E TYPE STRING,
CURMONTHBAL_E TYPE STRING,
YTODATEBAL_E TYPE STRING,
PRMONTHBAL_E TYPE STRING,
CURMONTHAVG_E TYPE STRING,
QTODATEAVG_E TYPE STRING,
YTODATEAVG_E TYPE STRING,
AVGACT_E TYPE STRING,
QTODATEACT_E TYPE STRING,
ECUR TYPE STRING,
PRDAYBAL_F TYPE STRING,
CURDAYACT_F TYPE STRING,
CURMONTHBAL_F TYPE STRING,
YTODATEBAL_F TYPE STRING,
PRMONTHBAL_F TYPE STRING,
CURMONTHAVG_F TYPE STRING,
QTODATEAVG_F TYPE STRING,
YTODATEAVG_F TYPE STRING,
AVGACT_F TYPE STRING,
QTODATEACT_F TYPE STRING,
FCUR TYPE STRING,
PRDAYBAL_G TYPE STRING,
CURDAYACT_G TYPE STRING,
CURMONTHBAL_G TYPE STRING,
YTODATEBAL_G TYPE STRING,
PRMONTHBAL_G TYPE STRING,
CURMONTHAVG_G TYPE STRING,
QTODATEAVG_G TYPE STRING,
YTODATEAVG_G TYPE STRING,
AVGACT_G TYPE STRING,
QTODATEACT_G TYPE STRING,
GCUR TYPE STRING,END OF T_EKKO_STR. DATA: WA_GLE_STR_ADB_KFC_ENH_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_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_T sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-TCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_H sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-HCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_K sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-KCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_O sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-OCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_V sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-VCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_B sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-BCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_C sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_D sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-DCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_E sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-ECUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_F sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-FCUR sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRDAYBAL_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURDAYACT_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHBAL_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEBAL_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-PRMONTHBAL_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-CURMONTHAVG_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEAVG_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-YTODATEAVG_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-AVGACT_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-QTODATEACT_G sy-vline
WA_GLE_STR_ADB_KFC_ENH_STR-GCUR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.