ABAP Select data from SAP table RMSAS_STD_FIELDCAT 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 RMSAS_STD_FIELDCAT 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 RMSAS_STD_FIELDCAT. 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 RMSAS_STD_FIELDCAT 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_RMSAS_STD_FIELDCAT TYPE STANDARD TABLE OF RMSAS_STD_FIELDCAT,
      WA_RMSAS_STD_FIELDCAT TYPE RMSAS_STD_FIELDCAT,
      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: <RMSAS_STD_FIELDCAT> TYPE RMSAS_STD_FIELDCAT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RMSAS_STD_FIELDCAT
*  INTO TABLE @DATA(IT_RMSAS_STD_FIELDCAT2).
*--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_RMSAS_STD_FIELDCAT INDEX 1 INTO DATA(WA_RMSAS_STD_FIELDCAT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RMSAS_STD_FIELDCAT ASSIGNING <RMSAS_STD_FIELDCAT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RMSAS_STD_FIELDCAT>-CNT = 1.
<RMSAS_STD_FIELDCAT>-FIELD = 1.
<RMSAS_STD_FIELDCAT>-ON_F4 = 1.
<RMSAS_STD_FIELDCAT>-ALV_FCAT = 1.
<RMSAS_STD_FIELDCAT>-ROW_POS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RMSAS_STD_FIELDCAT-COL_POS, sy-vline,
WA_RMSAS_STD_FIELDCAT-FIELDNAME, sy-vline,
WA_RMSAS_STD_FIELDCAT-TABNAME, sy-vline,
WA_RMSAS_STD_FIELDCAT-CURRENCY, sy-vline,
WA_RMSAS_STD_FIELDCAT-CFIELDNAME, sy-vline,
WA_RMSAS_STD_FIELDCAT-QUANTITY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RMSAS_STD_FIELDCAT 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_RMSAS_STD_FIELDCAT 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_RMSAS_STD_FIELDCAT INTO WA_RMSAS_STD_FIELDCAT. *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_RMSAS_STD_FIELDCAT-DATATYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMSAS_STD_FIELDCAT-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_RMSAS_STD_FIELDCAT_STR,
CNT TYPE STRING,
FIELD TYPE STRING,
ON_F4 TYPE STRING,
ALV_FCAT TYPE STRING,
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,
DECFLOAT_STYLE TYPE STRING,
PARAMETER0 TYPE STRING,
PARAMETER1 TYPE STRING,
PARAMETER2 TYPE STRING,
PARAMETER3 TYPE STRING,
PARAMETER4 TYPE STRING,
PARAMETER5 TYPE STRING,
PARAMETER6 TYPE STRING,
PARAMETER7 TYPE STRING,
PARAMETER8 TYPE STRING,
PARAMETER9 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,
FIELD_TYPE TYPE STRING,END OF T_EKKO_STR. DATA: WA_RMSAS_STD_FIELDCAT_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_RMSAS_STD_FIELDCAT_STR-CNT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ON_F4 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ALV_FCAT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ROW_POS sy-vline
WA_RMSAS_STD_FIELDCAT_STR-COL_POS sy-vline
WA_RMSAS_STD_FIELDCAT_STR-FIELDNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TABNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-CURRENCY sy-vline
WA_RMSAS_STD_FIELDCAT_STR-CFIELDNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-QUANTITY sy-vline
WA_RMSAS_STD_FIELDCAT_STR-QFIELDNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-IFIELDNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ROUND sy-vline
WA_RMSAS_STD_FIELDCAT_STR-EXPONENT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-KEY sy-vline
WA_RMSAS_STD_FIELDCAT_STR-KEY_SEL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ICON sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SYMBOL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-CHECKBOX sy-vline
WA_RMSAS_STD_FIELDCAT_STR-JUST sy-vline
WA_RMSAS_STD_FIELDCAT_STR-LZERO sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_SIGN sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_ZERO sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_CONVEXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-EDIT_MASK sy-vline
WA_RMSAS_STD_FIELDCAT_STR-EMPHASIZE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-FIX_COLUMN sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DO_SUM sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_SUM sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_OUT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TECH sy-vline
WA_RMSAS_STD_FIELDCAT_STR-OUTPUTLEN sy-vline
WA_RMSAS_STD_FIELDCAT_STR-CONVEXIT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SELTEXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TOOLTIP sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ROLLNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DATATYPE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INTTYPE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INTLEN sy-vline
WA_RMSAS_STD_FIELDCAT_STR-LOWERCASE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-REPTEXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-HIER_LEVEL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-REPREP sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DOMNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SP_GROUP sy-vline
WA_RMSAS_STD_FIELDCAT_STR-HOTSPOT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DFIELDNAME sy-vline
WA_RMSAS_STD_FIELDCAT_STR-COL_ID sy-vline
WA_RMSAS_STD_FIELDCAT_STR-F4AVAILABL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-AUTO_VALUE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-CHECKTABLE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-VALEXI sy-vline
WA_RMSAS_STD_FIELDCAT_STR-WEB_FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-HREF_HNDL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-STYLE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-STYLE2 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-STYLE3 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-STYLE4 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DRDN_HNDL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DRDN_FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_MERGING sy-vline
WA_RMSAS_STD_FIELDCAT_STR-H_FTYPE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-COL_OPT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-NO_INIT_CH sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DRDN_ALIAS sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DECFLOAT_STYLE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER0 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER1 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER2 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER3 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER4 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER5 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER6 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER7 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER8 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-PARAMETER9 sy-vline
WA_RMSAS_STD_FIELDCAT_STR-REF_FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-REF_TABLE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TXT_FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-ROUNDFIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DECIMALS_O sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DECMLFIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DD_OUTLEN sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DECIMALS sy-vline
WA_RMSAS_STD_FIELDCAT_STR-COLTEXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SCRTEXT_L sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SCRTEXT_M sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SCRTEXT_S sy-vline
WA_RMSAS_STD_FIELDCAT_STR-COLDDICTXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-SELDDICTXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TIPDDICTXT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-EDIT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TECH_COL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TECH_FORM sy-vline
WA_RMSAS_STD_FIELDCAT_STR-TECH_COMP sy-vline
WA_RMSAS_STD_FIELDCAT_STR-HIER_CPOS sy-vline
WA_RMSAS_STD_FIELDCAT_STR-H_COL_KEY sy-vline
WA_RMSAS_STD_FIELDCAT_STR-H_SELECT sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DD_ROLL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-DRAGDROPID sy-vline
WA_RMSAS_STD_FIELDCAT_STR-MAC sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_FIELD sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_CFIEL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_QFIEL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_IFIEL sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_ROUND sy-vline
WA_RMSAS_STD_FIELDCAT_STR-INDX_DECML sy-vline
WA_RMSAS_STD_FIELDCAT_STR-GET_STYLE sy-vline
WA_RMSAS_STD_FIELDCAT_STR-MARK sy-vline
WA_RMSAS_STD_FIELDCAT_STR-FIELD_TYPE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.