ABAP Select data from SAP table SOBEW 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 SOBEW 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 SOBEW. 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 SOBEW 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_SOBEW TYPE STANDARD TABLE OF SOBEW,
      WA_SOBEW TYPE SOBEW,
      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: <SOBEW> TYPE SOBEW.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SOBEW
*  INTO TABLE @DATA(IT_SOBEW2).
*--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_SOBEW INDEX 1 INTO DATA(WA_SOBEW2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_SOBEW ASSIGNING <SOBEW>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<SOBEW>-MATNR = 1.
<SOBEW>-BWKEY = 1.
<SOBEW>-BWTAR = 1.
<SOBEW>-SOBKZ = 1.
<SOBEW>-LIFNR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SOBEW-CURTP, sy-vline,
WA_SOBEW-WAERS, sy-vline,
WA_SOBEW-XRUEM, sy-vline,
WA_SOBEW-XRUEJ, sy-vline,
WA_SOBEW-RMBEW, sy-vline,
WA_SOBEW-LBKUM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_SOBEW 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_SOBEW 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_SOBEW INTO WA_SOBEW. *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 MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_SOBEW-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_SOBEW-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_SOBEW-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_SOBEW-LIFNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field LFGJA CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_SOBEW-LFGJA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_SOBEW-LFGJA.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field MBGJA CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_SOBEW-MBGJA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_SOBEW-MBGJA.
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_SOBEW_STR,
MATNR TYPE STRING,
BWKEY TYPE STRING,
BWTAR TYPE STRING,
SOBKZ TYPE STRING,
LIFNR TYPE STRING,
CURTP TYPE STRING,
WAERS TYPE STRING,
XRUEM TYPE STRING,
XRUEJ TYPE STRING,
RMBEW TYPE STRING,
LBKUM TYPE STRING,
SALK3 TYPE STRING,
SALKV TYPE STRING,
VKSAL TYPE STRING,
VMKUM TYPE STRING,
VMSAL TYPE STRING,
VMSAV TYPE STRING,
VJKUM TYPE STRING,
VJSAL TYPE STRING,
VJSAV TYPE STRING,
LFGJA TYPE STRING,
LFMON TYPE STRING,
BWTTY TYPE STRING,
BKLAS TYPE STRING,
EKLAS TYPE STRING,
QKLAS TYPE STRING,
OKLAS TYPE STRING,
LBKUM_OLD TYPE STRING,
SALK3_OLD TYPE STRING,
SALKV_OLD TYPE STRING,
VKSAL_OLD TYPE STRING,
VMKUM_OLD TYPE STRING,
VMSAL_OLD TYPE STRING,
VMSAV_OLD TYPE STRING,
VJKUM_OLD TYPE STRING,
VJSAL_OLD TYPE STRING,
VJSAV_OLD TYPE STRING,
VPRSV TYPE STRING,
VERPR TYPE STRING,
STPRS TYPE STRING,
PEINH TYPE STRING,
VMVER TYPE STRING,
VMPEI TYPE STRING,
VMSTP TYPE STRING,
VJVER TYPE STRING,
VJPEI TYPE STRING,
VJSTP TYPE STRING,
REMNG TYPE STRING,
LVPVP TYPE STRING,
VMLPV TYPE STRING,
MENGU TYPE STRING,
WERTU TYPE STRING,
MLAST TYPE STRING,
MLMAA TYPE STRING,
KVERU TYPE STRING,
KALN1 TYPE STRING,
KALNR TYPE STRING,
XEXEQ TYPE STRING,
LPLPR TYPE STRING,
LPLPX TYPE STRING,
LBWST TYPE STRING,
HKMAT TYPE STRING,
HRKFT TYPE STRING,
EKALR TYPE STRING,
RMBEWH TYPE STRING,
MBLFM TYPE STRING,
MBGJA TYPE STRING,
MBRUE TYPE STRING,
VMVKS TYPE STRING,
VJVKS TYPE STRING,
VMVKS_OLD TYPE STRING,
VJVKS_OLD TYPE STRING,
STPRS_OLD TYPE STRING,
VERPR_OLD TYPE STRING,
PEINH_OLD TYPE STRING,
VMSTP_OLD TYPE STRING,
VMVER_OLD TYPE STRING,
VMPEI_OLD TYPE STRING,
VJSTP_OLD TYPE STRING,
VJVER_OLD TYPE STRING,
VJPEI_OLD TYPE STRING,
STPRV TYPE STRING,
ZKPRS TYPE STRING,
ZKDAT TYPE STRING,
LAEPR TYPE STRING,
PRCHG TYPE STRING,
VMVPR TYPE STRING,
VJVPR TYPE STRING,
PRCHV TYPE STRING,
INS_OBLIG TYPE STRING,END OF T_EKKO_STR. DATA: WA_SOBEW_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_SOBEW_STR-MATNR sy-vline
WA_SOBEW_STR-BWKEY sy-vline
WA_SOBEW_STR-BWTAR sy-vline
WA_SOBEW_STR-SOBKZ sy-vline
WA_SOBEW_STR-LIFNR sy-vline
WA_SOBEW_STR-CURTP sy-vline
WA_SOBEW_STR-WAERS sy-vline
WA_SOBEW_STR-XRUEM sy-vline
WA_SOBEW_STR-XRUEJ sy-vline
WA_SOBEW_STR-RMBEW sy-vline
WA_SOBEW_STR-LBKUM sy-vline
WA_SOBEW_STR-SALK3 sy-vline
WA_SOBEW_STR-SALKV sy-vline
WA_SOBEW_STR-VKSAL sy-vline
WA_SOBEW_STR-VMKUM sy-vline
WA_SOBEW_STR-VMSAL sy-vline
WA_SOBEW_STR-VMSAV sy-vline
WA_SOBEW_STR-VJKUM sy-vline
WA_SOBEW_STR-VJSAL sy-vline
WA_SOBEW_STR-VJSAV sy-vline
WA_SOBEW_STR-LFGJA sy-vline
WA_SOBEW_STR-LFMON sy-vline
WA_SOBEW_STR-BWTTY sy-vline
WA_SOBEW_STR-BKLAS sy-vline
WA_SOBEW_STR-EKLAS sy-vline
WA_SOBEW_STR-QKLAS sy-vline
WA_SOBEW_STR-OKLAS sy-vline
WA_SOBEW_STR-LBKUM_OLD sy-vline
WA_SOBEW_STR-SALK3_OLD sy-vline
WA_SOBEW_STR-SALKV_OLD sy-vline
WA_SOBEW_STR-VKSAL_OLD sy-vline
WA_SOBEW_STR-VMKUM_OLD sy-vline
WA_SOBEW_STR-VMSAL_OLD sy-vline
WA_SOBEW_STR-VMSAV_OLD sy-vline
WA_SOBEW_STR-VJKUM_OLD sy-vline
WA_SOBEW_STR-VJSAL_OLD sy-vline
WA_SOBEW_STR-VJSAV_OLD sy-vline
WA_SOBEW_STR-VPRSV sy-vline
WA_SOBEW_STR-VERPR sy-vline
WA_SOBEW_STR-STPRS sy-vline
WA_SOBEW_STR-PEINH sy-vline
WA_SOBEW_STR-VMVER sy-vline
WA_SOBEW_STR-VMPEI sy-vline
WA_SOBEW_STR-VMSTP sy-vline
WA_SOBEW_STR-VJVER sy-vline
WA_SOBEW_STR-VJPEI sy-vline
WA_SOBEW_STR-VJSTP sy-vline
WA_SOBEW_STR-REMNG sy-vline
WA_SOBEW_STR-LVPVP sy-vline
WA_SOBEW_STR-VMLPV sy-vline
WA_SOBEW_STR-MENGU sy-vline
WA_SOBEW_STR-WERTU sy-vline
WA_SOBEW_STR-MLAST sy-vline
WA_SOBEW_STR-MLMAA sy-vline
WA_SOBEW_STR-KVERU sy-vline
WA_SOBEW_STR-KALN1 sy-vline
WA_SOBEW_STR-KALNR sy-vline
WA_SOBEW_STR-XEXEQ sy-vline
WA_SOBEW_STR-LPLPR sy-vline
WA_SOBEW_STR-LPLPX sy-vline
WA_SOBEW_STR-LBWST sy-vline
WA_SOBEW_STR-HKMAT sy-vline
WA_SOBEW_STR-HRKFT sy-vline
WA_SOBEW_STR-EKALR sy-vline
WA_SOBEW_STR-RMBEWH sy-vline
WA_SOBEW_STR-MBLFM sy-vline
WA_SOBEW_STR-MBGJA sy-vline
WA_SOBEW_STR-MBRUE sy-vline
WA_SOBEW_STR-VMVKS sy-vline
WA_SOBEW_STR-VJVKS sy-vline
WA_SOBEW_STR-VMVKS_OLD sy-vline
WA_SOBEW_STR-VJVKS_OLD sy-vline
WA_SOBEW_STR-STPRS_OLD sy-vline
WA_SOBEW_STR-VERPR_OLD sy-vline
WA_SOBEW_STR-PEINH_OLD sy-vline
WA_SOBEW_STR-VMSTP_OLD sy-vline
WA_SOBEW_STR-VMVER_OLD sy-vline
WA_SOBEW_STR-VMPEI_OLD sy-vline
WA_SOBEW_STR-VJSTP_OLD sy-vline
WA_SOBEW_STR-VJVER_OLD sy-vline
WA_SOBEW_STR-VJPEI_OLD sy-vline
WA_SOBEW_STR-STPRV sy-vline
WA_SOBEW_STR-ZKPRS sy-vline
WA_SOBEW_STR-ZKDAT sy-vline
WA_SOBEW_STR-LAEPR sy-vline
WA_SOBEW_STR-PRCHG sy-vline
WA_SOBEW_STR-VMVPR sy-vline
WA_SOBEW_STR-VJVPR sy-vline
WA_SOBEW_STR-PRCHV sy-vline
WA_SOBEW_STR-INS_OBLIG sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.