ABAP Select data from SAP table WISP_DATF_SAP_K03 into internal table

Get Example source ABAP code based on a different SAP table
  

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

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM WISP_DATF_SAP_K03
*  INTO TABLE @DATA(IT_WISP_DATF_SAP_K032).
*--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_WISP_DATF_SAP_K03 INDEX 1 INTO DATA(WA_WISP_DATF_SAP_K032).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_WISP_DATF_SAP_K03 ASSIGNING <WISP_DATF_SAP_K03>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<WISP_DATF_SAP_K03>-VKWRT = 1.
<WISP_DATF_SAP_K03>-EXVKW = 1.
<WISP_DATF_SAP_K03>-VKWRA = 1.
<WISP_DATF_SAP_K03>-ERFMG = 1.
<WISP_DATF_SAP_K03>-BUCHM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_WISP_DATF_SAP_K03-BUCHW, sy-vline,
WA_WISP_DATF_SAP_K03-WRTZL, sy-vline,
WA_WISP_DATF_SAP_K03-WRTBM, sy-vline,
WA_WISP_DATF_SAP_K03-VKMZL, sy-vline,
WA_WISP_DATF_SAP_K03-VKNZL, sy-vline,
WA_WISP_DATF_SAP_K03-IZLMNG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_WISP_DATF_SAP_K03 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_WISP_DATF_SAP_K03 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_WISP_DATF_SAP_K03 INTO WA_WISP_DATF_SAP_K03. *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_WISP_DATF_SAP_K03_STR,
VKWRT TYPE STRING,
EXVKW TYPE STRING,
VKWRA TYPE STRING,
ERFMG TYPE STRING,
BUCHM TYPE STRING,
BUCHW TYPE STRING,
WRTZL TYPE STRING,
WRTBM TYPE STRING,
VKMZL TYPE STRING,
VKNZL TYPE STRING,
IZLMNG TYPE STRING,
IZLGEO TYPE STRING,
IZLGVO TYPE STRING,
IZLGVP TYPE STRING,
IBUMNG TYPE STRING,
IBUGEO TYPE STRING,
IBUGVO TYPE STRING,
IBUGVP TYPE STRING,
IDMMNG TYPE STRING,
IDPMNG TYPE STRING,
IDPGVP TYPE STRING,
IDPGVO TYPE STRING,
IDMGEO TYPE STRING,
IDMGVP TYPE STRING,
IDMGVO TYPE STRING,
IDPGEO TYPE STRING,
KWART TYPE STRING,
XDIFF TYPE STRING,
XNULL TYPE STRING,
XLOEK TYPE STRING,
XZAEL TYPE STRING,
TAAMG TYPE STRING,
AEMNG TYPE STRING,
DMENG TYPE STRING,
TAEMG TYPE STRING,
EDMNG TYPE STRING,
EXAMG TYPE STRING,
EXEMG TYPE STRING,
TARMG TYPE STRING,
VDMNG TYPE STRING,
AEGEW TYPE STRING,
EXAGW TYPE STRING,
EXEGW TYPE STRING,
TAAGW TYPE STRING,
TAEGW TYPE STRING,
TARGW TYPE STRING,
EXEPC TYPE STRING,
EXAPC TYPE STRING,
TAAPC TYPE STRING,
NKPSC TYPE STRING,
AEPSC TYPE STRING,
VDPSC TYPE STRING,
EDPSC TYPE STRING,
TAEPC TYPE STRING,
LFBZC TYPE STRING,
RSBZC TYPE STRING,
TBBZC TYPE STRING,
RGLAC TYPE STRING,
RFBZC TYPE STRING,
TARPC TYPE STRING,
AEAQC TYPE STRING,
BEAEC TYPE STRING,
BPAEC TYPE STRING,
LKAEC TYPE STRING,
LK_AE TYPE STRING,
AE_AQ TYPE STRING,
BP_AE TYPE STRING,
BE_AE TYPE STRING,
MAGBB TYPE STRING,
MAGKB TYPE STRING,
MZUBB TYPE STRING,
MZUKB TYPE STRING,
MGVBR TYPE STRING,
MUVBR TYPE STRING,
WBWBEST TYPE STRING,
BWERTV TYPE STRING,
WAGBB TYPE STRING,
WZUBB TYPE STRING,
WGVBR TYPE STRING,
WUVBR TYPE STRING,
AZUBB TYPE STRING,
AZUKB TYPE STRING,
AAGBB TYPE STRING,
AAGKB TYPE STRING,
BBNULL TYPE STRING,
GBNULL TYPE STRING,
KBNULL TYPE STRING,
AUVBR TYPE STRING,
AGVBR TYPE STRING,
AMBWG TYPE STRING,
ASTOR TYPE STRING,END OF T_EKKO_STR. DATA: WA_WISP_DATF_SAP_K03_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_WISP_DATF_SAP_K03_STR-VKWRT sy-vline
WA_WISP_DATF_SAP_K03_STR-EXVKW sy-vline
WA_WISP_DATF_SAP_K03_STR-VKWRA sy-vline
WA_WISP_DATF_SAP_K03_STR-ERFMG sy-vline
WA_WISP_DATF_SAP_K03_STR-BUCHM sy-vline
WA_WISP_DATF_SAP_K03_STR-BUCHW sy-vline
WA_WISP_DATF_SAP_K03_STR-WRTZL sy-vline
WA_WISP_DATF_SAP_K03_STR-WRTBM sy-vline
WA_WISP_DATF_SAP_K03_STR-VKMZL sy-vline
WA_WISP_DATF_SAP_K03_STR-VKNZL sy-vline
WA_WISP_DATF_SAP_K03_STR-IZLMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-IZLGEO sy-vline
WA_WISP_DATF_SAP_K03_STR-IZLGVO sy-vline
WA_WISP_DATF_SAP_K03_STR-IZLGVP sy-vline
WA_WISP_DATF_SAP_K03_STR-IBUMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-IBUGEO sy-vline
WA_WISP_DATF_SAP_K03_STR-IBUGVO sy-vline
WA_WISP_DATF_SAP_K03_STR-IBUGVP sy-vline
WA_WISP_DATF_SAP_K03_STR-IDMMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-IDPMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-IDPGVP sy-vline
WA_WISP_DATF_SAP_K03_STR-IDPGVO sy-vline
WA_WISP_DATF_SAP_K03_STR-IDMGEO sy-vline
WA_WISP_DATF_SAP_K03_STR-IDMGVP sy-vline
WA_WISP_DATF_SAP_K03_STR-IDMGVO sy-vline
WA_WISP_DATF_SAP_K03_STR-IDPGEO sy-vline
WA_WISP_DATF_SAP_K03_STR-KWART sy-vline
WA_WISP_DATF_SAP_K03_STR-XDIFF sy-vline
WA_WISP_DATF_SAP_K03_STR-XNULL sy-vline
WA_WISP_DATF_SAP_K03_STR-XLOEK sy-vline
WA_WISP_DATF_SAP_K03_STR-XZAEL sy-vline
WA_WISP_DATF_SAP_K03_STR-TAAMG sy-vline
WA_WISP_DATF_SAP_K03_STR-AEMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-DMENG sy-vline
WA_WISP_DATF_SAP_K03_STR-TAEMG sy-vline
WA_WISP_DATF_SAP_K03_STR-EDMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-EXAMG sy-vline
WA_WISP_DATF_SAP_K03_STR-EXEMG sy-vline
WA_WISP_DATF_SAP_K03_STR-TARMG sy-vline
WA_WISP_DATF_SAP_K03_STR-VDMNG sy-vline
WA_WISP_DATF_SAP_K03_STR-AEGEW sy-vline
WA_WISP_DATF_SAP_K03_STR-EXAGW sy-vline
WA_WISP_DATF_SAP_K03_STR-EXEGW sy-vline
WA_WISP_DATF_SAP_K03_STR-TAAGW sy-vline
WA_WISP_DATF_SAP_K03_STR-TAEGW sy-vline
WA_WISP_DATF_SAP_K03_STR-TARGW sy-vline
WA_WISP_DATF_SAP_K03_STR-EXEPC sy-vline
WA_WISP_DATF_SAP_K03_STR-EXAPC sy-vline
WA_WISP_DATF_SAP_K03_STR-TAAPC sy-vline
WA_WISP_DATF_SAP_K03_STR-NKPSC sy-vline
WA_WISP_DATF_SAP_K03_STR-AEPSC sy-vline
WA_WISP_DATF_SAP_K03_STR-VDPSC sy-vline
WA_WISP_DATF_SAP_K03_STR-EDPSC sy-vline
WA_WISP_DATF_SAP_K03_STR-TAEPC sy-vline
WA_WISP_DATF_SAP_K03_STR-LFBZC sy-vline
WA_WISP_DATF_SAP_K03_STR-RSBZC sy-vline
WA_WISP_DATF_SAP_K03_STR-TBBZC sy-vline
WA_WISP_DATF_SAP_K03_STR-RGLAC sy-vline
WA_WISP_DATF_SAP_K03_STR-RFBZC sy-vline
WA_WISP_DATF_SAP_K03_STR-TARPC sy-vline
WA_WISP_DATF_SAP_K03_STR-AEAQC sy-vline
WA_WISP_DATF_SAP_K03_STR-BEAEC sy-vline
WA_WISP_DATF_SAP_K03_STR-BPAEC sy-vline
WA_WISP_DATF_SAP_K03_STR-LKAEC sy-vline
WA_WISP_DATF_SAP_K03_STR-LK_AE sy-vline
WA_WISP_DATF_SAP_K03_STR-AE_AQ sy-vline
WA_WISP_DATF_SAP_K03_STR-BP_AE sy-vline
WA_WISP_DATF_SAP_K03_STR-BE_AE sy-vline
WA_WISP_DATF_SAP_K03_STR-MAGBB sy-vline
WA_WISP_DATF_SAP_K03_STR-MAGKB sy-vline
WA_WISP_DATF_SAP_K03_STR-MZUBB sy-vline
WA_WISP_DATF_SAP_K03_STR-MZUKB sy-vline
WA_WISP_DATF_SAP_K03_STR-MGVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-MUVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-WBWBEST sy-vline
WA_WISP_DATF_SAP_K03_STR-BWERTV sy-vline
WA_WISP_DATF_SAP_K03_STR-WAGBB sy-vline
WA_WISP_DATF_SAP_K03_STR-WZUBB sy-vline
WA_WISP_DATF_SAP_K03_STR-WGVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-WUVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-AZUBB sy-vline
WA_WISP_DATF_SAP_K03_STR-AZUKB sy-vline
WA_WISP_DATF_SAP_K03_STR-AAGBB sy-vline
WA_WISP_DATF_SAP_K03_STR-AAGKB sy-vline
WA_WISP_DATF_SAP_K03_STR-BBNULL sy-vline
WA_WISP_DATF_SAP_K03_STR-GBNULL sy-vline
WA_WISP_DATF_SAP_K03_STR-KBNULL sy-vline
WA_WISP_DATF_SAP_K03_STR-AUVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-AGVBR sy-vline
WA_WISP_DATF_SAP_K03_STR-AMBWG sy-vline
WA_WISP_DATF_SAP_K03_STR-ASTOR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.