ABAP Select data from SAP table CWEPX 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 CWEPX 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 CWEPX. 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 CWEPX 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_CWEPX TYPE STANDARD TABLE OF CWEPX,
      WA_CWEPX TYPE CWEPX,
      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: <CWEPX> TYPE CWEPX.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CWEPX
*  INTO TABLE @DATA(IT_CWEPX2).
*--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_CWEPX INDEX 1 INTO DATA(WA_CWEPX2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CWEPX>-FRAMETXT = 1.
<CWEPX>-WEP01 = 1.
<CWEPX>-FRWAE01 = 1.
<CWEPX>-WEP02 = 1.
<CWEPX>-FRWAE02 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CWEPX-WEP03, sy-vline,
  WA_CWEPX-FRWAE03, sy-vline,
  WA_CWEPX-WEP04, sy-vline,
  WA_CWEPX-FRWAE04, sy-vline,
  WA_CWEPX-WEP05, sy-vline,
  WA_CWEPX-FRWAE05, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CWEPX 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_CWEPX 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_CWEPX INTO WA_CWEPX.


*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_CWEPX_STR, 
FRAMETXT TYPE STRING,
WEP01 TYPE STRING,
FRWAE01 TYPE STRING,
WEP02 TYPE STRING,
FRWAE02 TYPE STRING,
WEP03 TYPE STRING,
FRWAE03 TYPE STRING,
WEP04 TYPE STRING,
FRWAE04 TYPE STRING,
WEP05 TYPE STRING,
FRWAE05 TYPE STRING,
WEP06 TYPE STRING,
FRWAE06 TYPE STRING,
WEP07 TYPE STRING,
FRWAE07 TYPE STRING,
WEP08 TYPE STRING,
FRWAE08 TYPE STRING,
WEP09 TYPE STRING,
FRWAE09 TYPE STRING,
WEP10 TYPE STRING,
FRWAE10 TYPE STRING,
WEP11 TYPE STRING,
FRWAE11 TYPE STRING,
WEP12 TYPE STRING,
FRWAE12 TYPE STRING,
WEP13 TYPE STRING,
FRWAE13 TYPE STRING,
WEP14 TYPE STRING,
FRWAE14 TYPE STRING,
WEP15 TYPE STRING,
FRWAE15 TYPE STRING,
WEP16 TYPE STRING,
FRWAE16 TYPE STRING,
WEP17 TYPE STRING,
FRWAE17 TYPE STRING,
WEP18 TYPE STRING,
FRWAE18 TYPE STRING,
WEP19 TYPE STRING,
FRWAE19 TYPE STRING,
WEP20 TYPE STRING,
FRWAE20 TYPE STRING,
WEP21 TYPE STRING,
FRWAE21 TYPE STRING,
WEP22 TYPE STRING,
FRWAE22 TYPE STRING,
WEP23 TYPE STRING,
FRWAE23 TYPE STRING,
WEP24 TYPE STRING,
FRWAE24 TYPE STRING,
WEP25 TYPE STRING,
FRWAE25 TYPE STRING,
WEP26 TYPE STRING,
FRWAE26 TYPE STRING,
WEP27 TYPE STRING,
FRWAE27 TYPE STRING,
WEP28 TYPE STRING,
FRWAE28 TYPE STRING,
WEP29 TYPE STRING,
FRWAE29 TYPE STRING,
WEP30 TYPE STRING,
FRWAE30 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CWEPX_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_CWEPX_STR-FRAMETXT sy-vline 
WA_CWEPX_STR-WEP01 sy-vline 
WA_CWEPX_STR-FRWAE01 sy-vline 
WA_CWEPX_STR-WEP02 sy-vline 
WA_CWEPX_STR-FRWAE02 sy-vline 
WA_CWEPX_STR-WEP03 sy-vline 
WA_CWEPX_STR-FRWAE03 sy-vline 
WA_CWEPX_STR-WEP04 sy-vline 
WA_CWEPX_STR-FRWAE04 sy-vline 
WA_CWEPX_STR-WEP05 sy-vline 
WA_CWEPX_STR-FRWAE05 sy-vline 
WA_CWEPX_STR-WEP06 sy-vline 
WA_CWEPX_STR-FRWAE06 sy-vline 
WA_CWEPX_STR-WEP07 sy-vline 
WA_CWEPX_STR-FRWAE07 sy-vline 
WA_CWEPX_STR-WEP08 sy-vline 
WA_CWEPX_STR-FRWAE08 sy-vline 
WA_CWEPX_STR-WEP09 sy-vline 
WA_CWEPX_STR-FRWAE09 sy-vline 
WA_CWEPX_STR-WEP10 sy-vline 
WA_CWEPX_STR-FRWAE10 sy-vline 
WA_CWEPX_STR-WEP11 sy-vline 
WA_CWEPX_STR-FRWAE11 sy-vline 
WA_CWEPX_STR-WEP12 sy-vline 
WA_CWEPX_STR-FRWAE12 sy-vline 
WA_CWEPX_STR-WEP13 sy-vline 
WA_CWEPX_STR-FRWAE13 sy-vline 
WA_CWEPX_STR-WEP14 sy-vline 
WA_CWEPX_STR-FRWAE14 sy-vline 
WA_CWEPX_STR-WEP15 sy-vline 
WA_CWEPX_STR-FRWAE15 sy-vline 
WA_CWEPX_STR-WEP16 sy-vline 
WA_CWEPX_STR-FRWAE16 sy-vline 
WA_CWEPX_STR-WEP17 sy-vline 
WA_CWEPX_STR-FRWAE17 sy-vline 
WA_CWEPX_STR-WEP18 sy-vline 
WA_CWEPX_STR-FRWAE18 sy-vline 
WA_CWEPX_STR-WEP19 sy-vline 
WA_CWEPX_STR-FRWAE19 sy-vline 
WA_CWEPX_STR-WEP20 sy-vline 
WA_CWEPX_STR-FRWAE20 sy-vline 
WA_CWEPX_STR-WEP21 sy-vline 
WA_CWEPX_STR-FRWAE21 sy-vline 
WA_CWEPX_STR-WEP22 sy-vline 
WA_CWEPX_STR-FRWAE22 sy-vline 
WA_CWEPX_STR-WEP23 sy-vline 
WA_CWEPX_STR-FRWAE23 sy-vline 
WA_CWEPX_STR-WEP24 sy-vline 
WA_CWEPX_STR-FRWAE24 sy-vline 
WA_CWEPX_STR-WEP25 sy-vline 
WA_CWEPX_STR-FRWAE25 sy-vline 
WA_CWEPX_STR-WEP26 sy-vline 
WA_CWEPX_STR-FRWAE26 sy-vline 
WA_CWEPX_STR-WEP27 sy-vline 
WA_CWEPX_STR-FRWAE27 sy-vline 
WA_CWEPX_STR-WEP28 sy-vline 
WA_CWEPX_STR-FRWAE28 sy-vline 
WA_CWEPX_STR-WEP29 sy-vline 
WA_CWEPX_STR-FRWAE29 sy-vline 
WA_CWEPX_STR-WEP30 sy-vline 
WA_CWEPX_STR-FRWAE30 sy-vline      INTO ld_text SEPARATED BY SPACE.

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