ABAP Select data from SAP table FAAV_MIG_ANLP 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 FAAV_MIG_ANLP 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 FAAV_MIG_ANLP. 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 FAAV_MIG_ANLP 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_FAAV_MIG_ANLP TYPE STANDARD TABLE OF FAAV_MIG_ANLP,
      WA_FAAV_MIG_ANLP TYPE FAAV_MIG_ANLP,
      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: <FAAV_MIG_ANLP> TYPE FAAV_MIG_ANLP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FAAV_MIG_ANLP
*  INTO TABLE @DATA(IT_FAAV_MIG_ANLP2).
*--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_FAAV_MIG_ANLP INDEX 1 INTO DATA(WA_FAAV_MIG_ANLP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FAAV_MIG_ANLP ASSIGNING <FAAV_MIG_ANLP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FAAV_MIG_ANLP>-MANDT = 1.
<FAAV_MIG_ANLP>-BUKRS = 1.
<FAAV_MIG_ANLP>-GJAHR = 1.
<FAAV_MIG_ANLP>-PERAF = 1.
<FAAV_MIG_ANLP>-AFBNR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FAAV_MIG_ANLP-ANLN1, sy-vline,
WA_FAAV_MIG_ANLP-ANLN2, sy-vline,
WA_FAAV_MIG_ANLP-AFABE, sy-vline,
WA_FAAV_MIG_ANLP-AWKEY, sy-vline,
WA_FAAV_MIG_ANLP-AWREF, sy-vline,
WA_FAAV_MIG_ANLP-KTOGR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FAAV_MIG_ANLP 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_FAAV_MIG_ANLP 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_FAAV_MIG_ANLP INTO WA_FAAV_MIG_ANLP. *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 GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-GJAHR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AC132, internal->external for field AUFWZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFWZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFWZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field NAFAZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-NAFAZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-NAFAZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field SAFAZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-SAFAZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-SAFAZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field ZINSZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-ZINSZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-ZINSZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AUFNZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFNZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFNZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field MAFAZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-MAFAZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-MAFAZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AAFAZ CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AAFAZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AAFAZ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AUFWZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFWZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFWZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field NAFAZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-NAFAZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-NAFAZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field SAFAZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-SAFAZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-SAFAZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field ZINSZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-ZINSZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-ZINSZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AUFNZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFNZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFNZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field MAFAZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-MAFAZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-MAFAZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AAFAZ1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AAFAZ1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AAFAZ1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AUFWZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFWZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFWZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field NAFAZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-NAFAZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-NAFAZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field SAFAZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-SAFAZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-SAFAZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field ZINSZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-ZINSZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-ZINSZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AUFNZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AUFNZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AUFNZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field MAFAZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-MAFAZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-MAFAZ2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field AAFAZ2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_FAAV_MIG_ANLP-AAFAZ2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAAV_MIG_ANLP-AAFAZ2.
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_FAAV_MIG_ANLP_STR,
MANDT TYPE STRING,
BUKRS TYPE STRING,
GJAHR TYPE STRING,
PERAF TYPE STRING,
AFBNR TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
AFABE TYPE STRING,
AWKEY TYPE STRING,
AWREF TYPE STRING,
KTOGR TYPE STRING,
ANLKL TYPE STRING,
XANLGR TYPE STRING,
LDGRP TYPE STRING,
BUHBKT TYPE STRING,
AFAPL TYPE STRING,
ABWBER TYPE STRING,
KOSTL TYPE STRING,
GSBER TYPE STRING,
AUFNR TYPE STRING,
PROJK TYPE STRING,
LSTAR TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
FKBER TYPE STRING,
GRANT_NBR TYPE STRING,
BUDGET_PD TYPE STRING,
SEGMENT TYPE STRING,
PRCTR TYPE STRING,
AUFWZ TYPE STRING,
NAFAZ TYPE STRING,
SAFAZ TYPE STRING,
ZINSZ TYPE STRING,
AUFNZ TYPE STRING,
MAFAZ TYPE STRING,
AAFAZ TYPE STRING,
AUFWZ1 TYPE STRING,
NAFAZ1 TYPE STRING,
SAFAZ1 TYPE STRING,
ZINSZ1 TYPE STRING,
AUFNZ1 TYPE STRING,
MAFAZ1 TYPE STRING,
AAFAZ1 TYPE STRING,
AUFWZ2 TYPE STRING,
NAFAZ2 TYPE STRING,
SAFAZ2 TYPE STRING,
ZINSZ2 TYPE STRING,
AUFNZ2 TYPE STRING,
MAFAZ2 TYPE STRING,
AAFAZ2 TYPE STRING,END OF T_EKKO_STR. DATA: WA_FAAV_MIG_ANLP_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_FAAV_MIG_ANLP_STR-MANDT sy-vline
WA_FAAV_MIG_ANLP_STR-BUKRS sy-vline
WA_FAAV_MIG_ANLP_STR-GJAHR sy-vline
WA_FAAV_MIG_ANLP_STR-PERAF sy-vline
WA_FAAV_MIG_ANLP_STR-AFBNR sy-vline
WA_FAAV_MIG_ANLP_STR-ANLN1 sy-vline
WA_FAAV_MIG_ANLP_STR-ANLN2 sy-vline
WA_FAAV_MIG_ANLP_STR-AFABE sy-vline
WA_FAAV_MIG_ANLP_STR-AWKEY sy-vline
WA_FAAV_MIG_ANLP_STR-AWREF sy-vline
WA_FAAV_MIG_ANLP_STR-KTOGR sy-vline
WA_FAAV_MIG_ANLP_STR-ANLKL sy-vline
WA_FAAV_MIG_ANLP_STR-XANLGR sy-vline
WA_FAAV_MIG_ANLP_STR-LDGRP sy-vline
WA_FAAV_MIG_ANLP_STR-BUHBKT sy-vline
WA_FAAV_MIG_ANLP_STR-AFAPL sy-vline
WA_FAAV_MIG_ANLP_STR-ABWBER sy-vline
WA_FAAV_MIG_ANLP_STR-KOSTL sy-vline
WA_FAAV_MIG_ANLP_STR-GSBER sy-vline
WA_FAAV_MIG_ANLP_STR-AUFNR sy-vline
WA_FAAV_MIG_ANLP_STR-PROJK sy-vline
WA_FAAV_MIG_ANLP_STR-LSTAR sy-vline
WA_FAAV_MIG_ANLP_STR-FISTL sy-vline
WA_FAAV_MIG_ANLP_STR-GEBER sy-vline
WA_FAAV_MIG_ANLP_STR-FKBER sy-vline
WA_FAAV_MIG_ANLP_STR-GRANT_NBR sy-vline
WA_FAAV_MIG_ANLP_STR-BUDGET_PD sy-vline
WA_FAAV_MIG_ANLP_STR-SEGMENT sy-vline
WA_FAAV_MIG_ANLP_STR-PRCTR sy-vline
WA_FAAV_MIG_ANLP_STR-AUFWZ sy-vline
WA_FAAV_MIG_ANLP_STR-NAFAZ sy-vline
WA_FAAV_MIG_ANLP_STR-SAFAZ sy-vline
WA_FAAV_MIG_ANLP_STR-ZINSZ sy-vline
WA_FAAV_MIG_ANLP_STR-AUFNZ sy-vline
WA_FAAV_MIG_ANLP_STR-MAFAZ sy-vline
WA_FAAV_MIG_ANLP_STR-AAFAZ sy-vline
WA_FAAV_MIG_ANLP_STR-AUFWZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-NAFAZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-SAFAZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-ZINSZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-AUFNZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-MAFAZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-AAFAZ1 sy-vline
WA_FAAV_MIG_ANLP_STR-AUFWZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-NAFAZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-SAFAZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-ZINSZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-AUFNZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-MAFAZ2 sy-vline
WA_FAAV_MIG_ANLP_STR-AAFAZ2 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.