ABAP Select data from SAP table IFMVVWM 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 IFMVVWM 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 IFMVVWM. 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 IFMVVWM 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_IFMVVWM TYPE STANDARD TABLE OF IFMVVWM,
      WA_IFMVVWM TYPE IFMVVWM,
      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: <IFMVVWM> TYPE IFMVVWM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IFMVVWM
*  INTO TABLE @DATA(IT_IFMVVWM2).
*--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_IFMVVWM INDEX 1 INTO DATA(WA_IFMVVWM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IFMVVWM ASSIGNING <IFMVVWM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IFMVVWM>-FIPEX = 1.
<IFMVVWM>-FICTR = 1.
<IFMVVWM>-FOND = 1.
<IFMVVWM>-PRAEFIX = 1.
<IFMVVWM>-GLD = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IFMVVWM-EPL, sy-vline,
WA_IFMVVWM-ABSCHN, sy-vline,
WA_IFMVVWM-UABSCH, sy-vline,
WA_IFMVVWM-GRUPPE, sy-vline,
WA_IFMVVWM-HGR, sy-vline,
WA_IFMVVWM-GRP, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IFMVVWM 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_IFMVVWM 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_IFMVVWM INTO WA_IFMVVWM. *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 FIPEX, internal->external for field FIPEX CALL FUNCTION 'CONVERSION_EXIT_FIPEX_OUTPUT' EXPORTING input = WA_IFMVVWM-FIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IFMVVWM-FIPEX.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIL, internal->external for field FIPUP CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_IFMVVWM-FIPUP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IFMVVWM-FIPUP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_IFMVVWM-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IFMVVWM-GJAHR.
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_IFMVVWM_STR,
FIPEX TYPE STRING,
FICTR TYPE STRING,
FOND TYPE STRING,
PRAEFIX TYPE STRING,
GLD TYPE STRING,
EPL TYPE STRING,
ABSCHN TYPE STRING,
UABSCH TYPE STRING,
GRUPPE TYPE STRING,
HGR TYPE STRING,
GRP TYPE STRING,
UGR TYPE STRING,
MASS TYPE STRING,
HMASS TYPE STRING,
MASSN TYPE STRING,
UMASS TYPE STRING,
OBJ TYPE STRING,
PRUEFZ TYPE STRING,
HSART TYPE STRING,
POTYP TYPE STRING,
HSTTEXT1 TYPE STRING,
HSTTEXT2 TYPE STRING,
HSTTEXT3 TYPE STRING,
HSTTEXT4 TYPE STRING,
FIPUP TYPE STRING,
GJAHR TYPE STRING,
BSAMT TYPE STRING,
EFICTR TYPE STRING,
ERL_TEXT TYPE STRING,
ABSCHNT1 TYPE STRING,
ABSCHNT2 TYPE STRING,
UABSCHT1 TYPE STRING,
UABSCHT2 TYPE STRING,
UABSCHT3 TYPE STRING,
USNAM TYPE STRING,
BELNR TYPE STRING,
CPUDT TYPE STRING,
WAERS TYPE STRING,
OB_PLJ TYPE STRING,
OB_NEU TYPE STRING,
OB_CHG TYPE STRING,
OB_LFDJ TYPE STRING,
RE_VOR TYPE STRING,
RE_3 TYPE STRING,
RE_4 TYPE STRING,
KORR TYPE STRING,
CFFLG TYPE STRING,
ANS_PLJ1 TYPE STRING,
ANS_PLJ2 TYPE STRING,
ANS_PLJ3 TYPE STRING,
ANS_PLJ4 TYPE STRING,
ANS_PLJ1_O TYPE STRING,
ANS_PLJ2_O TYPE STRING,
ANS_PLJ3_O TYPE STRING,
ANS_PLJ4_O TYPE STRING,
ANS_PLJ1_C TYPE STRING,
ANS_PLJ2_C TYPE STRING,
ANS_PLJ3_C TYPE STRING,
ANS_PLJ4_C TYPE STRING,
VE_PLJ1 TYPE STRING,
VE_PLJ2 TYPE STRING,
VE_PLJ3 TYPE STRING,
VE_PLJ4 TYPE STRING,
GES_ALT TYPE STRING,
GES_NEU TYPE STRING,
GES_CHG TYPE STRING,
GES_VE TYPE STRING,
SUM_VE TYPE STRING,
CHG_VE TYPE STRING,
GES_E_A TYPE STRING,
BUD_BER TYPE STRING,END OF T_EKKO_STR. DATA: WA_IFMVVWM_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_IFMVVWM_STR-FIPEX sy-vline
WA_IFMVVWM_STR-FICTR sy-vline
WA_IFMVVWM_STR-FOND sy-vline
WA_IFMVVWM_STR-PRAEFIX sy-vline
WA_IFMVVWM_STR-GLD sy-vline
WA_IFMVVWM_STR-EPL sy-vline
WA_IFMVVWM_STR-ABSCHN sy-vline
WA_IFMVVWM_STR-UABSCH sy-vline
WA_IFMVVWM_STR-GRUPPE sy-vline
WA_IFMVVWM_STR-HGR sy-vline
WA_IFMVVWM_STR-GRP sy-vline
WA_IFMVVWM_STR-UGR sy-vline
WA_IFMVVWM_STR-MASS sy-vline
WA_IFMVVWM_STR-HMASS sy-vline
WA_IFMVVWM_STR-MASSN sy-vline
WA_IFMVVWM_STR-UMASS sy-vline
WA_IFMVVWM_STR-OBJ sy-vline
WA_IFMVVWM_STR-PRUEFZ sy-vline
WA_IFMVVWM_STR-HSART sy-vline
WA_IFMVVWM_STR-POTYP sy-vline
WA_IFMVVWM_STR-HSTTEXT1 sy-vline
WA_IFMVVWM_STR-HSTTEXT2 sy-vline
WA_IFMVVWM_STR-HSTTEXT3 sy-vline
WA_IFMVVWM_STR-HSTTEXT4 sy-vline
WA_IFMVVWM_STR-FIPUP sy-vline
WA_IFMVVWM_STR-GJAHR sy-vline
WA_IFMVVWM_STR-BSAMT sy-vline
WA_IFMVVWM_STR-EFICTR sy-vline
WA_IFMVVWM_STR-ERL_TEXT sy-vline
WA_IFMVVWM_STR-ABSCHNT1 sy-vline
WA_IFMVVWM_STR-ABSCHNT2 sy-vline
WA_IFMVVWM_STR-UABSCHT1 sy-vline
WA_IFMVVWM_STR-UABSCHT2 sy-vline
WA_IFMVVWM_STR-UABSCHT3 sy-vline
WA_IFMVVWM_STR-USNAM sy-vline
WA_IFMVVWM_STR-BELNR sy-vline
WA_IFMVVWM_STR-CPUDT sy-vline
WA_IFMVVWM_STR-WAERS sy-vline
WA_IFMVVWM_STR-OB_PLJ sy-vline
WA_IFMVVWM_STR-OB_NEU sy-vline
WA_IFMVVWM_STR-OB_CHG sy-vline
WA_IFMVVWM_STR-OB_LFDJ sy-vline
WA_IFMVVWM_STR-RE_VOR sy-vline
WA_IFMVVWM_STR-RE_3 sy-vline
WA_IFMVVWM_STR-RE_4 sy-vline
WA_IFMVVWM_STR-KORR sy-vline
WA_IFMVVWM_STR-CFFLG sy-vline
WA_IFMVVWM_STR-ANS_PLJ1 sy-vline
WA_IFMVVWM_STR-ANS_PLJ2 sy-vline
WA_IFMVVWM_STR-ANS_PLJ3 sy-vline
WA_IFMVVWM_STR-ANS_PLJ4 sy-vline
WA_IFMVVWM_STR-ANS_PLJ1_O sy-vline
WA_IFMVVWM_STR-ANS_PLJ2_O sy-vline
WA_IFMVVWM_STR-ANS_PLJ3_O sy-vline
WA_IFMVVWM_STR-ANS_PLJ4_O sy-vline
WA_IFMVVWM_STR-ANS_PLJ1_C sy-vline
WA_IFMVVWM_STR-ANS_PLJ2_C sy-vline
WA_IFMVVWM_STR-ANS_PLJ3_C sy-vline
WA_IFMVVWM_STR-ANS_PLJ4_C sy-vline
WA_IFMVVWM_STR-VE_PLJ1 sy-vline
WA_IFMVVWM_STR-VE_PLJ2 sy-vline
WA_IFMVVWM_STR-VE_PLJ3 sy-vline
WA_IFMVVWM_STR-VE_PLJ4 sy-vline
WA_IFMVVWM_STR-GES_ALT sy-vline
WA_IFMVVWM_STR-GES_NEU sy-vline
WA_IFMVVWM_STR-GES_CHG sy-vline
WA_IFMVVWM_STR-GES_VE sy-vline
WA_IFMVVWM_STR-SUM_VE sy-vline
WA_IFMVVWM_STR-CHG_VE sy-vline
WA_IFMVVWM_STR-GES_E_A sy-vline
WA_IFMVVWM_STR-BUD_BER sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.