ABAP Select data from SAP table FKKBEP 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 FKKBEP 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 FKKBEP. 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 FKKBEP 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_FKKBEP TYPE STANDARD TABLE OF FKKBEP,
      WA_FKKBEP TYPE FKKBEP,
      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: <FKKBEP> TYPE FKKBEP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FKKBEP
*  INTO TABLE @DATA(IT_FKKBEP2).
*--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_FKKBEP INDEX 1 INTO DATA(WA_FKKBEP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FKKBEP ASSIGNING <FKKBEP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FKKBEP>-MANDT = 1.
<FKKBEP>-KUKEY = 1.
<FKKBEP>-ESNUM = 1.
<FKKBEP>-EPERL = 1.
<FKKBEP>-VB1OK = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FKKBEP-VB2BA, sy-vline,
WA_FKKBEP-VB2OK, sy-vline,
WA_FKKBEP-PIPRE, sy-vline,
WA_FKKBEP-GRPNR, sy-vline,
WA_FKKBEP-ESTAT, sy-vline,
WA_FKKBEP-BELNR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FKKBEP 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_FKKBEP 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_FKKBEP INTO WA_FKKBEP. *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 BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FKKBEP-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKKBEP-BELNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field KURSF CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_FKKBEP-KURSF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKKBEP-KURSF.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit FMCIL, internal->external for field FIPEX CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_FKKBEP-FIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKKBEP-FIPEX.
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_FKKBEP_STR,
MANDT TYPE STRING,
KUKEY TYPE STRING,
ESNUM TYPE STRING,
EPERL TYPE STRING,
VB1OK TYPE STRING,
VB2BA TYPE STRING,
VB2OK TYPE STRING,
PIPRE TYPE STRING,
GRPNR TYPE STRING,
ESTAT TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
BVDAT TYPE STRING,
BUDAT TYPE STRING,
VALUT TYPE STRING,
BUTIM TYPE STRING,
VOZEI TYPE STRING,
KWAER TYPE STRING,
KWBTR TYPE STRING,
SPESK TYPE STRING,
FWAER TYPE STRING,
FWBTR TYPE STRING,
SPESF TYPE STRING,
VORGC TYPE STRING,
TEXTS TYPE STRING,
VGEXT TYPE STRING,
VGMAN TYPE STRING,
VGINT TYPE STRING,
VGDEF TYPE STRING,
KFMOD TYPE STRING,
VGSAP TYPE STRING,
BUTXT TYPE STRING,
ANZSP TYPE STRING,
XBLNR TYPE STRING,
ZUONR TYPE STRING,
PABKS TYPE STRING,
PABLZ TYPE STRING,
PASWI TYPE STRING,
PAKTO TYPE STRING,
PARTN TYPE STRING,
BUSAB TYPE STRING,
KOSTL TYPE STRING,
GSBER TYPE STRING,
PRCTR TYPE STRING,
VERTN TYPE STRING,
VERTT TYPE STRING,
PNOTA TYPE STRING,
CHECT TYPE STRING,
STAVV TYPE STRING,
TXTVV TYPE STRING,
EPVOZ TYPE STRING,
INFO1 TYPE STRING,
INFO2 TYPE STRING,
AVSID TYPE STRING,
INTAG TYPE STRING,
NBBLN TYPE STRING,
AK1BL TYPE STRING,
AKBLN TYPE STRING,
KNRZA TYPE STRING,
AVKOA TYPE STRING,
AVKON TYPE STRING,
BATCH TYPE STRING,
ITMNR TYPE STRING,
KURSF TYPE STRING,
SGTXT TYPE STRING,
JPDAT TYPE STRING,
POSAG TYPE STRING,
SDOC2 TYPE STRING,
VGREF TYPE STRING,
XBENR TYPE STRING,
XBTYP TYPE STRING,
ARRSK TYPE STRING,
PFORM TYPE STRING,
KIDNO TYPE STRING,
KKREF TYPE STRING,
KKRF2 TYPE STRING,
MANSP TYPE STRING,
FNAM1 TYPE STRING,
FVAL1 TYPE STRING,
FKOA1 TYPE STRING,
FNAM2 TYPE STRING,
FVAL2 TYPE STRING,
FKOA2 TYPE STRING,
FNAM3 TYPE STRING,
FVAL3 TYPE STRING,
FKOA3 TYPE STRING,
IDENR TYPE STRING,
B1APP TYPE STRING,
B1ERR TYPE STRING,
B1STD TYPE STRING,
B1DOC TYPE STRING,
B1TYP TYPE STRING,
B2APP TYPE STRING,
B2ERR TYPE STRING,
B2STD TYPE STRING,
B2DOC TYPE STRING,
B2TYP TYPE STRING,
PIBAN TYPE STRING,
XREF1 TYPE STRING,
FIPEX TYPE STRING,
TRNID TYPE STRING,
KEYPP TYPE STRING,END OF T_EKKO_STR. DATA: WA_FKKBEP_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_FKKBEP_STR-MANDT sy-vline
WA_FKKBEP_STR-KUKEY sy-vline
WA_FKKBEP_STR-ESNUM sy-vline
WA_FKKBEP_STR-EPERL sy-vline
WA_FKKBEP_STR-VB1OK sy-vline
WA_FKKBEP_STR-VB2BA sy-vline
WA_FKKBEP_STR-VB2OK sy-vline
WA_FKKBEP_STR-PIPRE sy-vline
WA_FKKBEP_STR-GRPNR sy-vline
WA_FKKBEP_STR-ESTAT sy-vline
WA_FKKBEP_STR-BELNR sy-vline
WA_FKKBEP_STR-GJAHR sy-vline
WA_FKKBEP_STR-BVDAT sy-vline
WA_FKKBEP_STR-BUDAT sy-vline
WA_FKKBEP_STR-VALUT sy-vline
WA_FKKBEP_STR-BUTIM sy-vline
WA_FKKBEP_STR-VOZEI sy-vline
WA_FKKBEP_STR-KWAER sy-vline
WA_FKKBEP_STR-KWBTR sy-vline
WA_FKKBEP_STR-SPESK sy-vline
WA_FKKBEP_STR-FWAER sy-vline
WA_FKKBEP_STR-FWBTR sy-vline
WA_FKKBEP_STR-SPESF sy-vline
WA_FKKBEP_STR-VORGC sy-vline
WA_FKKBEP_STR-TEXTS sy-vline
WA_FKKBEP_STR-VGEXT sy-vline
WA_FKKBEP_STR-VGMAN sy-vline
WA_FKKBEP_STR-VGINT sy-vline
WA_FKKBEP_STR-VGDEF sy-vline
WA_FKKBEP_STR-KFMOD sy-vline
WA_FKKBEP_STR-VGSAP sy-vline
WA_FKKBEP_STR-BUTXT sy-vline
WA_FKKBEP_STR-ANZSP sy-vline
WA_FKKBEP_STR-XBLNR sy-vline
WA_FKKBEP_STR-ZUONR sy-vline
WA_FKKBEP_STR-PABKS sy-vline
WA_FKKBEP_STR-PABLZ sy-vline
WA_FKKBEP_STR-PASWI sy-vline
WA_FKKBEP_STR-PAKTO sy-vline
WA_FKKBEP_STR-PARTN sy-vline
WA_FKKBEP_STR-BUSAB sy-vline
WA_FKKBEP_STR-KOSTL sy-vline
WA_FKKBEP_STR-GSBER sy-vline
WA_FKKBEP_STR-PRCTR sy-vline
WA_FKKBEP_STR-VERTN sy-vline
WA_FKKBEP_STR-VERTT sy-vline
WA_FKKBEP_STR-PNOTA sy-vline
WA_FKKBEP_STR-CHECT sy-vline
WA_FKKBEP_STR-STAVV sy-vline
WA_FKKBEP_STR-TXTVV sy-vline
WA_FKKBEP_STR-EPVOZ sy-vline
WA_FKKBEP_STR-INFO1 sy-vline
WA_FKKBEP_STR-INFO2 sy-vline
WA_FKKBEP_STR-AVSID sy-vline
WA_FKKBEP_STR-INTAG sy-vline
WA_FKKBEP_STR-NBBLN sy-vline
WA_FKKBEP_STR-AK1BL sy-vline
WA_FKKBEP_STR-AKBLN sy-vline
WA_FKKBEP_STR-KNRZA sy-vline
WA_FKKBEP_STR-AVKOA sy-vline
WA_FKKBEP_STR-AVKON sy-vline
WA_FKKBEP_STR-BATCH sy-vline
WA_FKKBEP_STR-ITMNR sy-vline
WA_FKKBEP_STR-KURSF sy-vline
WA_FKKBEP_STR-SGTXT sy-vline
WA_FKKBEP_STR-JPDAT sy-vline
WA_FKKBEP_STR-POSAG sy-vline
WA_FKKBEP_STR-SDOC2 sy-vline
WA_FKKBEP_STR-VGREF sy-vline
WA_FKKBEP_STR-XBENR sy-vline
WA_FKKBEP_STR-XBTYP sy-vline
WA_FKKBEP_STR-ARRSK sy-vline
WA_FKKBEP_STR-PFORM sy-vline
WA_FKKBEP_STR-KIDNO sy-vline
WA_FKKBEP_STR-KKREF sy-vline
WA_FKKBEP_STR-KKRF2 sy-vline
WA_FKKBEP_STR-MANSP sy-vline
WA_FKKBEP_STR-FNAM1 sy-vline
WA_FKKBEP_STR-FVAL1 sy-vline
WA_FKKBEP_STR-FKOA1 sy-vline
WA_FKKBEP_STR-FNAM2 sy-vline
WA_FKKBEP_STR-FVAL2 sy-vline
WA_FKKBEP_STR-FKOA2 sy-vline
WA_FKKBEP_STR-FNAM3 sy-vline
WA_FKKBEP_STR-FVAL3 sy-vline
WA_FKKBEP_STR-FKOA3 sy-vline
WA_FKKBEP_STR-IDENR sy-vline
WA_FKKBEP_STR-B1APP sy-vline
WA_FKKBEP_STR-B1ERR sy-vline
WA_FKKBEP_STR-B1STD sy-vline
WA_FKKBEP_STR-B1DOC sy-vline
WA_FKKBEP_STR-B1TYP sy-vline
WA_FKKBEP_STR-B2APP sy-vline
WA_FKKBEP_STR-B2ERR sy-vline
WA_FKKBEP_STR-B2STD sy-vline
WA_FKKBEP_STR-B2DOC sy-vline
WA_FKKBEP_STR-B2TYP sy-vline
WA_FKKBEP_STR-PIBAN sy-vline
WA_FKKBEP_STR-XREF1 sy-vline
WA_FKKBEP_STR-FIPEX sy-vline
WA_FKKBEP_STR-TRNID sy-vline
WA_FKKBEP_STR-KEYPP sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.