ABAP Select data from SAP table CKI_WWO_ML 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 CKI_WWO_ML 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 CKI_WWO_ML. 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 CKI_WWO_ML 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_CKI_WWO_ML TYPE STANDARD TABLE OF CKI_WWO_ML,
      WA_CKI_WWO_ML TYPE CKI_WWO_ML,
      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: <CKI_WWO_ML> TYPE CKI_WWO_ML.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CKI_WWO_ML
*  INTO TABLE @DATA(IT_CKI_WWO_ML2).
*--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_CKI_WWO_ML INDEX 1 INTO DATA(WA_CKI_WWO_ML2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CKI_WWO_ML>-BWKEY_NF = 1.
<CKI_WWO_ML>-NOT_1_1 = 1.
<CKI_WWO_ML>-MANDT = 1.
<CKI_WWO_ML>-BWKEY = 1.
<CKI_WWO_ML>-BUKRS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CKI_WWO_ML-BWMOD, sy-vline,
  WA_CKI_WWO_ML-XBKNG, sy-vline,
  WA_CKI_WWO_ML-MLBWA, sy-vline,
  WA_CKI_WWO_ML-MLBWV, sy-vline,
  WA_CKI_WWO_ML-XVKBW, sy-vline,
  WA_CKI_WWO_ML-ERKLAERKOM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CKI_WWO_ML 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_CKI_WWO_ML 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_CKI_WWO_ML INTO WA_CKI_WWO_ML.


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

*Conversion exit GJAHR, internal->external for field EFREJ
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_CKI_WWO_ML-EFREJ
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CKI_WWO_ML-EFREJ.
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_CKI_WWO_ML_STR, 
BWKEY_NF TYPE STRING,
NOT_1_1 TYPE STRING,
MANDT TYPE STRING,
BWKEY TYPE STRING,
BUKRS TYPE STRING,
BWMOD TYPE STRING,
XBKNG TYPE STRING,
MLBWA TYPE STRING,
MLBWV TYPE STRING,
XVKBW TYPE STRING,
ERKLAERKOM TYPE STRING,
UPROF TYPE STRING,
WBPRO TYPE STRING,
MLAST TYPE STRING,
MLASV TYPE STRING,
BDIFP TYPE STRING,
XLBPD TYPE STRING,
XEWRX TYPE STRING,
X2FDO TYPE STRING,
PRSFR TYPE STRING,
MLCCS TYPE STRING,
XEFRE TYPE STRING,
EFREJ TYPE STRING,
/FMP/PRSFR TYPE STRING,
/FMP/PRFRGR TYPE STRING,
BUKRS_NF TYPE STRING,
BUKRSNAME TYPE STRING,
KTOPL TYPE STRING,
PERIV TYPE STRING,
WAERS TYPE STRING,
KOKRS TYPE STRING,
XWBUK TYPE STRING,
KOKRS_NF TYPE STRING,
WAERS_KO TYPE STRING,
KOKRSNAME TYPE STRING,
MLBWI TYPE STRING,
CURTP TYPE STRING,
KURST TYPE STRING,
CURSR TYPE STRING,
CURDT TYPE STRING,
CURTP2 TYPE STRING,
KURST2 TYPE STRING,
CURSR2 TYPE STRING,
CURDT2 TYPE STRING,
BUKRS_NPW TYPE STRING,
ASCHEMA TYPE STRING,
XEINK TYPE STRING,
COGM_ACTIVE TYPE STRING,
VLFKZ TYPE STRING,
ACACT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CKI_WWO_ML_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_CKI_WWO_ML_STR-BWKEY_NF sy-vline 
WA_CKI_WWO_ML_STR-NOT_1_1 sy-vline 
WA_CKI_WWO_ML_STR-MANDT sy-vline 
WA_CKI_WWO_ML_STR-BWKEY sy-vline 
WA_CKI_WWO_ML_STR-BUKRS sy-vline 
WA_CKI_WWO_ML_STR-BWMOD sy-vline 
WA_CKI_WWO_ML_STR-XBKNG sy-vline 
WA_CKI_WWO_ML_STR-MLBWA sy-vline 
WA_CKI_WWO_ML_STR-MLBWV sy-vline 
WA_CKI_WWO_ML_STR-XVKBW sy-vline 
WA_CKI_WWO_ML_STR-ERKLAERKOM sy-vline 
WA_CKI_WWO_ML_STR-UPROF sy-vline 
WA_CKI_WWO_ML_STR-WBPRO sy-vline 
WA_CKI_WWO_ML_STR-MLAST sy-vline 
WA_CKI_WWO_ML_STR-MLASV sy-vline 
WA_CKI_WWO_ML_STR-BDIFP sy-vline 
WA_CKI_WWO_ML_STR-XLBPD sy-vline 
WA_CKI_WWO_ML_STR-XEWRX sy-vline 
WA_CKI_WWO_ML_STR-X2FDO sy-vline 
WA_CKI_WWO_ML_STR-PRSFR sy-vline 
WA_CKI_WWO_ML_STR-MLCCS sy-vline 
WA_CKI_WWO_ML_STR-XEFRE sy-vline 
WA_CKI_WWO_ML_STR-EFREJ sy-vline 
WA_CKI_WWO_ML_STR-/FMP/PRSFR sy-vline 
WA_CKI_WWO_ML_STR-/FMP/PRFRGR sy-vline 
WA_CKI_WWO_ML_STR-BUKRS_NF sy-vline 
WA_CKI_WWO_ML_STR-BUKRSNAME sy-vline 
WA_CKI_WWO_ML_STR-KTOPL sy-vline 
WA_CKI_WWO_ML_STR-PERIV sy-vline 
WA_CKI_WWO_ML_STR-WAERS sy-vline 
WA_CKI_WWO_ML_STR-KOKRS sy-vline 
WA_CKI_WWO_ML_STR-XWBUK sy-vline 
WA_CKI_WWO_ML_STR-KOKRS_NF sy-vline 
WA_CKI_WWO_ML_STR-WAERS_KO sy-vline 
WA_CKI_WWO_ML_STR-KOKRSNAME sy-vline 
WA_CKI_WWO_ML_STR-MLBWI sy-vline 
WA_CKI_WWO_ML_STR-CURTP sy-vline 
WA_CKI_WWO_ML_STR-KURST sy-vline 
WA_CKI_WWO_ML_STR-CURSR sy-vline 
WA_CKI_WWO_ML_STR-CURDT sy-vline 
WA_CKI_WWO_ML_STR-CURTP2 sy-vline 
WA_CKI_WWO_ML_STR-KURST2 sy-vline 
WA_CKI_WWO_ML_STR-CURSR2 sy-vline 
WA_CKI_WWO_ML_STR-CURDT2 sy-vline 
WA_CKI_WWO_ML_STR-BUKRS_NPW sy-vline 
WA_CKI_WWO_ML_STR-ASCHEMA sy-vline 
WA_CKI_WWO_ML_STR-XEINK sy-vline 
WA_CKI_WWO_ML_STR-COGM_ACTIVE sy-vline 
WA_CKI_WWO_ML_STR-VLFKZ sy-vline 
WA_CKI_WWO_ML_STR-ACACT sy-vline      INTO ld_text SEPARATED BY SPACE.

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