ABAP Select data from SAP table CSKBOMEXPL 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 CSKBOMEXPL 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 CSKBOMEXPL. 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 CSKBOMEXPL 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_CSKBOMEXPL TYPE STANDARD TABLE OF CSKBOMEXPL,
      WA_CSKBOMEXPL TYPE CSKBOMEXPL,
      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: <CSKBOMEXPL> TYPE CSKBOMEXPL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CSKBOMEXPL
*  INTO TABLE @DATA(IT_CSKBOMEXPL2).
*--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_CSKBOMEXPL INDEX 1 INTO DATA(WA_CSKBOMEXPL2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<CSKBOMEXPL>-FTREL = 1.
<CSKBOMEXPL>-ALEKZ = 1.
<CSKBOMEXPL>-ALTVO = 1.
<CSKBOMEXPL>-AUFSW = 1.
<CSKBOMEXPL>-AUMGB = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CSKBOMEXPL-AUMNG, sy-vline,
  WA_CSKBOMEXPL-AUSKZ, sy-vline,
  WA_CSKBOMEXPL-AMIND, sy-vline,
  WA_CSKBOMEXPL-BAGRP, sy-vline,
  WA_CSKBOMEXPL-BEIKZ, sy-vline,
  WA_CSKBOMEXPL-BESSL, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_CSKBOMEXPL 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_CSKBOMEXPL 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_CSKBOMEXPL INTO WA_CSKBOMEXPL.


*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 MATN1, internal->external for field BAGRP
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_CSKBOMEXPL-BAGRP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CSKBOMEXPL-BAGRP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field CUOVS
CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT'
  EXPORTING
    input =                      WA_CSKBOMEXPL-CUOVS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CSKBOMEXPL-CUOVS.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field VBELN
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_CSKBOMEXPL-VBELN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_CSKBOMEXPL-VBELN.
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_CSKBOMEXPL_STR, 
FTREL TYPE STRING,
ALEKZ TYPE STRING,
ALTVO TYPE STRING,
AUFSW TYPE STRING,
AUMGB TYPE STRING,
AUMNG TYPE STRING,
AUSKZ TYPE STRING,
AMIND TYPE STRING,
BAGRP TYPE STRING,
BEIKZ TYPE STRING,
BESSL TYPE STRING,
BGIXO TYPE STRING,
BREMS TYPE STRING,
CAPID TYPE STRING,
CHLST TYPE STRING,
COSPR TYPE STRING,
CUOBJ TYPE STRING,
CUOVS TYPE STRING,
CUOLS TYPE STRING,
DATUV TYPE STRING,
DELNL TYPE STRING,
DRLDT TYPE STRING,
EHNDL TYPE STRING,
EMENG TYPE STRING,
ERSKZ TYPE STRING,
ERSSL TYPE STRING,
FBSTP TYPE STRING,
KNFBA TYPE STRING,
KSBVO TYPE STRING,
MBWLS TYPE STRING,
MKTLS TYPE STRING,
MDMPS TYPE STRING,
MKMAT TYPE STRING,
MMAPS TYPE STRING,
SALWW TYPE STRING,
SPLWW TYPE STRING,
MMORY TYPE STRING,
MTNRV TYPE STRING,
NLINK TYPE STRING,
POSTP TYPE STRING,
RNDKZ TYPE STRING,
RVREL TYPE STRING,
SANFR TYPE STRING,
SANIN TYPE STRING,
SANKA TYPE STRING,
SANKO TYPE STRING,
SANVS TYPE STRING,
SCHGT TYPE STRING,
STKKZ TYPE STRING,
STLAL TYPE STRING,
STLAN TYPE STRING,
STPST TYPE STRING,
SVWVO TYPE STRING,
WERKS TYPE STRING,
NORVL TYPE STRING,
MDNOT TYPE STRING,
PANOT TYPE STRING,
QVERW TYPE STRING,
VBELN TYPE STRING,
VBPOS TYPE STRING,
VERID TYPE STRING,
VRSVO TYPE STRING,
SGT_SCAT TYPE STRING,
SGT_REL TYPE STRING,
BOM_VERSN TYPE STRING,
BOM_ISDRAFT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_CSKBOMEXPL_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_CSKBOMEXPL_STR-FTREL sy-vline 
WA_CSKBOMEXPL_STR-ALEKZ sy-vline 
WA_CSKBOMEXPL_STR-ALTVO sy-vline 
WA_CSKBOMEXPL_STR-AUFSW sy-vline 
WA_CSKBOMEXPL_STR-AUMGB sy-vline 
WA_CSKBOMEXPL_STR-AUMNG sy-vline 
WA_CSKBOMEXPL_STR-AUSKZ sy-vline 
WA_CSKBOMEXPL_STR-AMIND sy-vline 
WA_CSKBOMEXPL_STR-BAGRP sy-vline 
WA_CSKBOMEXPL_STR-BEIKZ sy-vline 
WA_CSKBOMEXPL_STR-BESSL sy-vline 
WA_CSKBOMEXPL_STR-BGIXO sy-vline 
WA_CSKBOMEXPL_STR-BREMS sy-vline 
WA_CSKBOMEXPL_STR-CAPID sy-vline 
WA_CSKBOMEXPL_STR-CHLST sy-vline 
WA_CSKBOMEXPL_STR-COSPR sy-vline 
WA_CSKBOMEXPL_STR-CUOBJ sy-vline 
WA_CSKBOMEXPL_STR-CUOVS sy-vline 
WA_CSKBOMEXPL_STR-CUOLS sy-vline 
WA_CSKBOMEXPL_STR-DATUV sy-vline 
WA_CSKBOMEXPL_STR-DELNL sy-vline 
WA_CSKBOMEXPL_STR-DRLDT sy-vline 
WA_CSKBOMEXPL_STR-EHNDL sy-vline 
WA_CSKBOMEXPL_STR-EMENG sy-vline 
WA_CSKBOMEXPL_STR-ERSKZ sy-vline 
WA_CSKBOMEXPL_STR-ERSSL sy-vline 
WA_CSKBOMEXPL_STR-FBSTP sy-vline 
WA_CSKBOMEXPL_STR-KNFBA sy-vline 
WA_CSKBOMEXPL_STR-KSBVO sy-vline 
WA_CSKBOMEXPL_STR-MBWLS sy-vline 
WA_CSKBOMEXPL_STR-MKTLS sy-vline 
WA_CSKBOMEXPL_STR-MDMPS sy-vline 
WA_CSKBOMEXPL_STR-MKMAT sy-vline 
WA_CSKBOMEXPL_STR-MMAPS sy-vline 
WA_CSKBOMEXPL_STR-SALWW sy-vline 
WA_CSKBOMEXPL_STR-SPLWW sy-vline 
WA_CSKBOMEXPL_STR-MMORY sy-vline 
WA_CSKBOMEXPL_STR-MTNRV sy-vline 
WA_CSKBOMEXPL_STR-NLINK sy-vline 
WA_CSKBOMEXPL_STR-POSTP sy-vline 
WA_CSKBOMEXPL_STR-RNDKZ sy-vline 
WA_CSKBOMEXPL_STR-RVREL sy-vline 
WA_CSKBOMEXPL_STR-SANFR sy-vline 
WA_CSKBOMEXPL_STR-SANIN sy-vline 
WA_CSKBOMEXPL_STR-SANKA sy-vline 
WA_CSKBOMEXPL_STR-SANKO sy-vline 
WA_CSKBOMEXPL_STR-SANVS sy-vline 
WA_CSKBOMEXPL_STR-SCHGT sy-vline 
WA_CSKBOMEXPL_STR-STKKZ sy-vline 
WA_CSKBOMEXPL_STR-STLAL sy-vline 
WA_CSKBOMEXPL_STR-STLAN sy-vline 
WA_CSKBOMEXPL_STR-STPST sy-vline 
WA_CSKBOMEXPL_STR-SVWVO sy-vline 
WA_CSKBOMEXPL_STR-WERKS sy-vline 
WA_CSKBOMEXPL_STR-NORVL sy-vline 
WA_CSKBOMEXPL_STR-MDNOT sy-vline 
WA_CSKBOMEXPL_STR-PANOT sy-vline 
WA_CSKBOMEXPL_STR-QVERW sy-vline 
WA_CSKBOMEXPL_STR-VBELN sy-vline 
WA_CSKBOMEXPL_STR-VBPOS sy-vline 
WA_CSKBOMEXPL_STR-VERID sy-vline 
WA_CSKBOMEXPL_STR-VRSVO sy-vline 
WA_CSKBOMEXPL_STR-SGT_SCAT sy-vline 
WA_CSKBOMEXPL_STR-SGT_REL sy-vline 
WA_CSKBOMEXPL_STR-BOM_VERSN sy-vline 
WA_CSKBOMEXPL_STR-BOM_ISDRAFT sy-vline      INTO ld_text SEPARATED BY SPACE.

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