ABAP Select data from SAP table HRDESV_ZS_S_TRANS 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 HRDESV_ZS_S_TRANS 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 HRDESV_ZS_S_TRANS. 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 HRDESV_ZS_S_TRANS 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_HRDESV_ZS_S_TRANS TYPE STANDARD TABLE OF HRDESV_ZS_S_TRANS,
      WA_HRDESV_ZS_S_TRANS TYPE HRDESV_ZS_S_TRANS,
      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: <HRDESV_ZS_S_TRANS> TYPE HRDESV_ZS_S_TRANS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRDESV_ZS_S_TRANS
*  INTO TABLE @DATA(IT_HRDESV_ZS_S_TRANS2).
*--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_HRDESV_ZS_S_TRANS INDEX 1 INTO DATA(WA_HRDESV_ZS_S_TRANS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_HRDESV_ZS_S_TRANS ASSIGNING <HRDESV_ZS_S_TRANS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRDESV_ZS_S_TRANS>-WERKS = 1.
<HRDESV_ZS_S_TRANS>-BTRTL = 1.
<HRDESV_ZS_S_TRANS>-LABTR = 1.
<HRDESV_ZS_S_TRANS>-KKART = 1.
<HRDESV_ZS_S_TRANS>-BTRNR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRDESV_ZS_S_TRANS-KENNZST, sy-vline,
WA_HRDESV_ZS_S_TRANS-STBEG, sy-vline,
WA_HRDESV_ZS_S_TRANS-STEND, sy-vline,
WA_HRDESV_ZS_S_TRANS-GUID, sy-vline,
WA_HRDESV_ZS_S_TRANS-DSVZ_VF, sy-vline,
WA_HRDESV_ZS_S_TRANS-DSVZ_BBNRAB, sy-vline.
ENDLOOP. *Add any further fields from structure WA_HRDESV_ZS_S_TRANS 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_HRDESV_ZS_S_TRANS 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_HRDESV_ZS_S_TRANS INTO WA_HRDESV_ZS_S_TRANS. *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_HRDESV_ZS_S_TRANS_STR,
WERKS TYPE STRING,
BTRTL TYPE STRING,
LABTR TYPE STRING,
KKART TYPE STRING,
BTRNR TYPE STRING,
KENNZST TYPE STRING,
STBEG TYPE STRING,
STEND TYPE STRING,
GUID TYPE STRING,
DSVZ_VF TYPE STRING,
DSVZ_BBNRAB TYPE STRING,
DSVZ_BBNREP TYPE STRING,
DSVZ_VERNR TYPE STRING,
DSVZ_ED TYPE STRING,
DSVZ_FEKZ TYPE STRING,
DSVZ_FEAN TYPE STRING,
DSVZ_KVNR TYPE STRING,
DSVZ_BBNRVU TYPE STRING,
DSVZ_AZVU TYPE STRING,
DSVZ_BBNRKK TYPE STRING,
DSVZ_AZKK TYPE STRING,
DSVZ_BBNRAS TYPE STRING,
DSVZ_GD TYPE STRING,
DSVZ_PRODID TYPE STRING,
DSVZ_MODID TYPE STRING,
DSVZ_DSID TYPE STRING,
DSVZ_MMZK TYPE STRING,
DSVZ_MMNA TYPE STRING,
DSVZ_MMGA TYPE STRING,
DSVZ_MMKZ TYPE STRING,
DSVZ_MMAN TYPE STRING,
DSVZ_MMPS TYPE STRING,
DSVZ_MMBF TYPE STRING,
DSVZ_VSNR TYPE STRING,
DBZK_KENNZST TYPE STRING,
DBZK_GD TYPE STRING,
DBZK_KENNZBEIH TYPE STRING,
DBZK_VBBG TYPE STRING,
DBZK_VBEN TYPE STRING,
DBZK_VBAEN TYPE STRING,
DBZK_VBBETR TYPE STRING,
DBZK_KAPAUSBG TYPE STRING,
DBZK_KAPZRBG TYPE STRING,
DBZK_KAPZREN TYPE STRING,
DBZK_KAPBETR TYPE STRING,
DBZK_BEITRKV TYPE STRING,
DBZK_BEITRPV TYPE STRING,
DBZK_ARTVB TYPE STRING,
DBNA_FMNA TYPE STRING,
DBNA_VONA TYPE STRING,
DBNA_VOSA TYPE STRING,
DBNA_NAZU TYPE STRING,
DBNA_TITEL TYPE STRING,
DBNA_KENNZAB TYPE STRING,
DBGA_GBDT TYPE STRING,
DBGA_GE TYPE STRING,
DBKZ_KENNZST TYPE STRING,
DBKZ_GD TYPE STRING,
DBKZ_KENNZABF TYPE STRING,
DBKZ_ABFBG TYPE STRING,
DBKZ_ABFEN TYPE STRING,
DBKZ_ABFAEN TYPE STRING,
DBKZ_BYSATZ TYPE STRING,
DBKZ_KENNZMFB TYPE STRING,
DBKZ_VBMAX TYPE STRING,
DBKZ_KENNZANPZ TYPE STRING,
DBKZ_KENNZAEN TYPE STRING,
DBKZ_BBNRKKN TYPE STRING,
DBKZ_KENNZFB TYPE STRING,
DBKZ_HOEHEFB TYPE STRING,
DBAN_LDKZ TYPE STRING,
DBAN_PLZ TYPE STRING,
DBAN_ORT TYPE STRING,
DBAN_STR TYPE STRING,
DBAN_NR TYPE STRING,
DBAN_ADRZU TYPE STRING,
DBPS_KENNZST TYPE STRING,
DBPS_KENNZSOZA TYPE STRING,
DBPS_ZRBG TYPE STRING,
DBBF_ANBF TYPE STRING,END OF T_EKKO_STR. DATA: WA_HRDESV_ZS_S_TRANS_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_HRDESV_ZS_S_TRANS_STR-WERKS sy-vline
WA_HRDESV_ZS_S_TRANS_STR-BTRTL sy-vline
WA_HRDESV_ZS_S_TRANS_STR-LABTR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-KKART sy-vline
WA_HRDESV_ZS_S_TRANS_STR-BTRNR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-KENNZST sy-vline
WA_HRDESV_ZS_S_TRANS_STR-STBEG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-STEND sy-vline
WA_HRDESV_ZS_S_TRANS_STR-GUID sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_VF sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_BBNRAB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_BBNREP sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_VERNR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_ED sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_FEKZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_FEAN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_KVNR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_BBNRVU sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_AZVU sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_BBNRKK sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_AZKK sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_BBNRAS sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_GD sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_PRODID sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MODID sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_DSID sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMZK sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMNA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMGA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMKZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMAN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMPS sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_MMBF sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DSVZ_VSNR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KENNZST sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_GD sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KENNZBEIH sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_VBBG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_VBEN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_VBAEN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_VBBETR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KAPAUSBG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KAPZRBG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KAPZREN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_KAPBETR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_BEITRKV sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_BEITRPV sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBZK_ARTVB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_FMNA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_VONA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_VOSA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_NAZU sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_TITEL sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBNA_KENNZAB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBGA_GBDT sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBGA_GE sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZST sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_GD sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZABF sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_ABFBG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_ABFEN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_ABFAEN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_BYSATZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZMFB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_VBMAX sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZANPZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZAEN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_BBNRKKN sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_KENNZFB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBKZ_HOEHEFB sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_LDKZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_PLZ sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_ORT sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_STR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_NR sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBAN_ADRZU sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBPS_KENNZST sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBPS_KENNZSOZA sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBPS_ZRBG sy-vline
WA_HRDESV_ZS_S_TRANS_STR-DBBF_ANBF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.