ABAP Select data from SAP table FMEF_OIDATA 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 FMEF_OIDATA 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 FMEF_OIDATA. 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 FMEF_OIDATA 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_FMEF_OIDATA TYPE STANDARD TABLE OF FMEF_OIDATA,
      WA_FMEF_OIDATA TYPE FMEF_OIDATA,
      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: <FMEF_OIDATA> TYPE FMEF_OIDATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FMEF_OIDATA
*  INTO TABLE @DATA(IT_FMEF_OIDATA2).
*--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_FMEF_OIDATA INDEX 1 INTO DATA(WA_FMEF_OIDATA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FMEF_OIDATA ASSIGNING <FMEF_OIDATA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FMEF_OIDATA>-BELNR = 1.
<FMEF_OIDATA>-BLPOS = 1.
<FMEF_OIDATA>-BLTYP = 1.
<FMEF_OIDATA>-BLART = 1.
<FMEF_OIDATA>-BLDAT = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FMEF_OIDATA-BUDAT, sy-vline,
WA_FMEF_OIDATA-FDATK, sy-vline,
WA_FMEF_OIDATA-BUKRS, sy-vline,
WA_FMEF_OIDATA-FIPOS, sy-vline,
WA_FMEF_OIDATA-FISTL, sy-vline,
WA_FMEF_OIDATA-GEBER, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FMEF_OIDATA 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_FMEF_OIDATA 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_FMEF_OIDATA INTO WA_FMEF_OIDATA. *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_FMEF_OIDATA-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-BELNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_FMEF_OIDATA-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-FIPOS.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit NUMCV, internal->external for field VORNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_FMEF_OIDATA-VORNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-VORNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field MEINH CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_FMEF_OIDATA-MEINH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-MEINH.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_FMEF_OIDATA-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-MATNR.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field RFSYS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FMEF_OIDATA-RFSYS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMEF_OIDATA-RFSYS.
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_FMEF_OIDATA_STR,
BELNR TYPE STRING,
BLPOS TYPE STRING,
BLTYP TYPE STRING,
BLART TYPE STRING,
BLDAT TYPE STRING,
BUDAT TYPE STRING,
FDATK TYPE STRING,
BUKRS TYPE STRING,
FIPOS TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
FKBER TYPE STRING,
GRANT_NBR TYPE STRING,
MEASURE TYPE STRING,
GSBER TYPE STRING,
NPLNR TYPE STRING,
VORNR TYPE STRING,
AUFPL TYPE STRING,
APLZL TYPE STRING,
AUFNR TYPE STRING,
KOSTL TYPE STRING,
PS_PSP_PNR TYPE STRING,
SAKNR TYPE STRING,
KUNNR TYPE STRING,
LIFNR TYPE STRING,
IMKEY TYPE STRING,
DABRZ TYPE STRING,
WAERS TYPE STRING,
HWAER TYPE STRING,
KURSF TYPE STRING,
WWERT TYPE STRING,
WTGES TYPE STRING,
HWGES TYPE STRING,
WTGESAPP TYPE STRING,
HWGESAPP TYPE STRING,
WTABB TYPE STRING,
HWABB TYPE STRING,
REVSUM TYPE STRING,
REVAPPSUM TYPE STRING,
WTABBANZ TYPE STRING,
HWABBANZ TYPE STRING,
WTABBANF TYPE STRING,
HWABBANF TYPE STRING,
WTCONS_APP TYPE STRING,
HWCONS_APP TYPE STRING,
STATS TYPE STRING,
ERLKZ TYPE STRING,
LOEKZ TYPE STRING,
ADDITIV_CONS_LOG TYPE STRING,
CARRYOV TYPE STRING,
NEGVAL TYPE STRING,
PTEXT TYPE STRING,
MENGE TYPE STRING,
MEINH TYPE STRING,
MATNR TYPE STRING,
FM_TRANS_DATE TYPE STRING,
FM_TRANS_PERI TYPE STRING,
REFBLTYP TYPE STRING,
REFBELNR TYPE STRING,
REFBLPOS TYPE STRING,
XSENDER TYPE STRING,
XEMPFGR TYPE STRING,
RFTYP TYPE STRING,
RFBLNR TYPE STRING,
RFPOS TYPE STRING,
RFORG TYPE STRING,
RFSYS TYPE STRING,
RFTYPORIG TYPE STRING,
BUDGET_PD TYPE STRING,
DUMMY_INCL_EEW_COBL TYPE STRING,
PAYBUDGET TYPE STRING,
COMBUDGET TYPE STRING,
FMFGUS_KEY TYPE STRING,END OF T_EKKO_STR. DATA: WA_FMEF_OIDATA_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_FMEF_OIDATA_STR-BELNR sy-vline
WA_FMEF_OIDATA_STR-BLPOS sy-vline
WA_FMEF_OIDATA_STR-BLTYP sy-vline
WA_FMEF_OIDATA_STR-BLART sy-vline
WA_FMEF_OIDATA_STR-BLDAT sy-vline
WA_FMEF_OIDATA_STR-BUDAT sy-vline
WA_FMEF_OIDATA_STR-FDATK sy-vline
WA_FMEF_OIDATA_STR-BUKRS sy-vline
WA_FMEF_OIDATA_STR-FIPOS sy-vline
WA_FMEF_OIDATA_STR-FISTL sy-vline
WA_FMEF_OIDATA_STR-GEBER sy-vline
WA_FMEF_OIDATA_STR-FKBER sy-vline
WA_FMEF_OIDATA_STR-GRANT_NBR sy-vline
WA_FMEF_OIDATA_STR-MEASURE sy-vline
WA_FMEF_OIDATA_STR-GSBER sy-vline
WA_FMEF_OIDATA_STR-NPLNR sy-vline
WA_FMEF_OIDATA_STR-VORNR sy-vline
WA_FMEF_OIDATA_STR-AUFPL sy-vline
WA_FMEF_OIDATA_STR-APLZL sy-vline
WA_FMEF_OIDATA_STR-AUFNR sy-vline
WA_FMEF_OIDATA_STR-KOSTL sy-vline
WA_FMEF_OIDATA_STR-PS_PSP_PNR sy-vline
WA_FMEF_OIDATA_STR-SAKNR sy-vline
WA_FMEF_OIDATA_STR-KUNNR sy-vline
WA_FMEF_OIDATA_STR-LIFNR sy-vline
WA_FMEF_OIDATA_STR-IMKEY sy-vline
WA_FMEF_OIDATA_STR-DABRZ sy-vline
WA_FMEF_OIDATA_STR-WAERS sy-vline
WA_FMEF_OIDATA_STR-HWAER sy-vline
WA_FMEF_OIDATA_STR-KURSF sy-vline
WA_FMEF_OIDATA_STR-WWERT sy-vline
WA_FMEF_OIDATA_STR-WTGES sy-vline
WA_FMEF_OIDATA_STR-HWGES sy-vline
WA_FMEF_OIDATA_STR-WTGESAPP sy-vline
WA_FMEF_OIDATA_STR-HWGESAPP sy-vline
WA_FMEF_OIDATA_STR-WTABB sy-vline
WA_FMEF_OIDATA_STR-HWABB sy-vline
WA_FMEF_OIDATA_STR-REVSUM sy-vline
WA_FMEF_OIDATA_STR-REVAPPSUM sy-vline
WA_FMEF_OIDATA_STR-WTABBANZ sy-vline
WA_FMEF_OIDATA_STR-HWABBANZ sy-vline
WA_FMEF_OIDATA_STR-WTABBANF sy-vline
WA_FMEF_OIDATA_STR-HWABBANF sy-vline
WA_FMEF_OIDATA_STR-WTCONS_APP sy-vline
WA_FMEF_OIDATA_STR-HWCONS_APP sy-vline
WA_FMEF_OIDATA_STR-STATS sy-vline
WA_FMEF_OIDATA_STR-ERLKZ sy-vline
WA_FMEF_OIDATA_STR-LOEKZ sy-vline
WA_FMEF_OIDATA_STR-ADDITIV_CONS_LOG sy-vline
WA_FMEF_OIDATA_STR-CARRYOV sy-vline
WA_FMEF_OIDATA_STR-NEGVAL sy-vline
WA_FMEF_OIDATA_STR-PTEXT sy-vline
WA_FMEF_OIDATA_STR-MENGE sy-vline
WA_FMEF_OIDATA_STR-MEINH sy-vline
WA_FMEF_OIDATA_STR-MATNR sy-vline
WA_FMEF_OIDATA_STR-FM_TRANS_DATE sy-vline
WA_FMEF_OIDATA_STR-FM_TRANS_PERI sy-vline
WA_FMEF_OIDATA_STR-REFBLTYP sy-vline
WA_FMEF_OIDATA_STR-REFBELNR sy-vline
WA_FMEF_OIDATA_STR-REFBLPOS sy-vline
WA_FMEF_OIDATA_STR-XSENDER sy-vline
WA_FMEF_OIDATA_STR-XEMPFGR sy-vline
WA_FMEF_OIDATA_STR-RFTYP sy-vline
WA_FMEF_OIDATA_STR-RFBLNR sy-vline
WA_FMEF_OIDATA_STR-RFPOS sy-vline
WA_FMEF_OIDATA_STR-RFORG sy-vline
WA_FMEF_OIDATA_STR-RFSYS sy-vline
WA_FMEF_OIDATA_STR-RFTYPORIG sy-vline
WA_FMEF_OIDATA_STR-BUDGET_PD sy-vline
WA_FMEF_OIDATA_STR-DUMMY_INCL_EEW_COBL sy-vline
WA_FMEF_OIDATA_STR-PAYBUDGET sy-vline
WA_FMEF_OIDATA_STR-COMBUDGET sy-vline
WA_FMEF_OIDATA_STR-FMFGUS_KEY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.