ABAP Select data from SAP table ASQITEM 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 ASQITEM 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 ASQITEM. 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 ASQITEM 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_ASQITEM TYPE STANDARD TABLE OF ASQITEM,
      WA_ASQITEM TYPE ASQITEM,
      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: <ASQITEM> TYPE ASQITEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM ASQITEM
*  INTO TABLE @DATA(IT_ASQITEM2).
*--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_ASQITEM INDEX 1 INTO DATA(WA_ASQITEM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_ASQITEM ASSIGNING <ASQITEM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<ASQITEM>-MANDT = 1.
<ASQITEM>-SALESQUOTATION = 1.
<ASQITEM>-SALESQUOTATIONITEM = 1.
<ASQITEM>-HIGHERLEVELITEM = 1.
<ASQITEM>-SALESQUOTATIONITEMCATEGORY = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ASQITEM-SALESQUOTATIONITEMTEXT, sy-vline,
WA_ASQITEM-PURCHASEORDERBYCUSTOMER, sy-vline,
WA_ASQITEM-MATERIAL, sy-vline,
WA_ASQITEM-MATERIALBYCUSTOMER, sy-vline,
WA_ASQITEM-PRICINGREFERENCEMATERIAL, sy-vline,
WA_ASQITEM-REQUESTEDQUANTITY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ASQITEM 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_ASQITEM 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_ASQITEM INTO WA_ASQITEM. *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 SALESQUOTATION CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ASQITEM-SALESQUOTATION IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-SALESQUOTATION.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATERIAL CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_ASQITEM-MATERIAL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-MATERIAL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field PRICINGREFERENCEMATERIAL CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_ASQITEM-PRICINGREFERENCEMATERIAL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-PRICINGREFERENCEMATERIAL.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ABPSP, internal->external for field WBSELEMENT CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_ASQITEM-WBSELEMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-WBSELEMENT.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AUART, internal->external for field SALESQUOTATIONTYPE CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_ASQITEM-SALESQUOTATIONTYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-SALESQUOTATIONTYPE.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MATN1, internal->external for field CROSSPLANTCONFIGURABLEPRODUCT CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_ASQITEM-CROSSPLANTCONFIGURABLEPRODUCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ASQITEM-CROSSPLANTCONFIGURABLEPRODUCT.
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_ASQITEM_STR,
MANDT TYPE STRING,
SALESQUOTATION TYPE STRING,
SALESQUOTATIONITEM TYPE STRING,
HIGHERLEVELITEM TYPE STRING,
SALESQUOTATIONITEMCATEGORY TYPE STRING,
SALESQUOTATIONITEMTEXT TYPE STRING,
PURCHASEORDERBYCUSTOMER TYPE STRING,
MATERIAL TYPE STRING,
MATERIALBYCUSTOMER TYPE STRING,
PRICINGREFERENCEMATERIAL TYPE STRING,
REQUESTEDQUANTITY TYPE STRING,
REQUESTEDQUANTITYUNIT TYPE STRING,
REQUESTEDQUANTITYSAPUNIT TYPE STRING,
REQUESTEDQUANTITYISOUNIT TYPE STRING,
ITEMORDERPROBABILITYINPERCENT TYPE STRING,
ALTERNATIVETOITEM TYPE STRING,
ITEMGROSSWEIGHT TYPE STRING,
ITEMNETWEIGHT TYPE STRING,
ITEMWEIGHTUNIT TYPE STRING,
ITEMWEIGHTSAPUNIT TYPE STRING,
ITEMWEIGHTISOUNIT TYPE STRING,
ITEMVOLUME TYPE STRING,
ITEMVOLUMEUNIT TYPE STRING,
ITEMVOLUMESAPUNIT TYPE STRING,
ITEMVOLUMEISOUNIT TYPE STRING,
TRANSACTIONCURRENCY TYPE STRING,
NETAMOUNT TYPE STRING,
MATERIALGROUP TYPE STRING,
MATERIALPRICINGGROUP TYPE STRING,
BATCH TYPE STRING,
PLANT TYPE STRING,
INCOTERMSCLASSIFICATION TYPE STRING,
INCOTERMSTRANSFERLOCATION TYPE STRING,
INCOTERMSLOCATION1 TYPE STRING,
INCOTERMSLOCATION2 TYPE STRING,
CUSTOMERPAYMENTTERMS TYPE STRING,
PRODUCTTAXCLASSIFICATION1 TYPE STRING,
PRODUCTTAXCLASSIFICATION2 TYPE STRING,
PRODUCTTAXCLASSIFICATION3 TYPE STRING,
PRODUCTTAXCLASSIFICATION4 TYPE STRING,
PRODUCTTAXCLASSIFICATION5 TYPE STRING,
PRODUCTTAXCLASSIFICATION6 TYPE STRING,
PRODUCTTAXCLASSIFICATION7 TYPE STRING,
PRODUCTTAXCLASSIFICATION8 TYPE STRING,
PRODUCTTAXCLASSIFICATION9 TYPE STRING,
SALESDOCUMENTRJCNREASON TYPE STRING,
WBSELEMENT TYPE STRING,
PROFITCENTER TYPE STRING,
REFERENCESDDOCUMENT TYPE STRING,
REFERENCESDDOCUMENTITEM TYPE STRING,
SDPROCESSSTATUS TYPE STRING,
SALESQUOTATIONTYPE TYPE STRING,
ORGANIZATIONDIVISION TYPE STRING,
SALESORGANIZATION TYPE STRING,
DISTRIBUTIONCHANNEL TYPE STRING,
PRODUCTSEASONYEAR TYPE STRING,
PRODUCTSEASON TYPE STRING,
PRODUCTCOLLECTION TYPE STRING,
PRODUCTTHEME TYPE STRING,
SEASONCOMPLETENESSSTATUS TYPE STRING,
FASHIONCANCELDATE TYPE STRING,
PRODUCTCHARACTERISTIC1 TYPE STRING,
PRODUCTCHARACTERISTIC2 TYPE STRING,
PRODUCTCHARACTERISTIC3 TYPE STRING,
SHIPPINGGROUPNUMBER TYPE STRING,
SHIPPINGGROUPRULE TYPE STRING,
CROSSPLANTCONFIGURABLEPRODUCT TYPE STRING,
PRODUCTCATEGORY TYPE STRING,
REQUIREMENTSEGMENT TYPE STRING,END OF T_EKKO_STR. DATA: WA_ASQITEM_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_ASQITEM_STR-MANDT sy-vline
WA_ASQITEM_STR-SALESQUOTATION sy-vline
WA_ASQITEM_STR-SALESQUOTATIONITEM sy-vline
WA_ASQITEM_STR-HIGHERLEVELITEM sy-vline
WA_ASQITEM_STR-SALESQUOTATIONITEMCATEGORY sy-vline
WA_ASQITEM_STR-SALESQUOTATIONITEMTEXT sy-vline
WA_ASQITEM_STR-PURCHASEORDERBYCUSTOMER sy-vline
WA_ASQITEM_STR-MATERIAL sy-vline
WA_ASQITEM_STR-MATERIALBYCUSTOMER sy-vline
WA_ASQITEM_STR-PRICINGREFERENCEMATERIAL sy-vline
WA_ASQITEM_STR-REQUESTEDQUANTITY sy-vline
WA_ASQITEM_STR-REQUESTEDQUANTITYUNIT sy-vline
WA_ASQITEM_STR-REQUESTEDQUANTITYSAPUNIT sy-vline
WA_ASQITEM_STR-REQUESTEDQUANTITYISOUNIT sy-vline
WA_ASQITEM_STR-ITEMORDERPROBABILITYINPERCENT sy-vline
WA_ASQITEM_STR-ALTERNATIVETOITEM sy-vline
WA_ASQITEM_STR-ITEMGROSSWEIGHT sy-vline
WA_ASQITEM_STR-ITEMNETWEIGHT sy-vline
WA_ASQITEM_STR-ITEMWEIGHTUNIT sy-vline
WA_ASQITEM_STR-ITEMWEIGHTSAPUNIT sy-vline
WA_ASQITEM_STR-ITEMWEIGHTISOUNIT sy-vline
WA_ASQITEM_STR-ITEMVOLUME sy-vline
WA_ASQITEM_STR-ITEMVOLUMEUNIT sy-vline
WA_ASQITEM_STR-ITEMVOLUMESAPUNIT sy-vline
WA_ASQITEM_STR-ITEMVOLUMEISOUNIT sy-vline
WA_ASQITEM_STR-TRANSACTIONCURRENCY sy-vline
WA_ASQITEM_STR-NETAMOUNT sy-vline
WA_ASQITEM_STR-MATERIALGROUP sy-vline
WA_ASQITEM_STR-MATERIALPRICINGGROUP sy-vline
WA_ASQITEM_STR-BATCH sy-vline
WA_ASQITEM_STR-PLANT sy-vline
WA_ASQITEM_STR-INCOTERMSCLASSIFICATION sy-vline
WA_ASQITEM_STR-INCOTERMSTRANSFERLOCATION sy-vline
WA_ASQITEM_STR-INCOTERMSLOCATION1 sy-vline
WA_ASQITEM_STR-INCOTERMSLOCATION2 sy-vline
WA_ASQITEM_STR-CUSTOMERPAYMENTTERMS sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION1 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION2 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION3 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION4 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION5 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION6 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION7 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION8 sy-vline
WA_ASQITEM_STR-PRODUCTTAXCLASSIFICATION9 sy-vline
WA_ASQITEM_STR-SALESDOCUMENTRJCNREASON sy-vline
WA_ASQITEM_STR-WBSELEMENT sy-vline
WA_ASQITEM_STR-PROFITCENTER sy-vline
WA_ASQITEM_STR-REFERENCESDDOCUMENT sy-vline
WA_ASQITEM_STR-REFERENCESDDOCUMENTITEM sy-vline
WA_ASQITEM_STR-SDPROCESSSTATUS sy-vline
WA_ASQITEM_STR-SALESQUOTATIONTYPE sy-vline
WA_ASQITEM_STR-ORGANIZATIONDIVISION sy-vline
WA_ASQITEM_STR-SALESORGANIZATION sy-vline
WA_ASQITEM_STR-DISTRIBUTIONCHANNEL sy-vline
WA_ASQITEM_STR-PRODUCTSEASONYEAR sy-vline
WA_ASQITEM_STR-PRODUCTSEASON sy-vline
WA_ASQITEM_STR-PRODUCTCOLLECTION sy-vline
WA_ASQITEM_STR-PRODUCTTHEME sy-vline
WA_ASQITEM_STR-SEASONCOMPLETENESSSTATUS sy-vline
WA_ASQITEM_STR-FASHIONCANCELDATE sy-vline
WA_ASQITEM_STR-PRODUCTCHARACTERISTIC1 sy-vline
WA_ASQITEM_STR-PRODUCTCHARACTERISTIC2 sy-vline
WA_ASQITEM_STR-PRODUCTCHARACTERISTIC3 sy-vline
WA_ASQITEM_STR-SHIPPINGGROUPNUMBER sy-vline
WA_ASQITEM_STR-SHIPPINGGROUPRULE sy-vline
WA_ASQITEM_STR-CROSSPLANTCONFIGURABLEPRODUCT sy-vline
WA_ASQITEM_STR-PRODUCTCATEGORY sy-vline
WA_ASQITEM_STR-REQUIREMENTSEGMENT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.