ABAP Select data from SAP table FMFCTR_CD 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 FMFCTR_CD 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 FMFCTR_CD. 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 FMFCTR_CD 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_FMFCTR_CD TYPE STANDARD TABLE OF FMFCTR_CD,
      WA_FMFCTR_CD TYPE FMFCTR_CD,
      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: <FMFCTR_CD> TYPE FMFCTR_CD.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FMFCTR_CD
*  INTO TABLE @DATA(IT_FMFCTR_CD2).
*--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_FMFCTR_CD INDEX 1 INTO DATA(WA_FMFCTR_CD2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FMFCTR_CD ASSIGNING <FMFCTR_CD>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FMFCTR_CD>-MANDT = 1.
<FMFCTR_CD>-FIKRS = 1.
<FMFCTR_CD>-FICTR = 1.
<FMFCTR_CD>-DATBIS = 1.
<FMFCTR_CD>-DATAB = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FMFCTR_CD-CTR_OBJNR, sy-vline,
WA_FMFCTR_CD-ERFDAT, sy-vline,
WA_FMFCTR_CD-ERFNAME, sy-vline,
WA_FMFCTR_CD-AENDAT, sy-vline,
WA_FMFCTR_CD-AENNAME, sy-vline,
WA_FMFCTR_CD-BOSS_CODE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FMFCTR_CD 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_FMFCTR_CD 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_FMFCTR_CD INTO WA_FMFCTR_CD. *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 LOGSYSTEM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FMFCTR_CD-LOGSYSTEM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMFCTR_CD-LOGSYSTEM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field SPRAS CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_FMFCTR_CD-SPRAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FMFCTR_CD-SPRAS.
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_FMFCTR_CD_STR,
MANDT TYPE STRING,
FIKRS TYPE STRING,
FICTR TYPE STRING,
DATBIS TYPE STRING,
DATAB TYPE STRING,
CTR_OBJNR TYPE STRING,
ERFDAT TYPE STRING,
ERFNAME TYPE STRING,
AENDAT TYPE STRING,
AENNAME TYPE STRING,
BOSS_CODE TYPE STRING,
WAERS TYPE STRING,
BOSSOT TYPE STRING,
BOSSID TYPE STRING,
BOSSNAME TYPE STRING,
FINCODE TYPE STRING,
AUGRP TYPE STRING,
BUKRS TYPE STRING,
GSBER TYPE STRING,
LOGSYSTEM TYPE STRING,
DECKUNG TYPE STRING,
DATE_EXP TYPE STRING,
ANREDE TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
NAME3 TYPE STRING,
NAME4 TYPE STRING,
STRASSE TYPE STRING,
POSTLZ TYPE STRING,
ORT TYPE STRING,
ORTSTEIL TYPE STRING,
POSTFACH TYPE STRING,
POSTLZFACH TYPE STRING,
LAND1 TYPE STRING,
REGION TYPE STRING,
SPRAS TYPE STRING,
TELEBOX TYPE STRING,
TELEFON1 TYPE STRING,
TELEFON2 TYPE STRING,
TELEFAX TYPE STRING,
TELETEXT TYPE STRING,
TELEX TYPE STRING,
DATENLTNR TYPE STRING,
AGCYCODE TYPE STRING,
ORGCODE TYPE STRING,
AGCYTYPE TYPE STRING,
SUPTYPE TYPE STRING,
REVUNIT TYPE STRING,
NEWPAY TYPE STRING,
HBKID TYPE STRING,
MINIS TYPE STRING,
SECEST TYPE STRING,
AREA TYPE STRING,
SERFA TYPE STRING,
ORGAN TYPE STRING,
CAPI TYPE STRING,
DIVI TYPE STRING,
SUBD TYPE STRING,
TORC TYPE STRING,END OF T_EKKO_STR. DATA: WA_FMFCTR_CD_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_FMFCTR_CD_STR-MANDT sy-vline
WA_FMFCTR_CD_STR-FIKRS sy-vline
WA_FMFCTR_CD_STR-FICTR sy-vline
WA_FMFCTR_CD_STR-DATBIS sy-vline
WA_FMFCTR_CD_STR-DATAB sy-vline
WA_FMFCTR_CD_STR-CTR_OBJNR sy-vline
WA_FMFCTR_CD_STR-ERFDAT sy-vline
WA_FMFCTR_CD_STR-ERFNAME sy-vline
WA_FMFCTR_CD_STR-AENDAT sy-vline
WA_FMFCTR_CD_STR-AENNAME sy-vline
WA_FMFCTR_CD_STR-BOSS_CODE sy-vline
WA_FMFCTR_CD_STR-WAERS sy-vline
WA_FMFCTR_CD_STR-BOSSOT sy-vline
WA_FMFCTR_CD_STR-BOSSID sy-vline
WA_FMFCTR_CD_STR-BOSSNAME sy-vline
WA_FMFCTR_CD_STR-FINCODE sy-vline
WA_FMFCTR_CD_STR-AUGRP sy-vline
WA_FMFCTR_CD_STR-BUKRS sy-vline
WA_FMFCTR_CD_STR-GSBER sy-vline
WA_FMFCTR_CD_STR-LOGSYSTEM sy-vline
WA_FMFCTR_CD_STR-DECKUNG sy-vline
WA_FMFCTR_CD_STR-DATE_EXP sy-vline
WA_FMFCTR_CD_STR-ANREDE sy-vline
WA_FMFCTR_CD_STR-NAME1 sy-vline
WA_FMFCTR_CD_STR-NAME2 sy-vline
WA_FMFCTR_CD_STR-NAME3 sy-vline
WA_FMFCTR_CD_STR-NAME4 sy-vline
WA_FMFCTR_CD_STR-STRASSE sy-vline
WA_FMFCTR_CD_STR-POSTLZ sy-vline
WA_FMFCTR_CD_STR-ORT sy-vline
WA_FMFCTR_CD_STR-ORTSTEIL sy-vline
WA_FMFCTR_CD_STR-POSTFACH sy-vline
WA_FMFCTR_CD_STR-POSTLZFACH sy-vline
WA_FMFCTR_CD_STR-LAND1 sy-vline
WA_FMFCTR_CD_STR-REGION sy-vline
WA_FMFCTR_CD_STR-SPRAS sy-vline
WA_FMFCTR_CD_STR-TELEBOX sy-vline
WA_FMFCTR_CD_STR-TELEFON1 sy-vline
WA_FMFCTR_CD_STR-TELEFON2 sy-vline
WA_FMFCTR_CD_STR-TELEFAX sy-vline
WA_FMFCTR_CD_STR-TELETEXT sy-vline
WA_FMFCTR_CD_STR-TELEX sy-vline
WA_FMFCTR_CD_STR-DATENLTNR sy-vline
WA_FMFCTR_CD_STR-AGCYCODE sy-vline
WA_FMFCTR_CD_STR-ORGCODE sy-vline
WA_FMFCTR_CD_STR-AGCYTYPE sy-vline
WA_FMFCTR_CD_STR-SUPTYPE sy-vline
WA_FMFCTR_CD_STR-REVUNIT sy-vline
WA_FMFCTR_CD_STR-NEWPAY sy-vline
WA_FMFCTR_CD_STR-HBKID sy-vline
WA_FMFCTR_CD_STR-MINIS sy-vline
WA_FMFCTR_CD_STR-SECEST sy-vline
WA_FMFCTR_CD_STR-AREA sy-vline
WA_FMFCTR_CD_STR-SERFA sy-vline
WA_FMFCTR_CD_STR-ORGAN sy-vline
WA_FMFCTR_CD_STR-CAPI sy-vline
WA_FMFCTR_CD_STR-DIVI sy-vline
WA_FMFCTR_CD_STR-SUBD sy-vline
WA_FMFCTR_CD_STR-TORC sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.