ABAP Select data from SAP table F110V 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 F110V 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 F110V. 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 F110V 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_F110V TYPE STANDARD TABLE OF F110V,
      WA_F110V TYPE F110V,
      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: <F110V> TYPE F110V.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM F110V
*  INTO TABLE @DATA(IT_F110V2).
*--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_F110V INDEX 1 INTO DATA(WA_F110V2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_F110V ASSIGNING <F110V>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<F110V>-TEXT1 = 1.
<F110V>-LAUFD = 1.
<F110V>-LAUFI = 1.
<F110V>-XVORL = 1.
<F110V>-COPYD = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_F110V-COPYI, sy-vline,
WA_F110V-LAND1, sy-vline,
WA_F110V-BUKLS, sy-vline,
WA_F110V-ZWELS, sy-vline,
WA_F110V-NEDAT, sy-vline,
WA_F110V-GRDAT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_F110V 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_F110V 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_F110V INTO WA_F110V. *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 VONKD CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_F110V-VONKD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_F110V-VONKD.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field BISKK CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_F110V-BISKK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_F110V-BISKK.
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_F110V_STR,
TEXT1 TYPE STRING,
LAUFD TYPE STRING,
LAUFI TYPE STRING,
XVORL TYPE STRING,
COPYD TYPE STRING,
COPYI TYPE STRING,
LAND1 TYPE STRING,
BUKLS TYPE STRING,
ZWELS TYPE STRING,
NEDAT TYPE STRING,
GRDAT TYPE STRING,
FDEBI TYPE STRING,
WDATE TYPE STRING,
WFAEL TYPE STRING,
VONKD TYPE STRING,
BISKD TYPE STRING,
VONKK TYPE STRING,
BISKK TYPE STRING,
XTRZW TYPE STRING,
XTRBL TYPE STRING,
XTRZE TYPE STRING,
XTRFA TYPE STRING,
LIST1 TYPE STRING,
LIST2 TYPE STRING,
FELDN TYPE STRING,
XIGNO TYPE STRING,
BISDT TYPE STRING,
FAEDA TYPE STRING,
FAEDE TYPE STRING,
STRNA TYPE STRING,
STRNE TYPE STRING,
XFKTV TYPE STRING,
XFAEV TYPE STRING,
USNAM TYPE STRING,
SLKGS TYPE STRING,
SLKAB TYPE STRING,
SLDGS TYPE STRING,
SLDAB TYPE STRING,
FKTGS TYPE STRING,
FKTAB TYPE STRING,
STATU TYPE STRING,
VONLD TYPE STRING,
BISLD TYPE STRING,
STRDT TYPE STRING,
STRZT TYPE STRING,
STRRE TYPE STRING,
XSTRF TYPE STRING,
PROGN TYPE STRING,
VARZA TYPE STRING,
VARI1 TYPE STRING,
VARI2 TYPE STRING,
VARI3 TYPE STRING,
VARI4 TYPE STRING,
XMORE TYPE STRING,
XMITD TYPE STRING,
LPROG TYPE STRING,
VARL1 TYPE STRING,
VARL2 TYPE STRING,
VARL3 TYPE STRING,
VARL4 TYPE STRING,
XMITL TYPE STRING,
BHOST TYPE STRING,
KURST TYPE STRING,
FDTA TYPE STRING,
FILZU TYPE STRING,
BUPLA TYPE STRING,
ICON_MORE TYPE STRING,
X_DD_PRENOTIF TYPE STRING,END OF T_EKKO_STR. DATA: WA_F110V_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_F110V_STR-TEXT1 sy-vline
WA_F110V_STR-LAUFD sy-vline
WA_F110V_STR-LAUFI sy-vline
WA_F110V_STR-XVORL sy-vline
WA_F110V_STR-COPYD sy-vline
WA_F110V_STR-COPYI sy-vline
WA_F110V_STR-LAND1 sy-vline
WA_F110V_STR-BUKLS sy-vline
WA_F110V_STR-ZWELS sy-vline
WA_F110V_STR-NEDAT sy-vline
WA_F110V_STR-GRDAT sy-vline
WA_F110V_STR-FDEBI sy-vline
WA_F110V_STR-WDATE sy-vline
WA_F110V_STR-WFAEL sy-vline
WA_F110V_STR-VONKD sy-vline
WA_F110V_STR-BISKD sy-vline
WA_F110V_STR-VONKK sy-vline
WA_F110V_STR-BISKK sy-vline
WA_F110V_STR-XTRZW sy-vline
WA_F110V_STR-XTRBL sy-vline
WA_F110V_STR-XTRZE sy-vline
WA_F110V_STR-XTRFA sy-vline
WA_F110V_STR-LIST1 sy-vline
WA_F110V_STR-LIST2 sy-vline
WA_F110V_STR-FELDN sy-vline
WA_F110V_STR-XIGNO sy-vline
WA_F110V_STR-BISDT sy-vline
WA_F110V_STR-FAEDA sy-vline
WA_F110V_STR-FAEDE sy-vline
WA_F110V_STR-STRNA sy-vline
WA_F110V_STR-STRNE sy-vline
WA_F110V_STR-XFKTV sy-vline
WA_F110V_STR-XFAEV sy-vline
WA_F110V_STR-USNAM sy-vline
WA_F110V_STR-SLKGS sy-vline
WA_F110V_STR-SLKAB sy-vline
WA_F110V_STR-SLDGS sy-vline
WA_F110V_STR-SLDAB sy-vline
WA_F110V_STR-FKTGS sy-vline
WA_F110V_STR-FKTAB sy-vline
WA_F110V_STR-STATU sy-vline
WA_F110V_STR-VONLD sy-vline
WA_F110V_STR-BISLD sy-vline
WA_F110V_STR-STRDT sy-vline
WA_F110V_STR-STRZT sy-vline
WA_F110V_STR-STRRE sy-vline
WA_F110V_STR-XSTRF sy-vline
WA_F110V_STR-PROGN sy-vline
WA_F110V_STR-VARZA sy-vline
WA_F110V_STR-VARI1 sy-vline
WA_F110V_STR-VARI2 sy-vline
WA_F110V_STR-VARI3 sy-vline
WA_F110V_STR-VARI4 sy-vline
WA_F110V_STR-XMORE sy-vline
WA_F110V_STR-XMITD sy-vline
WA_F110V_STR-LPROG sy-vline
WA_F110V_STR-VARL1 sy-vline
WA_F110V_STR-VARL2 sy-vline
WA_F110V_STR-VARL3 sy-vline
WA_F110V_STR-VARL4 sy-vline
WA_F110V_STR-XMITL sy-vline
WA_F110V_STR-BHOST sy-vline
WA_F110V_STR-KURST sy-vline
WA_F110V_STR-FDTA sy-vline
WA_F110V_STR-FILZU sy-vline
WA_F110V_STR-BUPLA sy-vline
WA_F110V_STR-ICON_MORE sy-vline
WA_F110V_STR-X_DD_PRENOTIF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.