ABAP Select data from SAP table FAA_S_CFG_DEPR_AREA 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 FAA_S_CFG_DEPR_AREA 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 FAA_S_CFG_DEPR_AREA. 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 FAA_S_CFG_DEPR_AREA 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_FAA_S_CFG_DEPR_AREA TYPE STANDARD TABLE OF FAA_S_CFG_DEPR_AREA,
      WA_FAA_S_CFG_DEPR_AREA TYPE FAA_S_CFG_DEPR_AREA,
      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: <FAA_S_CFG_DEPR_AREA> TYPE FAA_S_CFG_DEPR_AREA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FAA_S_CFG_DEPR_AREA
*  INTO TABLE @DATA(IT_FAA_S_CFG_DEPR_AREA2).
*--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_FAA_S_CFG_DEPR_AREA INDEX 1 INTO DATA(WA_FAA_S_CFG_DEPR_AREA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FAA_S_CFG_DEPR_AREA ASSIGNING <FAA_S_CFG_DEPR_AREA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FAA_S_CFG_DEPR_AREA>-CLIENT = 1.
<FAA_S_CFG_DEPR_AREA>-COMP_CODE = 1.
<FAA_S_CFG_DEPR_AREA>-LEDGER = 1.
<FAA_S_CFG_DEPR_AREA>-DEPR_AREA = 1.
<FAA_S_CFG_DEPR_AREA>-VALVIEW = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FAA_S_CFG_DEPR_AREA-FISC_YEAR_FROM, sy-vline,
WA_FAA_S_CFG_DEPR_AREA-FISC_YEAR_TO, sy-vline,
WA_FAA_S_CFG_DEPR_AREA-DEPR_FISC_YEAR_VAR, sy-vline,
WA_FAA_S_CFG_DEPR_AREA-ROUND_VALUE, sy-vline,
WA_FAA_S_CFG_DEPR_AREA-ROUND_METHOD, sy-vline,
WA_FAA_S_CFG_DEPR_AREA-UPDATE_QUANTITY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FAA_S_CFG_DEPR_AREA 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_FAA_S_CFG_DEPR_AREA 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_FAA_S_CFG_DEPR_AREA INTO WA_FAA_S_CFG_DEPR_AREA. *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 LEDGER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FAA_S_CFG_DEPR_AREA-LEDGER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAA_S_CFG_DEPR_AREA-LEDGER.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit AU132, internal->external for field GWGWRT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_FAA_S_CFG_DEPR_AREA-GWGWRT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAA_S_CFG_DEPR_AREA-GWGWRT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field GWGBST CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_FAA_S_CFG_DEPR_AREA-GWGBST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAA_S_CFG_DEPR_AREA-GWGBST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field AFAB_FISC_YEAR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_FAA_S_CFG_DEPR_AREA-AFAB_FISC_YEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FAA_S_CFG_DEPR_AREA-AFAB_FISC_YEAR.
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_FAA_S_CFG_DEPR_AREA_STR,
CLIENT TYPE STRING,
COMP_CODE TYPE STRING,
LEDGER TYPE STRING,
DEPR_AREA TYPE STRING,
VALVIEW TYPE STRING,
FISC_YEAR_FROM TYPE STRING,
FISC_YEAR_TO TYPE STRING,
DEPR_FISC_YEAR_VAR TYPE STRING,
ROUND_VALUE TYPE STRING,
ROUND_METHOD TYPE STRING,
UPDATE_QUANTITY TYPE STRING,
BASE_AREA TYPE STRING,
CURRENCY_TYPE TYPE STRING,
CURRENCY_INDEX TYPE STRING,
POSTING_REDESIGN0 TYPE STRING,
DEPR_CHART TYPE STRING,
USE_GROSS_TRANS TYPE STRING,
AUC_VERSION TYPE STRING,
TRANS_DOWNPAYMENT TYPE STRING,
USE_GROUP_ASSET TYPE STRING,
DEPR_DOC_TYPE TYPE STRING,
POST_NBV_RETIREMENT TYPE STRING,
REVENUE_DISTRIBUTE_METHOD TYPE STRING,
VALVIEW_TYPE TYPE STRING,
SIGN_APC TYPE STRING,
SIGN_NBV TYPE STRING,
SIGN_DEPR_ORD TYPE STRING,
SIGN_DEPR_SPEC TYPE STRING,
SIGN_DEPR_UNPL TYPE STRING,
SIGN_TRANS_RESERVES TYPE STRING,
SIGN_REVAL_APC TYPE STRING,
SIGN_REVAL_DEPR_ORD TYPE STRING,
SIGN_INVEST_SUPPORT TYPE STRING,
SIGN_INTEREST TYPE STRING,
GLO_VALVIEW_TYPE TYPE STRING,
GLO_PT_ASSETREPORTEDICT TYPE STRING,
POSTING_TYPE TYPE STRING,
VALUE_TAKEOVER TYPE STRING,
PARAMETER_TAKEOVER TYPE STRING,
IS_VALUE_IDENTICAL TYPE STRING,
IS_PARAMETER_IDENTICAL TYPE STRING,
DEPR_CALC_SEQUENCE TYPE STRING,
VALVIEW_ADJUST TYPE STRING,
FISC_YEAR_VAR TYPE STRING,
ACC_PRINCIPLE TYPE STRING,
LDGRP_GL TYPE STRING,
XSTORE TYPE STRING,
IS_PARALLEL_AREA TYPE STRING,
CURRENCY TYPE STRING,
CURRENCY_DECIMALS TYPE STRING,
CURRENT_FISC_YEAR TYPE STRING,
CLOSED_FISC_YEAR TYPE STRING,
ABVOR1 TYPE STRING,
AFABE1 TYPE STRING,
ANTEI1 TYPE STRING,
ABVOR2 TYPE STRING,
AFABE2 TYPE STRING,
ANTEI2 TYPE STRING,
ABVOR3 TYPE STRING,
AFABE3 TYPE STRING,
ANTEI3 TYPE STRING,
ABVOR4 TYPE STRING,
AFABE4 TYPE STRING,
ANTEI4 TYPE STRING,
CORRBE TYPE STRING,
AREA_USAGE_IND TYPE STRING,
WRTAFB TYPE STRING,
PARAFB TYPE STRING,
BERTYP TYPE STRING,
T093B_PERIV TYPE STRING,
GWGWRT TYPE STRING,
GWGBST TYPE STRING,
AFAB_RHYTHM TYPE STRING,
AFAB_FISC_YEAR TYPE STRING,
AFAB_FISC_PERIOD TYPE STRING,END OF T_EKKO_STR. DATA: WA_FAA_S_CFG_DEPR_AREA_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_FAA_S_CFG_DEPR_AREA_STR-CLIENT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-COMP_CODE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-LEDGER sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-DEPR_AREA sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-VALVIEW sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-FISC_YEAR_FROM sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-FISC_YEAR_TO sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-DEPR_FISC_YEAR_VAR sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ROUND_VALUE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ROUND_METHOD sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-UPDATE_QUANTITY sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-BASE_AREA sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CURRENCY_TYPE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CURRENCY_INDEX sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-POSTING_REDESIGN0 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-DEPR_CHART sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-USE_GROSS_TRANS sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AUC_VERSION sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-TRANS_DOWNPAYMENT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-USE_GROUP_ASSET sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-DEPR_DOC_TYPE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-POST_NBV_RETIREMENT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-REVENUE_DISTRIBUTE_METHOD sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-VALVIEW_TYPE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_APC sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_NBV sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_DEPR_ORD sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_DEPR_SPEC sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_DEPR_UNPL sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_TRANS_RESERVES sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_REVAL_APC sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_REVAL_DEPR_ORD sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_INVEST_SUPPORT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-SIGN_INTEREST sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-GLO_VALVIEW_TYPE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-GLO_PT_ASSETREPORTEDICT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-POSTING_TYPE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-VALUE_TAKEOVER sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-PARAMETER_TAKEOVER sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-IS_VALUE_IDENTICAL sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-IS_PARAMETER_IDENTICAL sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-DEPR_CALC_SEQUENCE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-VALVIEW_ADJUST sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-FISC_YEAR_VAR sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ACC_PRINCIPLE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-LDGRP_GL sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-XSTORE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-IS_PARALLEL_AREA sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CURRENCY sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CURRENCY_DECIMALS sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CURRENT_FISC_YEAR sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CLOSED_FISC_YEAR sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ABVOR1 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFABE1 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ANTEI1 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ABVOR2 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFABE2 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ANTEI2 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ABVOR3 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFABE3 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ANTEI3 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ABVOR4 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFABE4 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-ANTEI4 sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-CORRBE sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AREA_USAGE_IND sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-WRTAFB sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-PARAFB sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-BERTYP sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-T093B_PERIV sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-GWGWRT sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-GWGBST sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFAB_RHYTHM sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFAB_FISC_YEAR sy-vline
WA_FAA_S_CFG_DEPR_AREA_STR-AFAB_FISC_PERIOD sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.