ABAP Select data from SAP table WRAPPER_CLASS 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 WRAPPER_CLASS 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 WRAPPER_CLASS. 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 WRAPPER_CLASS 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_WRAPPER_CLASS TYPE STANDARD TABLE OF WRAPPER_CLASS,
      WA_WRAPPER_CLASS TYPE WRAPPER_CLASS,
      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: <WRAPPER_CLASS> TYPE WRAPPER_CLASS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WRAPPER_CLASS
*  INTO TABLE @DATA(IT_WRAPPER_CLASS2).
*--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_WRAPPER_CLASS INDEX 1 INTO DATA(WA_WRAPPER_CLASS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_WRAPPER_CLASS ASSIGNING <WRAPPER_CLASS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<WRAPPER_CLASS>-CONTROLLER = 1.
<WRAPPER_CLASS>-DDCLASS = 1.
<WRAPPER_CLASS>-CONTROLLER = 1.
<WRAPPER_CLASS>-DATES = 1.
<WRAPPER_CLASS>-CONTROLLER = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WRAPPER_CLASS-DATE, sy-vline,
WA_WRAPPER_CLASS-DOUBLES, sy-vline,
WA_WRAPPER_CLASS-CONTROLLER, sy-vline,
WA_WRAPPER_CLASS-DOUBLE, sy-vline,
WA_WRAPPER_CLASS-FCLASS, sy-vline,
WA_WRAPPER_CLASS-CONTROLLER, sy-vline.
ENDLOOP. *Add any further fields from structure WA_WRAPPER_CLASS 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_WRAPPER_CLASS 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_WRAPPER_CLASS INTO WA_WRAPPER_CLASS. *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_WRAPPER_CLASS_STR,
CONTROLLER TYPE STRING,
DDCLASS TYPE STRING,
CONTROLLER TYPE STRING,
DATES TYPE STRING,
CONTROLLER TYPE STRING,
DATE TYPE STRING,
DOUBLES TYPE STRING,
CONTROLLER TYPE STRING,
DOUBLE TYPE STRING,
FCLASS TYPE STRING,
CONTROLLER TYPE STRING,
FLOAT1 TYPE STRING,
FLOAT2 TYPE STRING,
FLOAT3 TYPE STRING,
FLOAT_OBJ1 TYPE STRING,
FLOAT_OBJ2 TYPE STRING,
FLOAT_OBJ3 TYPE STRING,
DIBCLASS TYPE STRING,
CONTROLLER TYPE STRING,
INTEGERS TYPE STRING,
CONTROLLER TYPE STRING,
BIG_INTEGER TYPE STRING,
DECIMALS TYPE STRING,
CONTROLLER TYPE STRING,
BIG_DECIMAL TYPE STRING,
BYTES TYPE STRING,
LONGCLASS TYPE STRING,
CONTROLLER TYPE STRING,
INT1 TYPE STRING,
INT2 TYPE STRING,
INT3 TYPE STRING,
LONG1 TYPE STRING,
LONG2 TYPE STRING,
LONG3 TYPE STRING,
LONG_OBJ1 TYPE STRING,
LONG_OBJ2 TYPE STRING,
LONG_OBJ3 TYPE STRING,
SCONTENT TYPE STRING,
CONTROLLER TYPE STRING,
INT_ATTR TYPE STRING,
FLOAT_ATTR TYPE STRING,
DOBLE_ATTR TYPE STRING,
STR_ATTR TYPE STRING,
INT_ATTR_OBJ TYPE STRING,
FLOAT_ATTR_OBJ TYPE STRING,
DOUBLE_ATTR_OBJ TYPE STRING,
LONG_ATTR_OBJ TYPE STRING,
LONG_ATTR TYPE STRING,
CONTENT TYPE STRING,
LIST TYPE STRING,
CONTROLLER TYPE STRING,
ARRAY_LIST TYPE STRING,END OF T_EKKO_STR. DATA: WA_WRAPPER_CLASS_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_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-DDCLASS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-DATES sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-DATE sy-vline
WA_WRAPPER_CLASS_STR-DOUBLES sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-DOUBLE sy-vline
WA_WRAPPER_CLASS_STR-FCLASS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-FLOAT1 sy-vline
WA_WRAPPER_CLASS_STR-FLOAT2 sy-vline
WA_WRAPPER_CLASS_STR-FLOAT3 sy-vline
WA_WRAPPER_CLASS_STR-FLOAT_OBJ1 sy-vline
WA_WRAPPER_CLASS_STR-FLOAT_OBJ2 sy-vline
WA_WRAPPER_CLASS_STR-FLOAT_OBJ3 sy-vline
WA_WRAPPER_CLASS_STR-DIBCLASS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-INTEGERS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-BIG_INTEGER sy-vline
WA_WRAPPER_CLASS_STR-DECIMALS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-BIG_DECIMAL sy-vline
WA_WRAPPER_CLASS_STR-BYTES sy-vline
WA_WRAPPER_CLASS_STR-LONGCLASS sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-INT1 sy-vline
WA_WRAPPER_CLASS_STR-INT2 sy-vline
WA_WRAPPER_CLASS_STR-INT3 sy-vline
WA_WRAPPER_CLASS_STR-LONG1 sy-vline
WA_WRAPPER_CLASS_STR-LONG2 sy-vline
WA_WRAPPER_CLASS_STR-LONG3 sy-vline
WA_WRAPPER_CLASS_STR-LONG_OBJ1 sy-vline
WA_WRAPPER_CLASS_STR-LONG_OBJ2 sy-vline
WA_WRAPPER_CLASS_STR-LONG_OBJ3 sy-vline
WA_WRAPPER_CLASS_STR-SCONTENT sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-INT_ATTR sy-vline
WA_WRAPPER_CLASS_STR-FLOAT_ATTR sy-vline
WA_WRAPPER_CLASS_STR-DOBLE_ATTR sy-vline
WA_WRAPPER_CLASS_STR-STR_ATTR sy-vline
WA_WRAPPER_CLASS_STR-INT_ATTR_OBJ sy-vline
WA_WRAPPER_CLASS_STR-FLOAT_ATTR_OBJ sy-vline
WA_WRAPPER_CLASS_STR-DOUBLE_ATTR_OBJ sy-vline
WA_WRAPPER_CLASS_STR-LONG_ATTR_OBJ sy-vline
WA_WRAPPER_CLASS_STR-LONG_ATTR sy-vline
WA_WRAPPER_CLASS_STR-CONTENT sy-vline
WA_WRAPPER_CLASS_STR-LIST sy-vline
WA_WRAPPER_CLASS_STR-CONTROLLER sy-vline
WA_WRAPPER_CLASS_STR-ARRAY_LIST sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.