ABAP Select data from SAP table LVC_S_FCAT_DB2 into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP LVC_S_FCAT_DB2 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 LVC_S_FCAT_DB2. 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 LVC_S_FCAT_DB2 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_LVC_S_FCAT_DB2 TYPE STANDARD TABLE OF LVC_S_FCAT_DB2,
      WA_LVC_S_FCAT_DB2 TYPE LVC_S_FCAT_DB2,
      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: <LVC_S_FCAT_DB2> TYPE LVC_S_FCAT_DB2.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM LVC_S_FCAT_DB2
*  INTO TABLE @DATA(IT_LVC_S_FCAT_DB22).
*--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_LVC_S_FCAT_DB2 INDEX 1 INTO DATA(WA_LVC_S_FCAT_DB22).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_LVC_S_FCAT_DB2 ASSIGNING <LVC_S_FCAT_DB2>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<LVC_S_FCAT_DB2>-ROW_POS = 1.
<LVC_S_FCAT_DB2>-COL_POS = 1.
<LVC_S_FCAT_DB2>-FIELDNAME = 1.
<LVC_S_FCAT_DB2>-TABNAME = 1.
<LVC_S_FCAT_DB2>-CURRENCY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_LVC_S_FCAT_DB2-CFIELDNAME, sy-vline,
  WA_LVC_S_FCAT_DB2-QUANTITY, sy-vline,
  WA_LVC_S_FCAT_DB2-QFIELDNAME, sy-vline,
  WA_LVC_S_FCAT_DB2-IFIELDNAME, sy-vline,
  WA_LVC_S_FCAT_DB2-ROUND, sy-vline,
  WA_LVC_S_FCAT_DB2-EXPONENT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_LVC_S_FCAT_DB2 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_LVC_S_FCAT_DB2 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_LVC_S_FCAT_DB2 INTO WA_LVC_S_FCAT_DB2.


*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 DTYPE, internal->external for field DATATYPE
CALL FUNCTION 'CONVERSION_EXIT_DTYPE_OUTPUT'
  EXPORTING
    input =                      WA_LVC_S_FCAT_DB2-DATATYPE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_LVC_S_FCAT_DB2-DATATYPE.
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_LVC_S_FCAT_DB2_STR, 
ROW_POS TYPE STRING,
COL_POS TYPE STRING,
FIELDNAME TYPE STRING,
TABNAME TYPE STRING,
CURRENCY TYPE STRING,
CFIELDNAME TYPE STRING,
QUANTITY TYPE STRING,
QFIELDNAME TYPE STRING,
IFIELDNAME TYPE STRING,
ROUND TYPE STRING,
EXPONENT TYPE STRING,
KEY TYPE STRING,
KEY_SEL TYPE STRING,
ICON TYPE STRING,
SYMBOL TYPE STRING,
CHECKBOX TYPE STRING,
JUST TYPE STRING,
LZERO TYPE STRING,
NO_SIGN TYPE STRING,
NO_ZERO TYPE STRING,
NO_CONVEXT TYPE STRING,
EDIT_MASK TYPE STRING,
EMPHASIZE TYPE STRING,
FIX_COLUMN TYPE STRING,
DO_SUM TYPE STRING,
NO_SUM TYPE STRING,
NO_OUT TYPE STRING,
TECH TYPE STRING,
OUTPUTLEN TYPE STRING,
CONVEXIT TYPE STRING,
SELTEXT TYPE STRING,
TOOLTIP TYPE STRING,
ROLLNAME TYPE STRING,
DATATYPE TYPE STRING,
INTTYPE TYPE STRING,
INTLEN TYPE STRING,
LOWERCASE TYPE STRING,
REPTEXT TYPE STRING,
HIER_LEVEL TYPE STRING,
REPREP TYPE STRING,
DOMNAME TYPE STRING,
SP_GROUP TYPE STRING,
HOTSPOT TYPE STRING,
DFIELDNAME TYPE STRING,
COL_ID TYPE STRING,
F4AVAILABL TYPE STRING,
AUTO_VALUE TYPE STRING,
CHECKTABLE TYPE STRING,
VALEXI TYPE STRING,
WEB_FIELD TYPE STRING,
HREF_HNDL TYPE STRING,
STYLE TYPE STRING,
STYLE2 TYPE STRING,
STYLE3 TYPE STRING,
STYLE4 TYPE STRING,
DRDN_HNDL TYPE STRING,
DRDN_FIELD TYPE STRING,
NO_MERGING TYPE STRING,
H_FTYPE TYPE STRING,
COL_OPT TYPE STRING,
NO_INIT_CH TYPE STRING,
DRDN_ALIAS TYPE STRING,
REF_FIELD TYPE STRING,
REF_TABLE TYPE STRING,
TXT_FIELD TYPE STRING,
ROUNDFIELD TYPE STRING,
DECIMALS_O TYPE STRING,
DECMLFIELD TYPE STRING,
DD_OUTLEN TYPE STRING,
DECIMALS TYPE STRING,
COLTEXT TYPE STRING,
SCRTEXT_L TYPE STRING,
SCRTEXT_M TYPE STRING,
SCRTEXT_S TYPE STRING,
COLDDICTXT TYPE STRING,
SELDDICTXT TYPE STRING,
TIPDDICTXT TYPE STRING,
EDIT TYPE STRING,
TECH_COL TYPE STRING,
TECH_FORM TYPE STRING,
TECH_COMP TYPE STRING,
HIER_CPOS TYPE STRING,
H_COL_KEY TYPE STRING,
H_SELECT TYPE STRING,
DD_ROLL TYPE STRING,
DRAGDROPID TYPE STRING,
MAC TYPE STRING,
INDX_FIELD TYPE STRING,
INDX_CFIEL TYPE STRING,
INDX_QFIEL TYPE STRING,
INDX_IFIEL TYPE STRING,
INDX_ROUND TYPE STRING,
INDX_DECML TYPE STRING,
GET_STYLE TYPE STRING,
MARK TYPE STRING,END OF T_EKKO_STR.
DATA: WA_LVC_S_FCAT_DB2_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_LVC_S_FCAT_DB2_STR-ROW_POS sy-vline 
WA_LVC_S_FCAT_DB2_STR-COL_POS sy-vline 
WA_LVC_S_FCAT_DB2_STR-FIELDNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-TABNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-CURRENCY sy-vline 
WA_LVC_S_FCAT_DB2_STR-CFIELDNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-QUANTITY sy-vline 
WA_LVC_S_FCAT_DB2_STR-QFIELDNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-IFIELDNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-ROUND sy-vline 
WA_LVC_S_FCAT_DB2_STR-EXPONENT sy-vline 
WA_LVC_S_FCAT_DB2_STR-KEY sy-vline 
WA_LVC_S_FCAT_DB2_STR-KEY_SEL sy-vline 
WA_LVC_S_FCAT_DB2_STR-ICON sy-vline 
WA_LVC_S_FCAT_DB2_STR-SYMBOL sy-vline 
WA_LVC_S_FCAT_DB2_STR-CHECKBOX sy-vline 
WA_LVC_S_FCAT_DB2_STR-JUST sy-vline 
WA_LVC_S_FCAT_DB2_STR-LZERO sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_SIGN sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_ZERO sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_CONVEXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-EDIT_MASK sy-vline 
WA_LVC_S_FCAT_DB2_STR-EMPHASIZE sy-vline 
WA_LVC_S_FCAT_DB2_STR-FIX_COLUMN sy-vline 
WA_LVC_S_FCAT_DB2_STR-DO_SUM sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_SUM sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_OUT sy-vline 
WA_LVC_S_FCAT_DB2_STR-TECH sy-vline 
WA_LVC_S_FCAT_DB2_STR-OUTPUTLEN sy-vline 
WA_LVC_S_FCAT_DB2_STR-CONVEXIT sy-vline 
WA_LVC_S_FCAT_DB2_STR-SELTEXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-TOOLTIP sy-vline 
WA_LVC_S_FCAT_DB2_STR-ROLLNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-DATATYPE sy-vline 
WA_LVC_S_FCAT_DB2_STR-INTTYPE sy-vline 
WA_LVC_S_FCAT_DB2_STR-INTLEN sy-vline 
WA_LVC_S_FCAT_DB2_STR-LOWERCASE sy-vline 
WA_LVC_S_FCAT_DB2_STR-REPTEXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-HIER_LEVEL sy-vline 
WA_LVC_S_FCAT_DB2_STR-REPREP sy-vline 
WA_LVC_S_FCAT_DB2_STR-DOMNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-SP_GROUP sy-vline 
WA_LVC_S_FCAT_DB2_STR-HOTSPOT sy-vline 
WA_LVC_S_FCAT_DB2_STR-DFIELDNAME sy-vline 
WA_LVC_S_FCAT_DB2_STR-COL_ID sy-vline 
WA_LVC_S_FCAT_DB2_STR-F4AVAILABL sy-vline 
WA_LVC_S_FCAT_DB2_STR-AUTO_VALUE sy-vline 
WA_LVC_S_FCAT_DB2_STR-CHECKTABLE sy-vline 
WA_LVC_S_FCAT_DB2_STR-VALEXI sy-vline 
WA_LVC_S_FCAT_DB2_STR-WEB_FIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-HREF_HNDL sy-vline 
WA_LVC_S_FCAT_DB2_STR-STYLE sy-vline 
WA_LVC_S_FCAT_DB2_STR-STYLE2 sy-vline 
WA_LVC_S_FCAT_DB2_STR-STYLE3 sy-vline 
WA_LVC_S_FCAT_DB2_STR-STYLE4 sy-vline 
WA_LVC_S_FCAT_DB2_STR-DRDN_HNDL sy-vline 
WA_LVC_S_FCAT_DB2_STR-DRDN_FIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_MERGING sy-vline 
WA_LVC_S_FCAT_DB2_STR-H_FTYPE sy-vline 
WA_LVC_S_FCAT_DB2_STR-COL_OPT sy-vline 
WA_LVC_S_FCAT_DB2_STR-NO_INIT_CH sy-vline 
WA_LVC_S_FCAT_DB2_STR-DRDN_ALIAS sy-vline 
WA_LVC_S_FCAT_DB2_STR-REF_FIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-REF_TABLE sy-vline 
WA_LVC_S_FCAT_DB2_STR-TXT_FIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-ROUNDFIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-DECIMALS_O sy-vline 
WA_LVC_S_FCAT_DB2_STR-DECMLFIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-DD_OUTLEN sy-vline 
WA_LVC_S_FCAT_DB2_STR-DECIMALS sy-vline 
WA_LVC_S_FCAT_DB2_STR-COLTEXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-SCRTEXT_L sy-vline 
WA_LVC_S_FCAT_DB2_STR-SCRTEXT_M sy-vline 
WA_LVC_S_FCAT_DB2_STR-SCRTEXT_S sy-vline 
WA_LVC_S_FCAT_DB2_STR-COLDDICTXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-SELDDICTXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-TIPDDICTXT sy-vline 
WA_LVC_S_FCAT_DB2_STR-EDIT sy-vline 
WA_LVC_S_FCAT_DB2_STR-TECH_COL sy-vline 
WA_LVC_S_FCAT_DB2_STR-TECH_FORM sy-vline 
WA_LVC_S_FCAT_DB2_STR-TECH_COMP sy-vline 
WA_LVC_S_FCAT_DB2_STR-HIER_CPOS sy-vline 
WA_LVC_S_FCAT_DB2_STR-H_COL_KEY sy-vline 
WA_LVC_S_FCAT_DB2_STR-H_SELECT sy-vline 
WA_LVC_S_FCAT_DB2_STR-DD_ROLL sy-vline 
WA_LVC_S_FCAT_DB2_STR-DRAGDROPID sy-vline 
WA_LVC_S_FCAT_DB2_STR-MAC sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_FIELD sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_CFIEL sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_QFIEL sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_IFIEL sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_ROUND sy-vline 
WA_LVC_S_FCAT_DB2_STR-INDX_DECML sy-vline 
WA_LVC_S_FCAT_DB2_STR-GET_STYLE sy-vline 
WA_LVC_S_FCAT_DB2_STR-MARK sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.