ABAP Select data from SAP table CPURORDLIMITMTP into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP CPURORDLIMITMTP 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 CPURORDLIMITMTP. 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 CPURORDLIMITMTP 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_CPURORDLIMITMTP TYPE STANDARD TABLE OF CPURORDLIMITMTP,
      WA_CPURORDLIMITMTP TYPE CPURORDLIMITMTP,
      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: <CPURORDLIMITMTP> TYPE CPURORDLIMITMTP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CPURORDLIMITMTP
*  INTO TABLE @DATA(IT_CPURORDLIMITMTP2).
*--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_CPURORDLIMITMTP INDEX 1 INTO DATA(WA_CPURORDLIMITMTP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CPURORDLIMITMTP ASSIGNING <CPURORDLIMITMTP>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CPURORDLIMITMTP>-MANDT = 1.
<CPURORDLIMITMTP>-PURCHASEORDER = 1.
<CPURORDLIMITMTP>-PURCHASEORDERITEM = 1.
<CPURORDLIMITMTP>-PURCHASEORDERITEMCATEGORY = 1.
<CPURORDLIMITMTP>-PURORDITEMCATEGORYNAME = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CPURORDLIMITMTP-PURCHASEORDERITEMTEXT, sy-vline,
  WA_CPURORDLIMITMTP-EXPECTEDOVERALLLIMITAMOUNT, sy-vline,
  WA_CPURORDLIMITMTP-OVERALLLIMITAMOUNT, sy-vline,
  WA_CPURORDLIMITMTP-PURCHASINGDOCUMENTDELETIONCODE, sy-vline,
  WA_CPURORDLIMITMTP-PURCHASEORDERITEMSTATUS_H, sy-vline,
  WA_CPURORDLIMITMTP-PURCHASEORDERITEMSTATUS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CPURORDLIMITMTP 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_CPURORDLIMITMTP 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_CPURORDLIMITMTP INTO WA_CPURORDLIMITMTP.


*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 PURCHASEORDER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_CPURORDLIMITMTP-PURCHASEORDER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CPURORDLIMITMTP-PURCHASEORDER.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit EAN11, internal->external for field INTERNATIONALARTICLENUMBER
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_CPURORDLIMITMTP-INTERNATIONALARTICLENUMBER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CPURORDLIMITMTP-INTERNATIONALARTICLENUMBER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field BASEUNIT
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_CPURORDLIMITMTP-BASEUNIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CPURORDLIMITMTP-BASEUNIT.
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_CPURORDLIMITMTP_STR, 
MANDT TYPE STRING,
PURCHASEORDER TYPE STRING,
PURCHASEORDERITEM TYPE STRING,
PURCHASEORDERITEMCATEGORY TYPE STRING,
PURORDITEMCATEGORYNAME TYPE STRING,
PURCHASEORDERITEMTEXT TYPE STRING,
EXPECTEDOVERALLLIMITAMOUNT TYPE STRING,
OVERALLLIMITAMOUNT TYPE STRING,
PURCHASINGDOCUMENTDELETIONCODE TYPE STRING,
PURCHASEORDERITEMSTATUS_H TYPE STRING,
PURCHASEORDERITEMSTATUS TYPE STRING,
PURCHASEORDERITEMSTATUSNAME TYPE STRING,
DOCUMENTCURRENCY TYPE STRING,
MATERIALGROUP TYPE STRING,
PLANT TYPE STRING,
PRODUCTTYPE TYPE STRING,
PRODUCTTYPENAME TYPE STRING,
GOODSRECEIPTISEXPECTED TYPE STRING,
GOODSRECEIPTISNONVALUATED TYPE STRING,
INVOICEISEXPECTED TYPE STRING,
INVOICEISGOODSRECEIPTBASED TYPE STRING,
ISCOMPLETELYDELIVERED TYPE STRING,
ISFINALLYINVOICED TYPE STRING,
ACCOUNTASSIGNMENTCATEGORY TYPE STRING,
ACCOUNTASSIGNMENTISADDABLELMT TYPE STRING,
PURGSCHDLNISADDABLEINLIMITITEM TYPE STRING,
HIGHESTMESSAGESEVERITYLEVEL TYPE STRING,
TAXCODE TYPE STRING,
TAXJURISDICTION TYPE STRING,
PURCONTRACTFOROVERALLLIMIT TYPE STRING,
PURCHASINGORGANIZATION TYPE STRING,
SUPPLIER TYPE STRING,
TAXCALCULATIONPROCEDURE TYPE STRING,
SUPPLIERMATERIALNUMBER TYPE STRING,
MANUFACTURERPARTNMBR TYPE STRING,
MANUFACTURERMATERIAL TYPE STRING,
COMPANYCODE TYPE STRING,
ORDERITEMQTYTOBASEQTYNMRTR TYPE STRING,
ORDERITEMQTYTOBASEQTYDNMNTR TYPE STRING,
EVALDRCPTSETTLMTISALLOWED TYPE STRING,
ITEMVOLUMEUNIT TYPE STRING,
ITEMWEIGHTUNIT TYPE STRING,
MULTIPLEACCTASSGMTDISTRIBUTION TYPE STRING,
PARTIALINVOICEDISTRIBUTION TYPE STRING,
PRICINGDATECONTROL TYPE STRING,
ISSTATISTICALITEM TYPE STRING,
ISRETURNSITEM TYPE STRING,
INTERNATIONALARTICLENUMBER TYPE STRING,
SUPPLIERCONFIRMATIONCONTROLKEY TYPE STRING,
PRICEISTOBEPRINTED TYPE STRING,
EFFECTIVEAMOUNT TYPE STRING,
ORDERPRICEUNITTOORDERUNITNMRTR TYPE STRING,
ORDPRICEUNITTOORDERUNITDNMNTR TYPE STRING,
BASEUNIT TYPE STRING,
REQUISITIONERNAME TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CPURORDLIMITMTP_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_CPURORDLIMITMTP_STR-MANDT sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDER sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEM sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEMCATEGORY sy-vline 
WA_CPURORDLIMITMTP_STR-PURORDITEMCATEGORYNAME sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEMTEXT sy-vline 
WA_CPURORDLIMITMTP_STR-EXPECTEDOVERALLLIMITAMOUNT sy-vline 
WA_CPURORDLIMITMTP_STR-OVERALLLIMITAMOUNT sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASINGDOCUMENTDELETIONCODE sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEMSTATUS_H sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEMSTATUS sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASEORDERITEMSTATUSNAME sy-vline 
WA_CPURORDLIMITMTP_STR-DOCUMENTCURRENCY sy-vline 
WA_CPURORDLIMITMTP_STR-MATERIALGROUP sy-vline 
WA_CPURORDLIMITMTP_STR-PLANT sy-vline 
WA_CPURORDLIMITMTP_STR-PRODUCTTYPE sy-vline 
WA_CPURORDLIMITMTP_STR-PRODUCTTYPENAME sy-vline 
WA_CPURORDLIMITMTP_STR-GOODSRECEIPTISEXPECTED sy-vline 
WA_CPURORDLIMITMTP_STR-GOODSRECEIPTISNONVALUATED sy-vline 
WA_CPURORDLIMITMTP_STR-INVOICEISEXPECTED sy-vline 
WA_CPURORDLIMITMTP_STR-INVOICEISGOODSRECEIPTBASED sy-vline 
WA_CPURORDLIMITMTP_STR-ISCOMPLETELYDELIVERED sy-vline 
WA_CPURORDLIMITMTP_STR-ISFINALLYINVOICED sy-vline 
WA_CPURORDLIMITMTP_STR-ACCOUNTASSIGNMENTCATEGORY sy-vline 
WA_CPURORDLIMITMTP_STR-ACCOUNTASSIGNMENTISADDABLELMT sy-vline 
WA_CPURORDLIMITMTP_STR-PURGSCHDLNISADDABLEINLIMITITEM sy-vline 
WA_CPURORDLIMITMTP_STR-HIGHESTMESSAGESEVERITYLEVEL sy-vline 
WA_CPURORDLIMITMTP_STR-TAXCODE sy-vline 
WA_CPURORDLIMITMTP_STR-TAXJURISDICTION sy-vline 
WA_CPURORDLIMITMTP_STR-PURCONTRACTFOROVERALLLIMIT sy-vline 
WA_CPURORDLIMITMTP_STR-PURCHASINGORGANIZATION sy-vline 
WA_CPURORDLIMITMTP_STR-SUPPLIER sy-vline 
WA_CPURORDLIMITMTP_STR-TAXCALCULATIONPROCEDURE sy-vline 
WA_CPURORDLIMITMTP_STR-SUPPLIERMATERIALNUMBER sy-vline 
WA_CPURORDLIMITMTP_STR-MANUFACTURERPARTNMBR sy-vline 
WA_CPURORDLIMITMTP_STR-MANUFACTURERMATERIAL sy-vline 
WA_CPURORDLIMITMTP_STR-COMPANYCODE sy-vline 
WA_CPURORDLIMITMTP_STR-ORDERITEMQTYTOBASEQTYNMRTR sy-vline 
WA_CPURORDLIMITMTP_STR-ORDERITEMQTYTOBASEQTYDNMNTR sy-vline 
WA_CPURORDLIMITMTP_STR-EVALDRCPTSETTLMTISALLOWED sy-vline 
WA_CPURORDLIMITMTP_STR-ITEMVOLUMEUNIT sy-vline 
WA_CPURORDLIMITMTP_STR-ITEMWEIGHTUNIT sy-vline 
WA_CPURORDLIMITMTP_STR-MULTIPLEACCTASSGMTDISTRIBUTION sy-vline 
WA_CPURORDLIMITMTP_STR-PARTIALINVOICEDISTRIBUTION sy-vline 
WA_CPURORDLIMITMTP_STR-PRICINGDATECONTROL sy-vline 
WA_CPURORDLIMITMTP_STR-ISSTATISTICALITEM sy-vline 
WA_CPURORDLIMITMTP_STR-ISRETURNSITEM sy-vline 
WA_CPURORDLIMITMTP_STR-INTERNATIONALARTICLENUMBER sy-vline 
WA_CPURORDLIMITMTP_STR-SUPPLIERCONFIRMATIONCONTROLKEY sy-vline 
WA_CPURORDLIMITMTP_STR-PRICEISTOBEPRINTED sy-vline 
WA_CPURORDLIMITMTP_STR-EFFECTIVEAMOUNT sy-vline 
WA_CPURORDLIMITMTP_STR-ORDERPRICEUNITTOORDERUNITNMRTR sy-vline 
WA_CPURORDLIMITMTP_STR-ORDPRICEUNITTOORDERUNITDNMNTR sy-vline 
WA_CPURORDLIMITMTP_STR-BASEUNIT sy-vline 
WA_CPURORDLIMITMTP_STR-REQUISITIONERNAME sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.