ABAP Select data from SAP table ITORITEME 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 ITORITEME 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 ITORITEME. 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 ITORITEME 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_ITORITEME TYPE STANDARD TABLE OF ITORITEME,
      WA_ITORITEME TYPE ITORITEME,
      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: <ITORITEME> TYPE ITORITEME.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ITORITEME
*  INTO TABLE @DATA(IT_ITORITEME2).
*--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_ITORITEME INDEX 1 INTO DATA(WA_ITORITEME2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ITORITEME ASSIGNING <ITORITEME>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<ITORITEME>-MANDT = 1.
<ITORITEME>-TRANSPORTATIONORDERITEMUUID = 1.
<ITORITEME>-TRANSPORTATIONORDERUUID = 1.
<ITORITEME>-TRANSPORDITEM = 1.
<ITORITEME>-TRANSPORDITEMTYPE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ITORITEME-ISMULTIITEM, sy-vline,
WA_ITORITEME-TRANSPORDITEMPARENTITEMUUID, sy-vline,
WA_ITORITEME-SOURCESTOPUUID, sy-vline,
WA_ITORITEME-DESTINATIONSTOPUUID, sy-vline,
WA_ITORITEME-TRANSPORDITEMDESC, sy-vline,
WA_ITORITEME-TRANSPORDITEMCATEGORY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ITORITEME 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_ITORITEME 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_ITORITEME INTO WA_ITORITEME. *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 TRANSPORDITEM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ITORITEME-TRANSPORDITEM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ITORITEME-TRANSPORDITEM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field TRANSPORDITEMLENGTHUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_ITORITEME-TRANSPORDITEMLENGTHUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ITORITEME-TRANSPORDITEMLENGTHUNIT.
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_ITORITEME_STR,
MANDT TYPE STRING,
TRANSPORTATIONORDERITEMUUID TYPE STRING,
TRANSPORTATIONORDERUUID TYPE STRING,
TRANSPORDITEM TYPE STRING,
TRANSPORDITEMTYPE TYPE STRING,
ISMULTIITEM TYPE STRING,
TRANSPORDITEMPARENTITEMUUID TYPE STRING,
SOURCESTOPUUID TYPE STRING,
DESTINATIONSTOPUUID TYPE STRING,
TRANSPORDITEMDESC TYPE STRING,
TRANSPORDITEMCATEGORY TYPE STRING,
ISMAINCARGOITEM TYPE STRING,
SHIPPER TYPE STRING,
SHIPPERAUTHORIZATIONGROUP TYPE STRING,
SHIPPERBUSPURPOSEISCOMPLETED TYPE STRING,
CONSIGNEE TYPE STRING,
CONSIGNEEAUTHORIZATIONGROUP TYPE STRING,
CONSIGNEEBUSPURPOSEISCOMPLETED TYPE STRING,
TRANSPORTATIONMODE TYPE STRING,
TRANSPORTATIONMODECATEGORY TYPE STRING,
MEANSOFTRANSPORT TYPE STRING,
TRANSPORDITEMGROSSWEIGHT TYPE STRING,
TRANSPORDITEMGROSSWEIGHTUNIT TYPE STRING,
TRANSPORDITEMGROSSVOLUME TYPE STRING,
TRANSPORDITEMGROSSVOLUMEUNIT TYPE STRING,
TRANSPORDITEMNETWEIGHT TYPE STRING,
TRANSPORDITEMNETWEIGHTUNIT TYPE STRING,
TRANSPORDITEMQUANTITY TYPE STRING,
TRANSPORDITEMQUANTITYUNIT TYPE STRING,
TRANSPORDITEMALTVQTY TYPE STRING,
TRANSPORDITEMALTVQTYUNIT TYPE STRING,
TRANSPORDITEMBASEQTY TYPE STRING,
TRANSPORDITEMBASEQTYUNIT TYPE STRING,
TRANSPORDITEMTAREWEIGHT TYPE STRING,
TRANSPORDITEMTAREWEIGHTUNIT TYPE STRING,
TRANSPORDITEMNUMBEROFCTNS TYPE STRING,
TRANSPORDITEMNUMBEROFCTNSUNIT TYPE STRING,
TRANSPORDITEMLENGTH TYPE STRING,
TRANSPORDITEMWIDTH TYPE STRING,
TRANSPORDITEMHEIGHT TYPE STRING,
TRANSPORDITEMLENGTHUNIT TYPE STRING,
TRANSPORDITEMGOODSVALUE TYPE STRING,
TRANSPORDITEMGOODSVALUECRCY TYPE STRING,
TRANSPORDITEMISDANGEROUSGOOD TYPE STRING,END OF T_EKKO_STR. DATA: WA_ITORITEME_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_ITORITEME_STR-MANDT sy-vline
WA_ITORITEME_STR-TRANSPORTATIONORDERITEMUUID sy-vline
WA_ITORITEME_STR-TRANSPORTATIONORDERUUID sy-vline
WA_ITORITEME_STR-TRANSPORDITEM sy-vline
WA_ITORITEME_STR-TRANSPORDITEMTYPE sy-vline
WA_ITORITEME_STR-ISMULTIITEM sy-vline
WA_ITORITEME_STR-TRANSPORDITEMPARENTITEMUUID sy-vline
WA_ITORITEME_STR-SOURCESTOPUUID sy-vline
WA_ITORITEME_STR-DESTINATIONSTOPUUID sy-vline
WA_ITORITEME_STR-TRANSPORDITEMDESC sy-vline
WA_ITORITEME_STR-TRANSPORDITEMCATEGORY sy-vline
WA_ITORITEME_STR-ISMAINCARGOITEM sy-vline
WA_ITORITEME_STR-SHIPPER sy-vline
WA_ITORITEME_STR-SHIPPERAUTHORIZATIONGROUP sy-vline
WA_ITORITEME_STR-SHIPPERBUSPURPOSEISCOMPLETED sy-vline
WA_ITORITEME_STR-CONSIGNEE sy-vline
WA_ITORITEME_STR-CONSIGNEEAUTHORIZATIONGROUP sy-vline
WA_ITORITEME_STR-CONSIGNEEBUSPURPOSEISCOMPLETED sy-vline
WA_ITORITEME_STR-TRANSPORTATIONMODE sy-vline
WA_ITORITEME_STR-TRANSPORTATIONMODECATEGORY sy-vline
WA_ITORITEME_STR-MEANSOFTRANSPORT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGROSSWEIGHT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGROSSWEIGHTUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGROSSVOLUME sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGROSSVOLUMEUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMNETWEIGHT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMNETWEIGHTUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMQUANTITY sy-vline
WA_ITORITEME_STR-TRANSPORDITEMQUANTITYUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMALTVQTY sy-vline
WA_ITORITEME_STR-TRANSPORDITEMALTVQTYUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMBASEQTY sy-vline
WA_ITORITEME_STR-TRANSPORDITEMBASEQTYUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMTAREWEIGHT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMTAREWEIGHTUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMNUMBEROFCTNS sy-vline
WA_ITORITEME_STR-TRANSPORDITEMNUMBEROFCTNSUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMLENGTH sy-vline
WA_ITORITEME_STR-TRANSPORDITEMWIDTH sy-vline
WA_ITORITEME_STR-TRANSPORDITEMHEIGHT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMLENGTHUNIT sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGOODSVALUE sy-vline
WA_ITORITEME_STR-TRANSPORDITEMGOODSVALUECRCY sy-vline
WA_ITORITEME_STR-TRANSPORDITEMISDANGEROUSGOOD sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.