ABAP Select data from SAP table LESHP_00002340 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 LESHP_00002340 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 LESHP_00002340. 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 LESHP_00002340 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_LESHP_00002340 TYPE STANDARD TABLE OF LESHP_00002340,
      WA_LESHP_00002340 TYPE LESHP_00002340,
      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: <LESHP_00002340> TYPE LESHP_00002340.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM LESHP_00002340
*  INTO TABLE @DATA(IT_LESHP_000023402).
*--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_LESHP_00002340 INDEX 1 INTO DATA(WA_LESHP_000023402).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_LESHP_00002340 ASSIGNING <LESHP_00002340>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<LESHP_00002340>-POSNR = 1.
<LESHP_00002340>-MATNR = 1.
<LESHP_00002340>-MATWA = 1.
<LESHP_00002340>-ARKTX = 1.
<LESHP_00002340>-ORKTX = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_LESHP_00002340-SUGRD, sy-vline,
WA_LESHP_00002340-SUDRU, sy-vline,
WA_LESHP_00002340-MATKL, sy-vline,
WA_LESHP_00002340-WERKS, sy-vline,
WA_LESHP_00002340-LGORT, sy-vline,
WA_LESHP_00002340-CHARG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_LESHP_00002340 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_LESHP_00002340 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_LESHP_00002340 INTO WA_LESHP_00002340. *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_LESHP_00002340_STR,
POSNR TYPE STRING,
MATNR TYPE STRING,
MATWA TYPE STRING,
ARKTX TYPE STRING,
ORKTX TYPE STRING,
SUGRD TYPE STRING,
SUDRU TYPE STRING,
MATKL TYPE STRING,
WERKS TYPE STRING,
LGORT TYPE STRING,
CHARG TYPE STRING,
KDMAT TYPE STRING,
LFIMG TYPE STRING,
VRKME TYPE STRING,
LGMNG TYPE STRING,
MEINS TYPE STRING,
NTGEW TYPE STRING,
BRGEW TYPE STRING,
GEWEI TYPE STRING,
VOLUM TYPE STRING,
VOLEH TYPE STRING,
LGPBE TYPE STRING,
HIPOS TYPE STRING,
HIEVW TYPE STRING,
LADGR TYPE STRING,
TRAGR TYPE STRING,
VKBUR TYPE STRING,
VKGRP TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
GRKOR TYPE STRING,
EAN11 TYPE STRING,
SERNR TYPE STRING,
AESKD TYPE STRING,
EMPST TYPE STRING,
MFRGR TYPE STRING,
VBRST TYPE STRING,
LABNK TYPE STRING,
ABRDT TYPE STRING,
MFRPN TYPE STRING,
MFRNR TYPE STRING,
ABRVW TYPE STRING,
KDMAT35 TYPE STRING,
KANNR TYPE STRING,
POSEX TYPE STRING,
LIEFFZ TYPE STRING,
USR01 TYPE STRING,
USR02 TYPE STRING,
USR03 TYPE STRING,
USR04 TYPE STRING,
USR05 TYPE STRING,
MATNR_EXTERNAL TYPE STRING,
MATNR_VERSION TYPE STRING,
MATNR_GUID TYPE STRING,
MATWA_EXTERNAL TYPE STRING,
MATWA_VERSION TYPE STRING,
MATWA_GUID TYPE STRING,
ZUDAT TYPE STRING,
VFDAT TYPE STRING,
RMA_NUMBER TYPE STRING,
RMA_COMPLETE TYPE STRING,
EXPIRY_DATE_EXT TYPE STRING,
VGBEL TYPE STRING,
VGPOS TYPE STRING,
FOLLOW_UP_CODE TYPE STRING,
ORMNG TYPE STRING,
COMPL TYPE STRING,
HOLD TYPE STRING,
MAX_ERR_TYPE TYPE STRING,
LICHN TYPE STRING,
RECIPIENT_CREATE TYPE STRING,
EXPIRY_DATE_EXT_B TYPE STRING,
E1EDL56 TYPE STRING,
E1EDL24RET2 TYPE STRING,
E1EDL25 TYPE STRING,
LGORT_BEZ TYPE STRING,
LADGR_BEZ TYPE STRING,
TRAGR_BEZ TYPE STRING,
VKBUR_BEZ TYPE STRING,
VKGRP_BEZ TYPE STRING,
VTWEG_BEZ TYPE STRING,
SPART_BEZ TYPE STRING,
MFRGR_BEZ TYPE STRING,
E1EDL26 TYPE STRING,
PSTYV TYPE STRING,
MATKL TYPE STRING,
PRODH TYPE STRING,
UMVKZ TYPE STRING,
UMVKN TYPE STRING,
KZTLF TYPE STRING,
UEBTK TYPE STRING,
UEBTO TYPE STRING,
UNTTO TYPE STRING,
CHSPL TYPE STRING,
XCHBW TYPE STRING,
POSAR TYPE STRING,
SOBKZ TYPE STRING,
PCKPF TYPE STRING,
MAGRV TYPE STRING,
SHKZG TYPE STRING,
KOQUI TYPE STRING,
AKTNR TYPE STRING,
KZUMW TYPE STRING,
KVGR1 TYPE STRING,
KVGR2 TYPE STRING,
KVGR3 TYPE STRING,
KVGR4 TYPE STRING,
KVGR5 TYPE STRING,
MVGR1 TYPE STRING,
MVGR2 TYPE STRING,
MVGR3 TYPE STRING,
MVGR4 TYPE STRING,
MVGR5 TYPE STRING,
LIFEXPOS2 TYPE STRING,
CQU_SA TYPE STRING,
CQU_SA_UNIT TYPE STRING,
CQU_ITQS TYPE STRING,
CQU_ITQS_UNIT TYPE STRING,
VBUMG_BME TYPE STRING,
SGT_RCAT TYPE STRING,
SGT_SCAT TYPE STRING,
MATNR_LONG TYPE STRING,
MATWA_LONG TYPE STRING,
REQ_SEG_LONG TYPE STRING,
STK_SEG_LONG TYPE STRING,
E1EDL27 TYPE STRING,
PSTYV_BEZ TYPE STRING,
MATKL_BEZ TYPE STRING,
PRODH_BEZ TYPE STRING,
WERKS_BEZ TYPE STRING,
KVGR1_BEZ TYPE STRING,
KVGR2_BEZ TYPE STRING,
KVGR3_BEZ TYPE STRING,
KVGR4_BEZ TYPE STRING,
KVGR5_BEZ TYPE STRING,
MVGR1_BEZ TYPE STRING,
MVGR2_BEZ TYPE STRING,
MVGR3_BEZ TYPE STRING,
MVGR4_BEZ TYPE STRING,
MVGR5_BEZ TYPE STRING,
E1EDL52 TYPE STRING,
E1EDL53 TYPE STRING,
E1EDD10 TYPE STRING,
E1EDD14 TYPE STRING,
DGARAND TYPE STRING,
DGPULIM TYPE STRING,
DGPAS TYPE STRING,
DGREPQU TYPE STRING,
DGEXCQU TYPE STRING,
DGSUP_TRANSIND01 TYPE STRING,
DGSUP_TRANSIND02 TYPE STRING,
DGSUP_TRANSIND03 TYPE STRING,
DGSUP_TRANSIND04 TYPE STRING,
DGSUP_TRANSIND05 TYPE STRING,
DGSUP_TRANSIND06 TYPE STRING,
DGSUP_TRANSIND07 TYPE STRING,
DGSUP_TRANSIND08 TYPE STRING,
E1EDL19 TYPE STRING,
E1EDL11 TYPE STRING,
E1EPC01 TYPE STRING,
E1EDL15 TYPE STRING,
E1EDL35 TYPE STRING,
STAWN TYPE STRING,
EXPRF TYPE STRING,
EXART TYPE STRING,
HERKL TYPE STRING,
HERKR TYPE STRING,
GRWRT TYPE STRING,
PREFE TYPE STRING,
E1EDL36 TYPE STRING,
STXT1 TYPE STRING,
STXT2 TYPE STRING,
STXT3 TYPE STRING,
STXT4 TYPE STRING,
STXT5 TYPE STRING,
STXT6 TYPE STRING,
STXT7 TYPE STRING,
EXPRF_BEZ TYPE STRING,
EXART_BEZ TYPE STRING,
HERKL_BEZ TYPE STRING,
HERKR_BEZ TYPE STRING,
E1EDL43 TYPE STRING,
E1EDL41 TYPE STRING,
E1TXTH9 TYPE STRING,
E1EDL12 TYPE STRING,
E1EDL58 TYPE STRING,END OF T_EKKO_STR. DATA: WA_LESHP_00002340_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_LESHP_00002340_STR-POSNR sy-vline
WA_LESHP_00002340_STR-MATNR sy-vline
WA_LESHP_00002340_STR-MATWA sy-vline
WA_LESHP_00002340_STR-ARKTX sy-vline
WA_LESHP_00002340_STR-ORKTX sy-vline
WA_LESHP_00002340_STR-SUGRD sy-vline
WA_LESHP_00002340_STR-SUDRU sy-vline
WA_LESHP_00002340_STR-MATKL sy-vline
WA_LESHP_00002340_STR-WERKS sy-vline
WA_LESHP_00002340_STR-LGORT sy-vline
WA_LESHP_00002340_STR-CHARG sy-vline
WA_LESHP_00002340_STR-KDMAT sy-vline
WA_LESHP_00002340_STR-LFIMG sy-vline
WA_LESHP_00002340_STR-VRKME sy-vline
WA_LESHP_00002340_STR-LGMNG sy-vline
WA_LESHP_00002340_STR-MEINS sy-vline
WA_LESHP_00002340_STR-NTGEW sy-vline
WA_LESHP_00002340_STR-BRGEW sy-vline
WA_LESHP_00002340_STR-GEWEI sy-vline
WA_LESHP_00002340_STR-VOLUM sy-vline
WA_LESHP_00002340_STR-VOLEH sy-vline
WA_LESHP_00002340_STR-LGPBE sy-vline
WA_LESHP_00002340_STR-HIPOS sy-vline
WA_LESHP_00002340_STR-HIEVW sy-vline
WA_LESHP_00002340_STR-LADGR sy-vline
WA_LESHP_00002340_STR-TRAGR sy-vline
WA_LESHP_00002340_STR-VKBUR sy-vline
WA_LESHP_00002340_STR-VKGRP sy-vline
WA_LESHP_00002340_STR-VTWEG sy-vline
WA_LESHP_00002340_STR-SPART sy-vline
WA_LESHP_00002340_STR-GRKOR sy-vline
WA_LESHP_00002340_STR-EAN11 sy-vline
WA_LESHP_00002340_STR-SERNR sy-vline
WA_LESHP_00002340_STR-AESKD sy-vline
WA_LESHP_00002340_STR-EMPST sy-vline
WA_LESHP_00002340_STR-MFRGR sy-vline
WA_LESHP_00002340_STR-VBRST sy-vline
WA_LESHP_00002340_STR-LABNK sy-vline
WA_LESHP_00002340_STR-ABRDT sy-vline
WA_LESHP_00002340_STR-MFRPN sy-vline
WA_LESHP_00002340_STR-MFRNR sy-vline
WA_LESHP_00002340_STR-ABRVW sy-vline
WA_LESHP_00002340_STR-KDMAT35 sy-vline
WA_LESHP_00002340_STR-KANNR sy-vline
WA_LESHP_00002340_STR-POSEX sy-vline
WA_LESHP_00002340_STR-LIEFFZ sy-vline
WA_LESHP_00002340_STR-USR01 sy-vline
WA_LESHP_00002340_STR-USR02 sy-vline
WA_LESHP_00002340_STR-USR03 sy-vline
WA_LESHP_00002340_STR-USR04 sy-vline
WA_LESHP_00002340_STR-USR05 sy-vline
WA_LESHP_00002340_STR-MATNR_EXTERNAL sy-vline
WA_LESHP_00002340_STR-MATNR_VERSION sy-vline
WA_LESHP_00002340_STR-MATNR_GUID sy-vline
WA_LESHP_00002340_STR-MATWA_EXTERNAL sy-vline
WA_LESHP_00002340_STR-MATWA_VERSION sy-vline
WA_LESHP_00002340_STR-MATWA_GUID sy-vline
WA_LESHP_00002340_STR-ZUDAT sy-vline
WA_LESHP_00002340_STR-VFDAT sy-vline
WA_LESHP_00002340_STR-RMA_NUMBER sy-vline
WA_LESHP_00002340_STR-RMA_COMPLETE sy-vline
WA_LESHP_00002340_STR-EXPIRY_DATE_EXT sy-vline
WA_LESHP_00002340_STR-VGBEL sy-vline
WA_LESHP_00002340_STR-VGPOS sy-vline
WA_LESHP_00002340_STR-FOLLOW_UP_CODE sy-vline
WA_LESHP_00002340_STR-ORMNG sy-vline
WA_LESHP_00002340_STR-COMPL sy-vline
WA_LESHP_00002340_STR-HOLD sy-vline
WA_LESHP_00002340_STR-MAX_ERR_TYPE sy-vline
WA_LESHP_00002340_STR-LICHN sy-vline
WA_LESHP_00002340_STR-RECIPIENT_CREATE sy-vline
WA_LESHP_00002340_STR-EXPIRY_DATE_EXT_B sy-vline
WA_LESHP_00002340_STR-E1EDL56 sy-vline
WA_LESHP_00002340_STR-E1EDL24RET2 sy-vline
WA_LESHP_00002340_STR-E1EDL25 sy-vline
WA_LESHP_00002340_STR-LGORT_BEZ sy-vline
WA_LESHP_00002340_STR-LADGR_BEZ sy-vline
WA_LESHP_00002340_STR-TRAGR_BEZ sy-vline
WA_LESHP_00002340_STR-VKBUR_BEZ sy-vline
WA_LESHP_00002340_STR-VKGRP_BEZ sy-vline
WA_LESHP_00002340_STR-VTWEG_BEZ sy-vline
WA_LESHP_00002340_STR-SPART_BEZ sy-vline
WA_LESHP_00002340_STR-MFRGR_BEZ sy-vline
WA_LESHP_00002340_STR-E1EDL26 sy-vline
WA_LESHP_00002340_STR-PSTYV sy-vline
WA_LESHP_00002340_STR-MATKL sy-vline
WA_LESHP_00002340_STR-PRODH sy-vline
WA_LESHP_00002340_STR-UMVKZ sy-vline
WA_LESHP_00002340_STR-UMVKN sy-vline
WA_LESHP_00002340_STR-KZTLF sy-vline
WA_LESHP_00002340_STR-UEBTK sy-vline
WA_LESHP_00002340_STR-UEBTO sy-vline
WA_LESHP_00002340_STR-UNTTO sy-vline
WA_LESHP_00002340_STR-CHSPL sy-vline
WA_LESHP_00002340_STR-XCHBW sy-vline
WA_LESHP_00002340_STR-POSAR sy-vline
WA_LESHP_00002340_STR-SOBKZ sy-vline
WA_LESHP_00002340_STR-PCKPF sy-vline
WA_LESHP_00002340_STR-MAGRV sy-vline
WA_LESHP_00002340_STR-SHKZG sy-vline
WA_LESHP_00002340_STR-KOQUI sy-vline
WA_LESHP_00002340_STR-AKTNR sy-vline
WA_LESHP_00002340_STR-KZUMW sy-vline
WA_LESHP_00002340_STR-KVGR1 sy-vline
WA_LESHP_00002340_STR-KVGR2 sy-vline
WA_LESHP_00002340_STR-KVGR3 sy-vline
WA_LESHP_00002340_STR-KVGR4 sy-vline
WA_LESHP_00002340_STR-KVGR5 sy-vline
WA_LESHP_00002340_STR-MVGR1 sy-vline
WA_LESHP_00002340_STR-MVGR2 sy-vline
WA_LESHP_00002340_STR-MVGR3 sy-vline
WA_LESHP_00002340_STR-MVGR4 sy-vline
WA_LESHP_00002340_STR-MVGR5 sy-vline
WA_LESHP_00002340_STR-LIFEXPOS2 sy-vline
WA_LESHP_00002340_STR-CQU_SA sy-vline
WA_LESHP_00002340_STR-CQU_SA_UNIT sy-vline
WA_LESHP_00002340_STR-CQU_ITQS sy-vline
WA_LESHP_00002340_STR-CQU_ITQS_UNIT sy-vline
WA_LESHP_00002340_STR-VBUMG_BME sy-vline
WA_LESHP_00002340_STR-SGT_RCAT sy-vline
WA_LESHP_00002340_STR-SGT_SCAT sy-vline
WA_LESHP_00002340_STR-MATNR_LONG sy-vline
WA_LESHP_00002340_STR-MATWA_LONG sy-vline
WA_LESHP_00002340_STR-REQ_SEG_LONG sy-vline
WA_LESHP_00002340_STR-STK_SEG_LONG sy-vline
WA_LESHP_00002340_STR-E1EDL27 sy-vline
WA_LESHP_00002340_STR-PSTYV_BEZ sy-vline
WA_LESHP_00002340_STR-MATKL_BEZ sy-vline
WA_LESHP_00002340_STR-PRODH_BEZ sy-vline
WA_LESHP_00002340_STR-WERKS_BEZ sy-vline
WA_LESHP_00002340_STR-KVGR1_BEZ sy-vline
WA_LESHP_00002340_STR-KVGR2_BEZ sy-vline
WA_LESHP_00002340_STR-KVGR3_BEZ sy-vline
WA_LESHP_00002340_STR-KVGR4_BEZ sy-vline
WA_LESHP_00002340_STR-KVGR5_BEZ sy-vline
WA_LESHP_00002340_STR-MVGR1_BEZ sy-vline
WA_LESHP_00002340_STR-MVGR2_BEZ sy-vline
WA_LESHP_00002340_STR-MVGR3_BEZ sy-vline
WA_LESHP_00002340_STR-MVGR4_BEZ sy-vline
WA_LESHP_00002340_STR-MVGR5_BEZ sy-vline
WA_LESHP_00002340_STR-E1EDL52 sy-vline
WA_LESHP_00002340_STR-E1EDL53 sy-vline
WA_LESHP_00002340_STR-E1EDD10 sy-vline
WA_LESHP_00002340_STR-E1EDD14 sy-vline
WA_LESHP_00002340_STR-DGARAND sy-vline
WA_LESHP_00002340_STR-DGPULIM sy-vline
WA_LESHP_00002340_STR-DGPAS sy-vline
WA_LESHP_00002340_STR-DGREPQU sy-vline
WA_LESHP_00002340_STR-DGEXCQU sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND01 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND02 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND03 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND04 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND05 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND06 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND07 sy-vline
WA_LESHP_00002340_STR-DGSUP_TRANSIND08 sy-vline
WA_LESHP_00002340_STR-E1EDL19 sy-vline
WA_LESHP_00002340_STR-E1EDL11 sy-vline
WA_LESHP_00002340_STR-E1EPC01 sy-vline
WA_LESHP_00002340_STR-E1EDL15 sy-vline
WA_LESHP_00002340_STR-E1EDL35 sy-vline
WA_LESHP_00002340_STR-STAWN sy-vline
WA_LESHP_00002340_STR-EXPRF sy-vline
WA_LESHP_00002340_STR-EXART sy-vline
WA_LESHP_00002340_STR-HERKL sy-vline
WA_LESHP_00002340_STR-HERKR sy-vline
WA_LESHP_00002340_STR-GRWRT sy-vline
WA_LESHP_00002340_STR-PREFE sy-vline
WA_LESHP_00002340_STR-E1EDL36 sy-vline
WA_LESHP_00002340_STR-STXT1 sy-vline
WA_LESHP_00002340_STR-STXT2 sy-vline
WA_LESHP_00002340_STR-STXT3 sy-vline
WA_LESHP_00002340_STR-STXT4 sy-vline
WA_LESHP_00002340_STR-STXT5 sy-vline
WA_LESHP_00002340_STR-STXT6 sy-vline
WA_LESHP_00002340_STR-STXT7 sy-vline
WA_LESHP_00002340_STR-EXPRF_BEZ sy-vline
WA_LESHP_00002340_STR-EXART_BEZ sy-vline
WA_LESHP_00002340_STR-HERKL_BEZ sy-vline
WA_LESHP_00002340_STR-HERKR_BEZ sy-vline
WA_LESHP_00002340_STR-E1EDL43 sy-vline
WA_LESHP_00002340_STR-E1EDL41 sy-vline
WA_LESHP_00002340_STR-E1TXTH9 sy-vline
WA_LESHP_00002340_STR-E1EDL12 sy-vline
WA_LESHP_00002340_STR-E1EDL58 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.