ABAP Select data from SAP table UCF_S_COI_CUS03 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 UCF_S_COI_CUS03 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 UCF_S_COI_CUS03. 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 UCF_S_COI_CUS03 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_UCF_S_COI_CUS03 TYPE STANDARD TABLE OF UCF_S_COI_CUS03,
      WA_UCF_S_COI_CUS03 TYPE UCF_S_COI_CUS03,
      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: <UCF_S_COI_CUS03> TYPE UCF_S_COI_CUS03.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM UCF_S_COI_CUS03
*  INTO TABLE @DATA(IT_UCF_S_COI_CUS032).
*--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_UCF_S_COI_CUS03 INDEX 1 INTO DATA(WA_UCF_S_COI_CUS032).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<UCF_S_COI_CUS03>-GWGCKEY = 1.
<UCF_S_COI_CUS03>-GWAYR = 1.
<UCF_S_COI_CUS03>-GWAPE = 1.
<UCF_S_COI_CUS03>-GWABG = 1.
<UCF_S_COI_CUS03>-GWARFLG = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_UCF_S_COI_CUS03-GWALFLG, sy-vline,
  WA_UCF_S_COI_CUS03-GWALVAL, sy-vline,
  WA_UCF_S_COI_CUS03-GWAMETH, sy-vline,
  WA_UCF_S_COI_CUS03-GWAPCNT, sy-vline,
  WA_UCF_S_COI_CUS03-GWRYR, sy-vline,
  WA_UCF_S_COI_CUS03-GWRPE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_UCF_S_COI_CUS03 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_UCF_S_COI_CUS03 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_UCF_S_COI_CUS03 INTO WA_UCF_S_COI_CUS03.


*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_UCF_S_COI_CUS03_STR, 
GWGCKEY TYPE STRING,
GWAYR TYPE STRING,
GWAPE TYPE STRING,
GWABG TYPE STRING,
GWARFLG TYPE STRING,
GWALFLG TYPE STRING,
GWALVAL TYPE STRING,
GWAMETH TYPE STRING,
GWAPCNT TYPE STRING,
GWRYR TYPE STRING,
GWRPE TYPE STRING,
GWRBG TYPE STRING,
GWRRFLG TYPE STRING,
GWRLFLG TYPE STRING,
GWRLVAL TYPE STRING,
GWRMETH TYPE STRING,
GWRPCNT TYPE STRING,
NGAYR TYPE STRING,
NGAPE TYPE STRING,
NGABG TYPE STRING,
NGARFLG TYPE STRING,
NGALFLG TYPE STRING,
NGALVAL TYPE STRING,
NGAMETH TYPE STRING,
NGAPCNT TYPE STRING,
NGRYR TYPE STRING,
NGRPE TYPE STRING,
NGRBG TYPE STRING,
NGRRFLG TYPE STRING,
NGRLFLG TYPE STRING,
NGRLVAL TYPE STRING,
NGRMETH TYPE STRING,
NGRPCNT TYPE STRING,
GWAACC1 TYPE STRING,
GWAACC1M TYPE STRING,
GWAACC1BG TYPE STRING,
GWAACC1CY TYPE STRING,
GWAACC2 TYPE STRING,
GWAACC2BG TYPE STRING,
GWAACC2CY TYPE STRING,
GWAACC3 TYPE STRING,
GWAACC4 TYPE STRING,
GWAACC5 TYPE STRING,
GWAACC6 TYPE STRING,
GWAACC7 TYPE STRING,
GWDACC1 TYPE STRING,
GWDACC1M TYPE STRING,
GWDACC2 TYPE STRING,
GWDACC3 TYPE STRING,
GWDACC4 TYPE STRING,
GWRACC1 TYPE STRING,
GWRACC1M TYPE STRING,
GWRACC1BG TYPE STRING,
GWRACC1CY TYPE STRING,
GWRACC2 TYPE STRING,
GWRACC3 TYPE STRING,
GWRACC4 TYPE STRING,
GWRACC5 TYPE STRING,
GWRACC6 TYPE STRING,
NGAACC1 TYPE STRING,
NGAACC1M TYPE STRING,
NGAACC1BG TYPE STRING,
NGAACC1CY TYPE STRING,
NGAACC2 TYPE STRING,
NGAACC2BG TYPE STRING,
NGAACC2CY TYPE STRING,
NGAACC3 TYPE STRING,
NGAACC4 TYPE STRING,
NGAACC5 TYPE STRING,
NGAACC6 TYPE STRING,
NGAACC7 TYPE STRING,
NGDACC1 TYPE STRING,
NGDACC1M TYPE STRING,
NGDACC2 TYPE STRING,
NGDACC3 TYPE STRING,
NGDACC4 TYPE STRING,
NGRACC1 TYPE STRING,
NGRACC1M TYPE STRING,
NGRACC1BG TYPE STRING,
NGRACC1CY TYPE STRING,
NGRACC2 TYPE STRING,
NGRACC3 TYPE STRING,
NGRACC4 TYPE STRING,
NGRACC5 TYPE STRING,
NGRACC6 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_UCF_S_COI_CUS03_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_UCF_S_COI_CUS03_STR-GWGCKEY sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAYR sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAPE sy-vline 
WA_UCF_S_COI_CUS03_STR-GWABG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWARFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWALFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWALVAL sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAMETH sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAPCNT sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRYR sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRPE sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRBG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRRFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRLFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRLVAL sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRMETH sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRPCNT sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAYR sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAPE sy-vline 
WA_UCF_S_COI_CUS03_STR-NGABG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGARFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGALFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGALVAL sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAMETH sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAPCNT sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRYR sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRPE sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRBG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRRFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRLFLG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRLVAL sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRMETH sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRPCNT sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC1BG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC1CY sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC2BG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC2CY sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC5 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC6 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWAACC7 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWDACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWDACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-GWDACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWDACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWDACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC1BG sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC1CY sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC5 sy-vline 
WA_UCF_S_COI_CUS03_STR-GWRACC6 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC1BG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC1CY sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC2BG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC2CY sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC5 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC6 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGAACC7 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGDACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGDACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-NGDACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGDACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGDACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC1 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC1M sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC1BG sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC1CY sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC2 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC3 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC4 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC5 sy-vline 
WA_UCF_S_COI_CUS03_STR-NGRACC6 sy-vline      INTO ld_text SEPARATED BY SPACE.

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