ABAP Select data from SAP table COUTREQITEM 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 COUTREQITEM 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 COUTREQITEM. 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 COUTREQITEM 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_COUTREQITEM TYPE STANDARD TABLE OF COUTREQITEM,
      WA_COUTREQITEM TYPE COUTREQITEM,
      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: <COUTREQITEM> TYPE COUTREQITEM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM COUTREQITEM
*  INTO TABLE @DATA(IT_COUTREQITEM2).
*--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_COUTREQITEM INDEX 1 INTO DATA(WA_COUTREQITEM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<COUTREQITEM>-MANDT = 1.
<COUTREQITEM>-OUTPUTREQUESTITEM = 1.
<COUTREQITEM>-OUTPUTCONTROLAPPLOBJECTTYPE = 1.
<COUTREQITEM>-OUTPUTCONTROLAPPLICATIONOBJECT = 1.
<COUTREQITEM>-OUTPUTREQUESTITEMUUID = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_COUTREQITEM-OUTPUTREQUESTITEMSTATUS, sy-vline,
  WA_COUTREQITEM-OUTPUTITEMSTATUSCRITICALITY, sy-vline,
  WA_COUTREQITEM-OUTPUTDOCUMENTTYPE, sy-vline,
  WA_COUTREQITEM-OUTPUTCHANNEL, sy-vline,
  WA_COUTREQITEM-OUTPUTITEMRECEIVERNAME, sy-vline,
  WA_COUTREQITEM-OUTPUTITEMRECIPIENTROLEDESC, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_COUTREQITEM 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_COUTREQITEM 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_COUTREQITEM INTO WA_COUTREQITEM.


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

*Conversion exit ALPHA, internal->external for field RECIPIENT
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_COUTREQITEM-RECIPIENT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_COUTREQITEM-RECIPIENT.
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_COUTREQITEM_STR, 
MANDT TYPE STRING,
OUTPUTREQUESTITEM TYPE STRING,
OUTPUTCONTROLAPPLOBJECTTYPE TYPE STRING,
OUTPUTCONTROLAPPLICATIONOBJECT TYPE STRING,
OUTPUTREQUESTITEMUUID TYPE STRING,
OUTPUTREQUESTITEMSTATUS TYPE STRING,
OUTPUTITEMSTATUSCRITICALITY TYPE STRING,
OUTPUTDOCUMENTTYPE TYPE STRING,
OUTPUTCHANNEL TYPE STRING,
OUTPUTITEMRECEIVERNAME TYPE STRING,
OUTPUTITEMRECIPIENTROLEDESC TYPE STRING,
DISPATCHTIME TYPE STRING,
LASTCHANGEDATETIME TYPE STRING,
PRINTQUEUE TYPE STRING,
RECIPIENT TYPE STRING,
RECIPIENTROLE TYPE STRING,
FORMTEMPLATE TYPE STRING,
FORMTEMPLATETYPE TYPE STRING,
FORMTEMPLATEDESCRIPTION TYPE STRING,
SENDERORGANIZATIONALCENTER TYPE STRING,
SENDERORGANIZATIONALCENTERDESC TYPE STRING,
SENDERORGANIZATIONALCENTERTYPE TYPE STRING,
SENDERORGANIZATIONALUNIT TYPE STRING,
SENDERORGANIZATIONALUNITDESC TYPE STRING,
SENDERORGANIZATIONALUNITTYPE TYPE STRING,
ISCHANGEDOCUMENT TYPE STRING,
CREATIONDATE TYPE STRING,
OUTPUTITEMISSENDOUTPUT TYPE STRING,
OUTPUTITEMISDUPLICATE TYPE STRING,
OUTPUTITEMISRETRY TYPE STRING,
OUTPUTITEMISSETTOCOMPLETED TYPE STRING,
OUTPUTITEMISDELETABLE TYPE STRING,
ISBUSINESSPURPOSECOMPLETED TYPE STRING,END OF T_EKKO_STR.
DATA: WA_COUTREQITEM_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_COUTREQITEM_STR-MANDT sy-vline 
WA_COUTREQITEM_STR-OUTPUTREQUESTITEM sy-vline 
WA_COUTREQITEM_STR-OUTPUTCONTROLAPPLOBJECTTYPE sy-vline 
WA_COUTREQITEM_STR-OUTPUTCONTROLAPPLICATIONOBJECT sy-vline 
WA_COUTREQITEM_STR-OUTPUTREQUESTITEMUUID sy-vline 
WA_COUTREQITEM_STR-OUTPUTREQUESTITEMSTATUS sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMSTATUSCRITICALITY sy-vline 
WA_COUTREQITEM_STR-OUTPUTDOCUMENTTYPE sy-vline 
WA_COUTREQITEM_STR-OUTPUTCHANNEL sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMRECEIVERNAME sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMRECIPIENTROLEDESC sy-vline 
WA_COUTREQITEM_STR-DISPATCHTIME sy-vline 
WA_COUTREQITEM_STR-LASTCHANGEDATETIME sy-vline 
WA_COUTREQITEM_STR-PRINTQUEUE sy-vline 
WA_COUTREQITEM_STR-RECIPIENT sy-vline 
WA_COUTREQITEM_STR-RECIPIENTROLE sy-vline 
WA_COUTREQITEM_STR-FORMTEMPLATE sy-vline 
WA_COUTREQITEM_STR-FORMTEMPLATETYPE sy-vline 
WA_COUTREQITEM_STR-FORMTEMPLATEDESCRIPTION sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALCENTER sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALCENTERDESC sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALCENTERTYPE sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALUNIT sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALUNITDESC sy-vline 
WA_COUTREQITEM_STR-SENDERORGANIZATIONALUNITTYPE sy-vline 
WA_COUTREQITEM_STR-ISCHANGEDOCUMENT sy-vline 
WA_COUTREQITEM_STR-CREATIONDATE sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMISSENDOUTPUT sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMISDUPLICATE sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMISRETRY sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMISSETTOCOMPLETED sy-vline 
WA_COUTREQITEM_STR-OUTPUTITEMISDELETABLE sy-vline 
WA_COUTREQITEM_STR-ISBUSINESSPURPOSECOMPLETED sy-vline      INTO ld_text SEPARATED BY SPACE.

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