ABAP Select data from SAP table HCMT_BSP_PA_HU_R0164 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 HCMT_BSP_PA_HU_R0164 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 HCMT_BSP_PA_HU_R0164. 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 HCMT_BSP_PA_HU_R0164 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_HCMT_BSP_PA_HU_R0164 TYPE STANDARD TABLE OF HCMT_BSP_PA_HU_R0164,
      WA_HCMT_BSP_PA_HU_R0164 TYPE HCMT_BSP_PA_HU_R0164,
      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: <HCMT_BSP_PA_HU_R0164> TYPE HCMT_BSP_PA_HU_R0164.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HCMT_BSP_PA_HU_R0164
*  INTO TABLE @DATA(IT_HCMT_BSP_PA_HU_R01642).
*--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_HCMT_BSP_PA_HU_R0164 INDEX 1 INTO DATA(WA_HCMT_BSP_PA_HU_R01642).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<HCMT_BSP_PA_HU_R0164>-OBJECT_KEY = 1.
<HCMT_BSP_PA_HU_R0164>-PERNR = 1.
<HCMT_BSP_PA_HU_R0164>-AEDTM = 1.
<HCMT_BSP_PA_HU_R0164>-UNAME = 1.
<HCMT_BSP_PA_HU_R0164>-SPRPS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HCMT_BSP_PA_HU_R0164-SPRTX, sy-vline,
  WA_HCMT_BSP_PA_HU_R0164-ITBLD, sy-vline,
  WA_HCMT_BSP_PA_HU_R0164-ITXEX, sy-vline,
  WA_HCMT_BSP_PA_HU_R0164-BEGDA, sy-vline,
  WA_HCMT_BSP_PA_HU_R0164-ENDDA, sy-vline,
  WA_HCMT_BSP_PA_HU_R0164-SVNUM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_HCMT_BSP_PA_HU_R0164 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_HCMT_BSP_PA_HU_R0164 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_HCMT_BSP_PA_HU_R0164 INTO WA_HCMT_BSP_PA_HU_R0164.


*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_HCMT_BSP_PA_HU_R0164_STR, 
OBJECT_KEY TYPE STRING,
PERNR TYPE STRING,
AEDTM TYPE STRING,
UNAME TYPE STRING,
SPRPS TYPE STRING,
SPRTX TYPE STRING,
ITBLD TYPE STRING,
ITXEX TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
SVNUM TYPE STRING,
SVKNU TYPE STRING,
AGREN TYPE STRING,
STUF1 TYPE STRING,
HSCH1 TYPE STRING,
AGKRA TYPE STRING,
STUF2 TYPE STRING,
HSCH2 TYPE STRING,
AGARB TYPE STRING,
STUF3 TYPE STRING,
HSCH3 TYPE STRING,
ANREN TYPE STRING,
STUF5 TYPE STRING,
HSCH5 TYPE STRING,
ANKRA TYPE STRING,
STUF6 TYPE STRING,
HSCH6 TYPE STRING,
ANARB TYPE STRING,
STUF7 TYPE STRING,
HSCH7 TYPE STRING,
TBKIF TYPE STRING,
ELNEV TYPE STRING,
EUHOZ TYPE STRING,
STUF9 TYPE STRING,
HSCH9 TYPE STRING,
ALKMN TYPE STRING,
ALKKOD TYPE STRING,
MANYP TYPE STRING,
STUF10 TYPE STRING,
HSCH10 TYPE STRING,
VALKI TYPE STRING,
STUF11 TYPE STRING,
HSCH11 TYPE STRING,
DOLKI TYPE STRING,
JCKOD TYPE STRING,
JCKOD_TXT TYPE STRING,
EUPRZ TYPE STRING,
STUF12 TYPE STRING,
HSCH12 TYPE STRING,
MEGJS TYPE STRING,
SKTIP TYPE STRING,
SKTIP_TXT TYPE STRING,
MVEHO TYPE STRING,
STUF14 TYPE STRING,
HSCH14 TYPE STRING,
MEKHO TYPE STRING,
EKHO_TXT TYPE STRING,
TAKER TYPE STRING,
TAKERTXT TYPE STRING,
NYNLE TYPE STRING,
NYNLETXT TYPE STRING,
EUNLE TYPE STRING,
EUNLETXT TYPE STRING,
EUN13 TYPE STRING,
EUN13TXT TYPE STRING,
ANKRB TYPE STRING,
STUF19 TYPE STRING,
HSCH19 TYPE STRING,
PENLE TYPE STRING,
PENLETXT TYPE STRING,
TENLE TYPE STRING,
TENLETXT TYPE STRING,
NYUTI TYPE STRING,
NYUTITXT TYPE STRING,
RATJO TYPE STRING,
NYUTO TYPE STRING,
NORMJ TYPE STRING,
NORMJTXT TYPE STRING,
KKEDV TYPE STRING,
STUF20 TYPE STRING,
HSCH20 TYPE STRING,
FOGLJ TYPE STRING,
FOGLJTXT TYPE STRING,
KOFOG TYPE STRING,
RMIKF TYPE STRING,
HEKHO TYPE STRING,
HEKHOTXT TYPE STRING,
SZKEP TYPE STRING,
KAHID TYPE STRING,
MBERM TYPE STRING,
MBERMTXT TYPE STRING,
NYUT2 TYPE STRING,
NYUT2TXT TYPE STRING,
REHAB TYPE STRING,
KFKMP TYPE STRING,
GYEDS TYPE STRING,
GYEDSTXT TYPE STRING,
K5525 TYPE STRING,
K5525TXT TYPE STRING,
K25FE TYPE STRING,
K25FETXT TYPE STRING,
SZVAL TYPE STRING,
SZVALTXT TYPE STRING,
KUTAT TYPE STRING,
KUTATTXT TYPE STRING,
MTABI TYPE STRING,
KFOKS TYPE STRING,
M2555 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HCMT_BSP_PA_HU_R0164_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_HCMT_BSP_PA_HU_R0164_STR-OBJECT_KEY sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-PERNR sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-AEDTM sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-UNAME sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SPRPS sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SPRTX sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ITBLD sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ITXEX sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-BEGDA sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ENDDA sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SVNUM sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SVKNU sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-AGREN sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF1 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH1 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-AGKRA sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF2 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH2 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-AGARB sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF3 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH3 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ANREN sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF5 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH5 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ANKRA sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF6 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH6 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ANARB sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF7 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH7 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-TBKIF sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ELNEV sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUHOZ sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF9 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH9 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ALKMN sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ALKKOD sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MANYP sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF10 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH10 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-VALKI sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF11 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH11 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-DOLKI sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-JCKOD sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-JCKOD_TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUPRZ sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF12 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH12 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MEGJS sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SKTIP sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SKTIP_TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MVEHO sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF14 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH14 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MEKHO sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EKHO_TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-TAKER sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-TAKERTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYNLE sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYNLETXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUNLE sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUNLETXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUN13 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-EUN13TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-ANKRB sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF19 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH19 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-PENLE sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-PENLETXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-TENLE sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-TENLETXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYUTI sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYUTITXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-RATJO sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYUTO sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NORMJ sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NORMJTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KKEDV sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-STUF20 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HSCH20 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-FOGLJ sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-FOGLJTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KOFOG sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-RMIKF sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HEKHO sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-HEKHOTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SZKEP sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KAHID sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MBERM sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MBERMTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYUT2 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-NYUT2TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-REHAB sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KFKMP sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-GYEDS sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-GYEDSTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-K5525 sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-K5525TXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-K25FE sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-K25FETXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SZVAL sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-SZVALTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KUTAT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KUTATTXT sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-MTABI sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-KFOKS sy-vline 
WA_HCMT_BSP_PA_HU_R0164_STR-M2555 sy-vline      INTO ld_text SEPARATED BY SPACE.

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