ABAP Select data from SAP table UESLL 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 UESLL 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 UESLL. 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 UESLL 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_UESLL TYPE STANDARD TABLE OF UESLL,
      WA_UESLL TYPE UESLL,
      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: <UESLL> TYPE UESLL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM UESLL
*  INTO TABLE @DATA(IT_UESLL2).
*--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_UESLL INDEX 1 INTO DATA(WA_UESLL2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_UESLL ASSIGNING <UESLL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<UESLL>-MANDT = 1.
<UESLL>-PACKNO = 1.
<UESLL>-INTROW = 1.
<UESLL>-EXTROW = 1.
<UESLL>-DEL = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_UESLL-SRVPOS, sy-vline,
WA_UESLL-RANG, sy-vline,
WA_UESLL-EXTGROUP, sy-vline,
WA_UESLL-PACKAGE, sy-vline,
WA_UESLL-SUB_PACKNO, sy-vline,
WA_UESLL-LBNUM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_UESLL 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_UESLL 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_UESLL INTO WA_UESLL. *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 SRVPOS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_UESLL-SRVPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UESLL-SRVPOS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_UESLL-MEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UESLL-MEINS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field IWEIN CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_UESLL-IWEIN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UESLL-IWEIN.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_UESLL-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_UESLL-BELNR.
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_UESLL_STR,
MANDT TYPE STRING,
PACKNO TYPE STRING,
INTROW TYPE STRING,
EXTROW TYPE STRING,
DEL TYPE STRING,
SRVPOS TYPE STRING,
RANG TYPE STRING,
EXTGROUP TYPE STRING,
PACKAGE TYPE STRING,
SUB_PACKNO TYPE STRING,
LBNUM TYPE STRING,
AUSGB TYPE STRING,
STLVPOS TYPE STRING,
EXTSRVNO TYPE STRING,
MENGE TYPE STRING,
MEINS TYPE STRING,
UEBTO TYPE STRING,
UEBTK TYPE STRING,
WITH_LIM TYPE STRING,
SPINF TYPE STRING,
PEINH TYPE STRING,
BRTWR TYPE STRING,
NETWR TYPE STRING,
FROMPOS TYPE STRING,
TOPOS TYPE STRING,
KTEXT1 TYPE STRING,
VRTKZ TYPE STRING,
TWRKZ TYPE STRING,
PERNR TYPE STRING,
MOLGA TYPE STRING,
LGART TYPE STRING,
LGTXT TYPE STRING,
STELL TYPE STRING,
IFTNR TYPE STRING,
BUDAT TYPE STRING,
INSDT TYPE STRING,
PLN_PACKNO TYPE STRING,
PLN_INTROW TYPE STRING,
KNT_PACKNO TYPE STRING,
KNT_INTROW TYPE STRING,
TMP_PACKNO TYPE STRING,
TMP_INTROW TYPE STRING,
STLV_LIM TYPE STRING,
LIMIT_ROW TYPE STRING,
ACT_MENGE TYPE STRING,
ACT_WERT TYPE STRING,
KNT_WERT TYPE STRING,
KNT_MENGE TYPE STRING,
ZIELWERT TYPE STRING,
UNG_WERT TYPE STRING,
UNG_MENGE TYPE STRING,
ALT_INTROW TYPE STRING,
BASIC TYPE STRING,
ALTERNAT TYPE STRING,
BIDDER TYPE STRING,
SUPPLE TYPE STRING,
FREEQTY TYPE STRING,
INFORM TYPE STRING,
PAUSCH TYPE STRING,
EVENTUAL TYPE STRING,
MWSKZ TYPE STRING,
TXJCD TYPE STRING,
TXDAT TYPE STRING,
PRS_CHG TYPE STRING,
MATKL TYPE STRING,
TBTWR TYPE STRING,
NAVNW TYPE STRING,
BASWR TYPE STRING,
KKNUMV TYPE STRING,
IWEIN TYPE STRING,
INT_WORK TYPE STRING,
EXTERNALID TYPE STRING,
KSTAR TYPE STRING,
ACT_WORK TYPE STRING,
MAPNO TYPE STRING,
SRVMAPKEY TYPE STRING,
TAXTARIFFCODE TYPE STRING,
SDATE TYPE STRING,
BEGTIME TYPE STRING,
ENDTIME TYPE STRING,
PERSEXT TYPE STRING,
CATSCOUNTE TYPE STRING,
STOKZ TYPE STRING,
BELNR TYPE STRING,
FORMELNR TYPE STRING,
FRMVAL1 TYPE STRING,
FRMVAL2 TYPE STRING,
FRMVAL3 TYPE STRING,
FRMVAL4 TYPE STRING,
FRMVAL5 TYPE STRING,
USERF1_NUM TYPE STRING,
USERF2_NUM TYPE STRING,
USERF1_TXT TYPE STRING,
USERF2_TXT TYPE STRING,
KNOBJ TYPE STRING,
CHGTEXT TYPE STRING,
KALNR TYPE STRING,
KLVAR TYPE STRING,
EXTDES TYPE STRING,
BOSINTER TYPE STRING,
BOSGRP TYPE STRING,
BOS_RISK TYPE STRING,
BOS_ECP TYPE STRING,
CHGLTEXT TYPE STRING,
BOSGRUPPENR TYPE STRING,
BOSLFDNR TYPE STRING,
BOSDRUKZ TYPE STRING,
BOSSUPPLENO TYPE STRING,
BOSSUPPLESTATUS TYPE STRING,
/SAPBOQ/OBJTYPE TYPE STRING,
/SAPBOQ/SPOSNR TYPE STRING,
/SAPBOQ/MINTROW TYPE STRING,
/SAPBOQ/QT_REL TYPE STRING,
/SAPBOQ/CK_QTY TYPE STRING,
/SAPBOQ/M_FRATE TYPE STRING,
EXTREFKEY TYPE STRING,
INV_MENGE TYPE STRING,
_DATAAGING TYPE STRING,
PER_SDATE TYPE STRING,
PER_EDATE TYPE STRING,
KZ TYPE STRING,
ESLLWAERS TYPE STRING,END OF T_EKKO_STR. DATA: WA_UESLL_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_UESLL_STR-MANDT sy-vline
WA_UESLL_STR-PACKNO sy-vline
WA_UESLL_STR-INTROW sy-vline
WA_UESLL_STR-EXTROW sy-vline
WA_UESLL_STR-DEL sy-vline
WA_UESLL_STR-SRVPOS sy-vline
WA_UESLL_STR-RANG sy-vline
WA_UESLL_STR-EXTGROUP sy-vline
WA_UESLL_STR-PACKAGE sy-vline
WA_UESLL_STR-SUB_PACKNO sy-vline
WA_UESLL_STR-LBNUM sy-vline
WA_UESLL_STR-AUSGB sy-vline
WA_UESLL_STR-STLVPOS sy-vline
WA_UESLL_STR-EXTSRVNO sy-vline
WA_UESLL_STR-MENGE sy-vline
WA_UESLL_STR-MEINS sy-vline
WA_UESLL_STR-UEBTO sy-vline
WA_UESLL_STR-UEBTK sy-vline
WA_UESLL_STR-WITH_LIM sy-vline
WA_UESLL_STR-SPINF sy-vline
WA_UESLL_STR-PEINH sy-vline
WA_UESLL_STR-BRTWR sy-vline
WA_UESLL_STR-NETWR sy-vline
WA_UESLL_STR-FROMPOS sy-vline
WA_UESLL_STR-TOPOS sy-vline
WA_UESLL_STR-KTEXT1 sy-vline
WA_UESLL_STR-VRTKZ sy-vline
WA_UESLL_STR-TWRKZ sy-vline
WA_UESLL_STR-PERNR sy-vline
WA_UESLL_STR-MOLGA sy-vline
WA_UESLL_STR-LGART sy-vline
WA_UESLL_STR-LGTXT sy-vline
WA_UESLL_STR-STELL sy-vline
WA_UESLL_STR-IFTNR sy-vline
WA_UESLL_STR-BUDAT sy-vline
WA_UESLL_STR-INSDT sy-vline
WA_UESLL_STR-PLN_PACKNO sy-vline
WA_UESLL_STR-PLN_INTROW sy-vline
WA_UESLL_STR-KNT_PACKNO sy-vline
WA_UESLL_STR-KNT_INTROW sy-vline
WA_UESLL_STR-TMP_PACKNO sy-vline
WA_UESLL_STR-TMP_INTROW sy-vline
WA_UESLL_STR-STLV_LIM sy-vline
WA_UESLL_STR-LIMIT_ROW sy-vline
WA_UESLL_STR-ACT_MENGE sy-vline
WA_UESLL_STR-ACT_WERT sy-vline
WA_UESLL_STR-KNT_WERT sy-vline
WA_UESLL_STR-KNT_MENGE sy-vline
WA_UESLL_STR-ZIELWERT sy-vline
WA_UESLL_STR-UNG_WERT sy-vline
WA_UESLL_STR-UNG_MENGE sy-vline
WA_UESLL_STR-ALT_INTROW sy-vline
WA_UESLL_STR-BASIC sy-vline
WA_UESLL_STR-ALTERNAT sy-vline
WA_UESLL_STR-BIDDER sy-vline
WA_UESLL_STR-SUPPLE sy-vline
WA_UESLL_STR-FREEQTY sy-vline
WA_UESLL_STR-INFORM sy-vline
WA_UESLL_STR-PAUSCH sy-vline
WA_UESLL_STR-EVENTUAL sy-vline
WA_UESLL_STR-MWSKZ sy-vline
WA_UESLL_STR-TXJCD sy-vline
WA_UESLL_STR-TXDAT sy-vline
WA_UESLL_STR-PRS_CHG sy-vline
WA_UESLL_STR-MATKL sy-vline
WA_UESLL_STR-TBTWR sy-vline
WA_UESLL_STR-NAVNW sy-vline
WA_UESLL_STR-BASWR sy-vline
WA_UESLL_STR-KKNUMV sy-vline
WA_UESLL_STR-IWEIN sy-vline
WA_UESLL_STR-INT_WORK sy-vline
WA_UESLL_STR-EXTERNALID sy-vline
WA_UESLL_STR-KSTAR sy-vline
WA_UESLL_STR-ACT_WORK sy-vline
WA_UESLL_STR-MAPNO sy-vline
WA_UESLL_STR-SRVMAPKEY sy-vline
WA_UESLL_STR-TAXTARIFFCODE sy-vline
WA_UESLL_STR-SDATE sy-vline
WA_UESLL_STR-BEGTIME sy-vline
WA_UESLL_STR-ENDTIME sy-vline
WA_UESLL_STR-PERSEXT sy-vline
WA_UESLL_STR-CATSCOUNTE sy-vline
WA_UESLL_STR-STOKZ sy-vline
WA_UESLL_STR-BELNR sy-vline
WA_UESLL_STR-FORMELNR sy-vline
WA_UESLL_STR-FRMVAL1 sy-vline
WA_UESLL_STR-FRMVAL2 sy-vline
WA_UESLL_STR-FRMVAL3 sy-vline
WA_UESLL_STR-FRMVAL4 sy-vline
WA_UESLL_STR-FRMVAL5 sy-vline
WA_UESLL_STR-USERF1_NUM sy-vline
WA_UESLL_STR-USERF2_NUM sy-vline
WA_UESLL_STR-USERF1_TXT sy-vline
WA_UESLL_STR-USERF2_TXT sy-vline
WA_UESLL_STR-KNOBJ sy-vline
WA_UESLL_STR-CHGTEXT sy-vline
WA_UESLL_STR-KALNR sy-vline
WA_UESLL_STR-KLVAR sy-vline
WA_UESLL_STR-EXTDES sy-vline
WA_UESLL_STR-BOSINTER sy-vline
WA_UESLL_STR-BOSGRP sy-vline
WA_UESLL_STR-BOS_RISK sy-vline
WA_UESLL_STR-BOS_ECP sy-vline
WA_UESLL_STR-CHGLTEXT sy-vline
WA_UESLL_STR-BOSGRUPPENR sy-vline
WA_UESLL_STR-BOSLFDNR sy-vline
WA_UESLL_STR-BOSDRUKZ sy-vline
WA_UESLL_STR-BOSSUPPLENO sy-vline
WA_UESLL_STR-BOSSUPPLESTATUS sy-vline
WA_UESLL_STR-/SAPBOQ/OBJTYPE sy-vline
WA_UESLL_STR-/SAPBOQ/SPOSNR sy-vline
WA_UESLL_STR-/SAPBOQ/MINTROW sy-vline
WA_UESLL_STR-/SAPBOQ/QT_REL sy-vline
WA_UESLL_STR-/SAPBOQ/CK_QTY sy-vline
WA_UESLL_STR-/SAPBOQ/M_FRATE sy-vline
WA_UESLL_STR-EXTREFKEY sy-vline
WA_UESLL_STR-INV_MENGE sy-vline
WA_UESLL_STR-_DATAAGING sy-vline
WA_UESLL_STR-PER_SDATE sy-vline
WA_UESLL_STR-PER_EDATE sy-vline
WA_UESLL_STR-KZ sy-vline
WA_UESLL_STR-ESLLWAERS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.