ABAP Select data from SAP table EXBWG_DE 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 EXBWG_DE 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 EXBWG_DE. 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 EXBWG_DE 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_EXBWG_DE TYPE STANDARD TABLE OF EXBWG_DE, WA_EXBWG_DE TYPE EXBWG_DE, 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: <EXBWG_DE> TYPE EXBWG_DE. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_EXBWG_DE. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM EXBWG_DE INTO TABLE IT_EXBWG_DE. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM EXBWG_DE * INTO TABLE @DATA(IT_EXBWG_DE2). *--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_EXBWG_DE INDEX 1 INTO DATA(WA_EXBWG_DE2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_EXBWG_DE ASSIGNING <EXBWG_DE>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<EXBWG_DE>-MANDT = 1.
<EXBWG_DE>-BUKRS = 1.
<EXBWG_DE>-RLDEPO = 1.
<EXBWG_DE>-POSITION_ACCOUNT = 1.
<EXBWG_DE>-RANL = 1.
ENDLOOP. LOOP AT IT_EXBWG_DE INTO WA_EXBWG_DE. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_EXBWG_DE-RLOT, sy-vline,
WA_EXBWG_DE-SANLF, sy-vline,
WA_EXBWG_DE-GSART, sy-vline,
WA_EXBWG_DE-KONTRH, sy-vline,
WA_EXBWG_DE-RREFKONT, sy-vline,
WA_EXBWG_DE-LOT_ID, sy-vline.
ENDLOOP. *Add any further fields from structure WA_EXBWG_DE 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_EXBWG_DE 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_EXBWG_DE INTO WA_EXBWG_DE. *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 ALPHA, internal->external for field RANL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EXBWG_DE-RANL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EXBWG_DE-RANL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KONTRH CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EXBWG_DE-KONTRH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EXBWG_DE-KONTRH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RPZAHL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EXBWG_DE-RPZAHL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EXBWG_DE-RPZAHL.
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_EXBWG_DE_STR,
MANDT TYPE STRING,
BUKRS TYPE STRING,
RLDEPO TYPE STRING,
POSITION_ACCOUNT TYPE STRING,
RANL TYPE STRING,
RLOT TYPE STRING,
SANLF TYPE STRING,
GSART TYPE STRING,
KONTRH TYPE STRING,
RREFKONT TYPE STRING,
LOT_ID TYPE STRING,
SDEAL_LOT_CAT TYPE STRING,
D_ASTUECK TYPE STRING,
D_ASTUECK_LONG TYPE STRING,
D_ASTUECK_SHORT TYPE STRING,
DVONDAT TYPE STRING,
DBISDAT TYPE STRING,
DFAELL TYPE STRING,
DZTERM TYPE STRING,
SFGTYP TYPE STRING,
SFHAART TYPE STRING,
SBEWART TYPE STRING,
SSIGN TYPE STRING,
BUDAT TYPE STRING,
TR_POSTINGSTATE TYPE STRING,
TR_POSTINGDATE TYPE STRING,
SBWHR TYPE STRING,
SBWHRUL TYPE STRING,
SPLWHR TYPE STRING,
SHWHR TYPE STRING,
SCWHR TYPE STRING,
D_BNOMBW TYPE STRING,
D_BNOMBW_LONG TYPE STRING,
D_BNOMBW_SHORT TYPE STRING,
D_CASHCW TYPE STRING,
D_CASHHW TYPE STRING,
D_AWBW TYPE STRING,
D_AWBW_LONG TYPE STRING,
D_AWBW_SHORT TYPE STRING,
D_AWHW TYPE STRING,
D_AWHW_LONG TYPE STRING,
D_AWHW_SHORT TYPE STRING,
D_BWBW TYPE STRING,
D_BWBW_LONG TYPE STRING,
D_BWBW_SHORT TYPE STRING,
D_BWHW TYPE STRING,
D_BWHW_LONG TYPE STRING,
D_BWHW_SHORT TYPE STRING,
D_ERFOLGPLW TYPE STRING,
D_ERFOLGHW TYPE STRING,
ZUOND TYPE STRING,
REFER TYPE STRING,
MERKM TYPE STRING,
RDEALER TYPE STRING,
RHANDPL TYPE STRING,
ZLSCH TYPE STRING,
RPZAHL TYPE STRING,
DIS_FLOWTYPE TYPE STRING,END OF T_EKKO_STR. DATA: WA_EXBWG_DE_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_EXBWG_DE_STR-MANDT sy-vline
WA_EXBWG_DE_STR-BUKRS sy-vline
WA_EXBWG_DE_STR-RLDEPO sy-vline
WA_EXBWG_DE_STR-POSITION_ACCOUNT sy-vline
WA_EXBWG_DE_STR-RANL sy-vline
WA_EXBWG_DE_STR-RLOT sy-vline
WA_EXBWG_DE_STR-SANLF sy-vline
WA_EXBWG_DE_STR-GSART sy-vline
WA_EXBWG_DE_STR-KONTRH sy-vline
WA_EXBWG_DE_STR-RREFKONT sy-vline
WA_EXBWG_DE_STR-LOT_ID sy-vline
WA_EXBWG_DE_STR-SDEAL_LOT_CAT sy-vline
WA_EXBWG_DE_STR-D_ASTUECK sy-vline
WA_EXBWG_DE_STR-D_ASTUECK_LONG sy-vline
WA_EXBWG_DE_STR-D_ASTUECK_SHORT sy-vline
WA_EXBWG_DE_STR-DVONDAT sy-vline
WA_EXBWG_DE_STR-DBISDAT sy-vline
WA_EXBWG_DE_STR-DFAELL sy-vline
WA_EXBWG_DE_STR-DZTERM sy-vline
WA_EXBWG_DE_STR-SFGTYP sy-vline
WA_EXBWG_DE_STR-SFHAART sy-vline
WA_EXBWG_DE_STR-SBEWART sy-vline
WA_EXBWG_DE_STR-SSIGN sy-vline
WA_EXBWG_DE_STR-BUDAT sy-vline
WA_EXBWG_DE_STR-TR_POSTINGSTATE sy-vline
WA_EXBWG_DE_STR-TR_POSTINGDATE sy-vline
WA_EXBWG_DE_STR-SBWHR sy-vline
WA_EXBWG_DE_STR-SBWHRUL sy-vline
WA_EXBWG_DE_STR-SPLWHR sy-vline
WA_EXBWG_DE_STR-SHWHR sy-vline
WA_EXBWG_DE_STR-SCWHR sy-vline
WA_EXBWG_DE_STR-D_BNOMBW sy-vline
WA_EXBWG_DE_STR-D_BNOMBW_LONG sy-vline
WA_EXBWG_DE_STR-D_BNOMBW_SHORT sy-vline
WA_EXBWG_DE_STR-D_CASHCW sy-vline
WA_EXBWG_DE_STR-D_CASHHW sy-vline
WA_EXBWG_DE_STR-D_AWBW sy-vline
WA_EXBWG_DE_STR-D_AWBW_LONG sy-vline
WA_EXBWG_DE_STR-D_AWBW_SHORT sy-vline
WA_EXBWG_DE_STR-D_AWHW sy-vline
WA_EXBWG_DE_STR-D_AWHW_LONG sy-vline
WA_EXBWG_DE_STR-D_AWHW_SHORT sy-vline
WA_EXBWG_DE_STR-D_BWBW sy-vline
WA_EXBWG_DE_STR-D_BWBW_LONG sy-vline
WA_EXBWG_DE_STR-D_BWBW_SHORT sy-vline
WA_EXBWG_DE_STR-D_BWHW sy-vline
WA_EXBWG_DE_STR-D_BWHW_LONG sy-vline
WA_EXBWG_DE_STR-D_BWHW_SHORT sy-vline
WA_EXBWG_DE_STR-D_ERFOLGPLW sy-vline
WA_EXBWG_DE_STR-D_ERFOLGHW sy-vline
WA_EXBWG_DE_STR-ZUOND sy-vline
WA_EXBWG_DE_STR-REFER sy-vline
WA_EXBWG_DE_STR-MERKM sy-vline
WA_EXBWG_DE_STR-RDEALER sy-vline
WA_EXBWG_DE_STR-RHANDPL sy-vline
WA_EXBWG_DE_STR-ZLSCH sy-vline
WA_EXBWG_DE_STR-RPZAHL sy-vline
WA_EXBWG_DE_STR-DIS_FLOWTYPE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.