ABAP Select data from SAP table BIW_WAKH_S 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 BIW_WAKH_S 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 BIW_WAKH_S. 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 BIW_WAKH_S 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_BIW_WAKH_S TYPE STANDARD TABLE OF BIW_WAKH_S,
      WA_BIW_WAKH_S TYPE BIW_WAKH_S,
      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: <BIW_WAKH_S> TYPE BIW_WAKH_S.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM BIW_WAKH_S
*  INTO TABLE @DATA(IT_BIW_WAKH_S2).
*--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_BIW_WAKH_S INDEX 1 INTO DATA(WA_BIW_WAKH_S2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_BIW_WAKH_S ASSIGNING <BIW_WAKH_S>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<BIW_WAKH_S>-MANDT = 1.
<BIW_WAKH_S>-AKTNR = 1.
<BIW_WAKH_S>-AKTYP = 1.
<BIW_WAKH_S>-AKART = 1.
<BIW_WAKH_S>-WAELA = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BIW_WAKH_S-WAERA, sy-vline,
WA_BIW_WAKH_S-VGLAK, sy-vline,
WA_BIW_WAKH_S-LISRE, sy-vline,
WA_BIW_WAKH_S-AUFAR, sy-vline,
WA_BIW_WAKH_S-BEKTY, sy-vline,
WA_BIW_WAKH_S-KSBEK, sy-vline.
ENDLOOP. *Add any further fields from structure WA_BIW_WAKH_S 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_BIW_WAKH_S 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_BIW_WAKH_S INTO WA_BIW_WAKH_S. *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 AKTNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_BIW_WAKH_S-AKTNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_WAKH_S-AKTNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit CUNIT, internal->external for field MELAK CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BIW_WAKH_S-MELAK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_WAKH_S-MELAK.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MELRA CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BIW_WAKH_S-MELRA IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_WAKH_S-MELRA.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field ERDOCN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_BIW_WAKH_S-ERDOCN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BIW_WAKH_S-ERDOCN.
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_BIW_WAKH_S_STR,
MANDT TYPE STRING,
AKTNR TYPE STRING,
AKTYP TYPE STRING,
AKART TYPE STRING,
WAELA TYPE STRING,
WAERA TYPE STRING,
VGLAK TYPE STRING,
LISRE TYPE STRING,
AUFAR TYPE STRING,
BEKTY TYPE STRING,
KSBEK TYPE STRING,
AKVST TYPE STRING,
AKAST TYPE STRING,
AKBST TYPE STRING,
VKGST TYPE STRING,
EKGST TYPE STRING,
BEKST TYPE STRING,
AKNBS TYPE STRING,
AKNFG TYPE STRING,
AKNBF TYPE STRING,
AKNTH TYPE STRING,
AKNPO TYPE STRING,
AKNWM TYPE STRING,
AKNTX TYPE STRING,
NEKKO TYPE STRING,
NVKKO TYPE STRING,
NARTS TYPE STRING,
ATNPO TYPE STRING,
VTART TYPE STRING,
EKDAB TYPE STRING,
EKDBI TYPE STRING,
VKDAB TYPE STRING,
VKDBI TYPE STRING,
ALIVO TYPE STRING,
ALIBI TYPE STRING,
SPDAB TYPE STRING,
SPGRU TYPE STRING,
EKKON TYPE STRING,
VKKON TYPE STRING,
KOBOG TYPE STRING,
EKORG TYPE STRING,
EKGRP TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
PLUEP TYPE STRING,
PLUEN TYPE STRING,
PLUVP TYPE STRING,
PLMGE TYPE STRING,
PLANZ TYPE STRING,
MELAK TYPE STRING,
MELRA TYPE STRING,
PDUEP TYPE STRING,
PDUEN TYPE STRING,
PDUVP TYPE STRING,
PDMGE TYPE STRING,
PDANZ TYPE STRING,
VAUEP TYPE STRING,
VAUEN TYPE STRING,
VAUVP TYPE STRING,
VAMGE TYPE STRING,
RFIND TYPE STRING,
VAANZ TYPE STRING,
ERNAM TYPE STRING,
ERDAT TYPE STRING,
AENAM TYPE STRING,
AEDAT TYPE STRING,
KOBVK TYPE STRING,
FADAT TYPE STRING,
SADAT TYPE STRING,
FLDAT TYPE STRING,
SLDAT TYPE STRING,
ADDIBELNR TYPE STRING,
VZKON TYPE STRING,
KALKE TYPE STRING,
PLTYP TYPE STRING,
NO_KALK TYPE STRING,
EKERV TYPE STRING,
RFCDEST TYPE STRING,
ERAPPL TYPE STRING,
KSCHL_PERC TYPE STRING,
KSCHL_VAL TYPE STRING,
PLUNP TYPE STRING,
PLURE TYPE STRING,
PLULO TYPE STRING,
MEDIA_TYPE TYPE STRING,
CUSTOMER_TYPE TYPE STRING,
ALLOW_PMAT_IGNO TYPE STRING,
ITEMS_4_BBY TYPE STRING,
ALLOW_DISP_MAT TYPE STRING,
INIT_SLS_PRICE TYPE STRING,
REF_PROMO TYPE STRING,
CGPL_GUID TYPE STRING,
EXTERNAL_ID TYPE STRING,
IS_REF_PROMO TYPE STRING,
BEKST2 TYPE STRING,
ERDOCN TYPE STRING,
HIER_ID TYPE STRING,
BPROF TYPE STRING,END OF T_EKKO_STR. DATA: WA_BIW_WAKH_S_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_BIW_WAKH_S_STR-MANDT sy-vline
WA_BIW_WAKH_S_STR-AKTNR sy-vline
WA_BIW_WAKH_S_STR-AKTYP sy-vline
WA_BIW_WAKH_S_STR-AKART sy-vline
WA_BIW_WAKH_S_STR-WAELA sy-vline
WA_BIW_WAKH_S_STR-WAERA sy-vline
WA_BIW_WAKH_S_STR-VGLAK sy-vline
WA_BIW_WAKH_S_STR-LISRE sy-vline
WA_BIW_WAKH_S_STR-AUFAR sy-vline
WA_BIW_WAKH_S_STR-BEKTY sy-vline
WA_BIW_WAKH_S_STR-KSBEK sy-vline
WA_BIW_WAKH_S_STR-AKVST sy-vline
WA_BIW_WAKH_S_STR-AKAST sy-vline
WA_BIW_WAKH_S_STR-AKBST sy-vline
WA_BIW_WAKH_S_STR-VKGST sy-vline
WA_BIW_WAKH_S_STR-EKGST sy-vline
WA_BIW_WAKH_S_STR-BEKST sy-vline
WA_BIW_WAKH_S_STR-AKNBS sy-vline
WA_BIW_WAKH_S_STR-AKNFG sy-vline
WA_BIW_WAKH_S_STR-AKNBF sy-vline
WA_BIW_WAKH_S_STR-AKNTH sy-vline
WA_BIW_WAKH_S_STR-AKNPO sy-vline
WA_BIW_WAKH_S_STR-AKNWM sy-vline
WA_BIW_WAKH_S_STR-AKNTX sy-vline
WA_BIW_WAKH_S_STR-NEKKO sy-vline
WA_BIW_WAKH_S_STR-NVKKO sy-vline
WA_BIW_WAKH_S_STR-NARTS sy-vline
WA_BIW_WAKH_S_STR-ATNPO sy-vline
WA_BIW_WAKH_S_STR-VTART sy-vline
WA_BIW_WAKH_S_STR-EKDAB sy-vline
WA_BIW_WAKH_S_STR-EKDBI sy-vline
WA_BIW_WAKH_S_STR-VKDAB sy-vline
WA_BIW_WAKH_S_STR-VKDBI sy-vline
WA_BIW_WAKH_S_STR-ALIVO sy-vline
WA_BIW_WAKH_S_STR-ALIBI sy-vline
WA_BIW_WAKH_S_STR-SPDAB sy-vline
WA_BIW_WAKH_S_STR-SPGRU sy-vline
WA_BIW_WAKH_S_STR-EKKON sy-vline
WA_BIW_WAKH_S_STR-VKKON sy-vline
WA_BIW_WAKH_S_STR-KOBOG sy-vline
WA_BIW_WAKH_S_STR-EKORG sy-vline
WA_BIW_WAKH_S_STR-EKGRP sy-vline
WA_BIW_WAKH_S_STR-VKORG sy-vline
WA_BIW_WAKH_S_STR-VTWEG sy-vline
WA_BIW_WAKH_S_STR-PLUEP sy-vline
WA_BIW_WAKH_S_STR-PLUEN sy-vline
WA_BIW_WAKH_S_STR-PLUVP sy-vline
WA_BIW_WAKH_S_STR-PLMGE sy-vline
WA_BIW_WAKH_S_STR-PLANZ sy-vline
WA_BIW_WAKH_S_STR-MELAK sy-vline
WA_BIW_WAKH_S_STR-MELRA sy-vline
WA_BIW_WAKH_S_STR-PDUEP sy-vline
WA_BIW_WAKH_S_STR-PDUEN sy-vline
WA_BIW_WAKH_S_STR-PDUVP sy-vline
WA_BIW_WAKH_S_STR-PDMGE sy-vline
WA_BIW_WAKH_S_STR-PDANZ sy-vline
WA_BIW_WAKH_S_STR-VAUEP sy-vline
WA_BIW_WAKH_S_STR-VAUEN sy-vline
WA_BIW_WAKH_S_STR-VAUVP sy-vline
WA_BIW_WAKH_S_STR-VAMGE sy-vline
WA_BIW_WAKH_S_STR-RFIND sy-vline
WA_BIW_WAKH_S_STR-VAANZ sy-vline
WA_BIW_WAKH_S_STR-ERNAM sy-vline
WA_BIW_WAKH_S_STR-ERDAT sy-vline
WA_BIW_WAKH_S_STR-AENAM sy-vline
WA_BIW_WAKH_S_STR-AEDAT sy-vline
WA_BIW_WAKH_S_STR-KOBVK sy-vline
WA_BIW_WAKH_S_STR-FADAT sy-vline
WA_BIW_WAKH_S_STR-SADAT sy-vline
WA_BIW_WAKH_S_STR-FLDAT sy-vline
WA_BIW_WAKH_S_STR-SLDAT sy-vline
WA_BIW_WAKH_S_STR-ADDIBELNR sy-vline
WA_BIW_WAKH_S_STR-VZKON sy-vline
WA_BIW_WAKH_S_STR-KALKE sy-vline
WA_BIW_WAKH_S_STR-PLTYP sy-vline
WA_BIW_WAKH_S_STR-NO_KALK sy-vline
WA_BIW_WAKH_S_STR-EKERV sy-vline
WA_BIW_WAKH_S_STR-RFCDEST sy-vline
WA_BIW_WAKH_S_STR-ERAPPL sy-vline
WA_BIW_WAKH_S_STR-KSCHL_PERC sy-vline
WA_BIW_WAKH_S_STR-KSCHL_VAL sy-vline
WA_BIW_WAKH_S_STR-PLUNP sy-vline
WA_BIW_WAKH_S_STR-PLURE sy-vline
WA_BIW_WAKH_S_STR-PLULO sy-vline
WA_BIW_WAKH_S_STR-MEDIA_TYPE sy-vline
WA_BIW_WAKH_S_STR-CUSTOMER_TYPE sy-vline
WA_BIW_WAKH_S_STR-ALLOW_PMAT_IGNO sy-vline
WA_BIW_WAKH_S_STR-ITEMS_4_BBY sy-vline
WA_BIW_WAKH_S_STR-ALLOW_DISP_MAT sy-vline
WA_BIW_WAKH_S_STR-INIT_SLS_PRICE sy-vline
WA_BIW_WAKH_S_STR-REF_PROMO sy-vline
WA_BIW_WAKH_S_STR-CGPL_GUID sy-vline
WA_BIW_WAKH_S_STR-EXTERNAL_ID sy-vline
WA_BIW_WAKH_S_STR-IS_REF_PROMO sy-vline
WA_BIW_WAKH_S_STR-BEKST2 sy-vline
WA_BIW_WAKH_S_STR-ERDOCN sy-vline
WA_BIW_WAKH_S_STR-HIER_ID sy-vline
WA_BIW_WAKH_S_STR-BPROF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.