ABAP Select data from SAP table SEOCOMPODF 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 SEOCOMPODF 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 SEOCOMPODF. 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 SEOCOMPODF 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_SEOCOMPODF TYPE STANDARD TABLE OF SEOCOMPODF,
      WA_SEOCOMPODF TYPE SEOCOMPODF,
      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: <SEOCOMPODF> TYPE SEOCOMPODF.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SEOCOMPODF
*  INTO TABLE @DATA(IT_SEOCOMPODF2).
*--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_SEOCOMPODF INDEX 1 INTO DATA(WA_SEOCOMPODF2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_SEOCOMPODF ASSIGNING <SEOCOMPODF>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<SEOCOMPODF>-CLSNAME = 1.
<SEOCOMPODF>-CMPNAME = 1.
<SEOCOMPODF>-VERSION = 1.
<SEOCOMPODF>-ALIAS = 1.
<SEOCOMPODF>-REDEFIN = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SEOCOMPODF-EXPOSURE, sy-vline,
WA_SEOCOMPODF-STATE, sy-vline,
WA_SEOCOMPODF-EDITORDER, sy-vline,
WA_SEOCOMPODF-LOCKED, sy-vline,
WA_SEOCOMPODF-DISPID, sy-vline,
WA_SEOCOMPODF-R3RELEASE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_SEOCOMPODF 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_SEOCOMPODF 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_SEOCOMPODF INTO WA_SEOCOMPODF. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_SEOCOMPODF_STR,
CLSNAME TYPE STRING,
CMPNAME TYPE STRING,
VERSION TYPE STRING,
ALIAS TYPE STRING,
REDEFIN TYPE STRING,
EXPOSURE TYPE STRING,
STATE TYPE STRING,
EDITORDER TYPE STRING,
LOCKED TYPE STRING,
DISPID TYPE STRING,
R3RELEASE TYPE STRING,
AUTHOR TYPE STRING,
CREATEDON TYPE STRING,
CHANGEDBY TYPE STRING,
CHANGEDON TYPE STRING,
MTDDECLTYP TYPE STRING,
MTDABSTRCT TYPE STRING,
MTDFINAL TYPE STRING,
DSRNOTEOM TYPE STRING,
EDTX TYPE STRING,
MTDNEWEXC TYPE STRING,
MTDREPLACE TYPE STRING,
MTDOPTNL TYPE STRING,
MTDAMDPRDONLY TYPE STRING,
MTDAMDPCDSCLNT TYPE STRING,
ATTDECLTYP TYPE STRING,
ATTDYNAMIC TYPE STRING,
ATTGETMTD TYPE STRING,
ATTSETMTD TYPE STRING,
ATTRDONLY TYPE STRING,
ATTVALUE TYPE STRING,
ATTPERSIST TYPE STRING,
ATTBUSOBJ TYPE STRING,
ATTKEYFLD TYPE STRING,
ATTEXPVIRT TYPE STRING,
EVTDECLTYP TYPE STRING,
TYPDUMMY TYPE STRING,
TYPTYPE TYPE STRING,
TYPE TYPE STRING,
TABLEOF TYPE STRING,
SRCROW1 TYPE STRING,
SRCCOLUMN1 TYPE STRING,
SRCROW2 TYPE STRING,
SRCCOLUMN2 TYPE STRING,
REFCLSNAME TYPE STRING,
REFINTNAME TYPE STRING,
REFCMPNAME TYPE STRING,
BCMTDINST TYPE STRING,
BCMTDCAT TYPE STRING,
BCMTDDIA TYPE STRING,
BCMTDCOM TYPE STRING,
BCMTDSYN TYPE STRING,
BCEVTCAT TYPE STRING,
TYPESRC_LENG TYPE STRING,
TYPESRC TYPE STRING,END OF T_EKKO_STR. DATA: WA_SEOCOMPODF_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_SEOCOMPODF_STR-CLSNAME sy-vline
WA_SEOCOMPODF_STR-CMPNAME sy-vline
WA_SEOCOMPODF_STR-VERSION sy-vline
WA_SEOCOMPODF_STR-ALIAS sy-vline
WA_SEOCOMPODF_STR-REDEFIN sy-vline
WA_SEOCOMPODF_STR-EXPOSURE sy-vline
WA_SEOCOMPODF_STR-STATE sy-vline
WA_SEOCOMPODF_STR-EDITORDER sy-vline
WA_SEOCOMPODF_STR-LOCKED sy-vline
WA_SEOCOMPODF_STR-DISPID sy-vline
WA_SEOCOMPODF_STR-R3RELEASE sy-vline
WA_SEOCOMPODF_STR-AUTHOR sy-vline
WA_SEOCOMPODF_STR-CREATEDON sy-vline
WA_SEOCOMPODF_STR-CHANGEDBY sy-vline
WA_SEOCOMPODF_STR-CHANGEDON sy-vline
WA_SEOCOMPODF_STR-MTDDECLTYP sy-vline
WA_SEOCOMPODF_STR-MTDABSTRCT sy-vline
WA_SEOCOMPODF_STR-MTDFINAL sy-vline
WA_SEOCOMPODF_STR-DSRNOTEOM sy-vline
WA_SEOCOMPODF_STR-EDTX sy-vline
WA_SEOCOMPODF_STR-MTDNEWEXC sy-vline
WA_SEOCOMPODF_STR-MTDREPLACE sy-vline
WA_SEOCOMPODF_STR-MTDOPTNL sy-vline
WA_SEOCOMPODF_STR-MTDAMDPRDONLY sy-vline
WA_SEOCOMPODF_STR-MTDAMDPCDSCLNT sy-vline
WA_SEOCOMPODF_STR-ATTDECLTYP sy-vline
WA_SEOCOMPODF_STR-ATTDYNAMIC sy-vline
WA_SEOCOMPODF_STR-ATTGETMTD sy-vline
WA_SEOCOMPODF_STR-ATTSETMTD sy-vline
WA_SEOCOMPODF_STR-ATTRDONLY sy-vline
WA_SEOCOMPODF_STR-ATTVALUE sy-vline
WA_SEOCOMPODF_STR-ATTPERSIST sy-vline
WA_SEOCOMPODF_STR-ATTBUSOBJ sy-vline
WA_SEOCOMPODF_STR-ATTKEYFLD sy-vline
WA_SEOCOMPODF_STR-ATTEXPVIRT sy-vline
WA_SEOCOMPODF_STR-EVTDECLTYP sy-vline
WA_SEOCOMPODF_STR-TYPDUMMY sy-vline
WA_SEOCOMPODF_STR-TYPTYPE sy-vline
WA_SEOCOMPODF_STR-TYPE sy-vline
WA_SEOCOMPODF_STR-TABLEOF sy-vline
WA_SEOCOMPODF_STR-SRCROW1 sy-vline
WA_SEOCOMPODF_STR-SRCCOLUMN1 sy-vline
WA_SEOCOMPODF_STR-SRCROW2 sy-vline
WA_SEOCOMPODF_STR-SRCCOLUMN2 sy-vline
WA_SEOCOMPODF_STR-REFCLSNAME sy-vline
WA_SEOCOMPODF_STR-REFINTNAME sy-vline
WA_SEOCOMPODF_STR-REFCMPNAME sy-vline
WA_SEOCOMPODF_STR-BCMTDINST sy-vline
WA_SEOCOMPODF_STR-BCMTDCAT sy-vline
WA_SEOCOMPODF_STR-BCMTDDIA sy-vline
WA_SEOCOMPODF_STR-BCMTDCOM sy-vline
WA_SEOCOMPODF_STR-BCMTDSYN sy-vline
WA_SEOCOMPODF_STR-BCEVTCAT sy-vline
WA_SEOCOMPODF_STR-TYPESRC_LENG sy-vline
WA_SEOCOMPODF_STR-TYPESRC sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.