ABAP Select data from SAP table HRDEPBSCASENS_CLUSTER_P14A 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 HRDEPBSCASENS_CLUSTER_P14A 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 HRDEPBSCASENS_CLUSTER_P14A. 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 HRDEPBSCASENS_CLUSTER_P14A 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_HRDEPBSCASENS_CLUSTER_P14A TYPE STANDARD TABLE OF HRDEPBSCASENS_CLUSTER_P14A,
      WA_HRDEPBSCASENS_CLUSTER_P14A TYPE HRDEPBSCASENS_CLUSTER_P14A,
      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: <HRDEPBSCASENS_CLUSTER_P14A> TYPE HRDEPBSCASENS_CLUSTER_P14A.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRDEPBSCASENS_CLUSTER_P14A
*  INTO TABLE @DATA(IT_HRDEPBSCASENS_CLUSTER_P14A2).
*--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_HRDEPBSCASENS_CLUSTER_P14A INDEX 1 INTO DATA(WA_HRDEPBSCASENS_CLUSTER_P14A2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRDEPBSCASENS_CLUSTER_P14A>-HEADER = 1.
<HRDEPBSCASENS_CLUSTER_P14A>-REQTYPE = 1.
<HRDEPBSCASENS_CLUSTER_P14A>-STATUS = 1.
<HRDEPBSCASENS_CLUSTER_P14A>-REQMODE = 1.
<HRDEPBSCASENS_CLUSTER_P14A>-ADMNSTR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRDEPBSCASENS_CLUSTER_P14A-ADMNNAME, sy-vline,
  WA_HRDEPBSCASENS_CLUSTER_P14A-CHDATE, sy-vline,
  WA_HRDEPBSCASENS_CLUSTER_P14A-CHTIME, sy-vline,
  WA_HRDEPBSCASENS_CLUSTER_P14A-PSBEG, sy-vline,
  WA_HRDEPBSCASENS_CLUSTER_P14A-PSEND, sy-vline,
  WA_HRDEPBSCASENS_CLUSTER_P14A-CALCVARIANT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_HRDEPBSCASENS_CLUSTER_P14A 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_HRDEPBSCASENS_CLUSTER_P14A 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_HRDEPBSCASENS_CLUSTER_P14A INTO WA_HRDEPBSCASENS_CLUSTER_P14A.


*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_HRDEPBSCASENS_CLUSTER_P14A_STR, 
HEADER TYPE STRING,
REQTYPE TYPE STRING,
STATUS TYPE STRING,
REQMODE TYPE STRING,
ADMNSTR TYPE STRING,
ADMNNAME TYPE STRING,
CHDATE TYPE STRING,
CHTIME TYPE STRING,
PSBEG TYPE STRING,
PSEND TYPE STRING,
CALCVARIANT TYPE STRING,
LOG_PSLAW TYPE STRING,
MOLGA TYPE STRING,
PSLAW TYPE STRING,
TRFAR TYPE STRING,
TRFGB TYPE STRING,
DATE TYPE STRING,
LAW_DATE TYPE STRING,
WERKS TYPE STRING,
BTRTL TYPE STRING,
PERSG TYPE STRING,
PERSK TYPE STRING,
LOG_PSLAW_VADM TYPE STRING,
AUFRUF TYPE STRING,
GRDVF TYPE STRING,
EINVF TYPE STRING,
EINBV TYPE STRING,
KNZRG TYPE STRING,
NICHTBER_DETAILS TYPE STRING,
EINVF TYPE STRING,
LIMIT_GEBURTSTAG TYPE STRING,
ZUSTZL_KNZRG TYPE STRING,
GRUND_NICHTBER TYPE STRING,
ANZ_MON_P14A_CAL TYPE STRING,
RECHNUNG_ERH TYPE STRING,
RGVH_ALT TYPE STRING,
RGVH_NEU TYPE STRING,
ERHOEHUNG_CALC TYPE STRING,
LIMIT_ANIVERSARY TYPE STRING,
BES_AG_DATUM TYPE STRING,
BES_AG_LIMIT_J TYPE STRING,
BES_AG_LIMIT_M TYPE STRING,
ERHOEHUNG TYPE STRING,
RESULT_ERHOEHUNG TYPE STRING,
ANZ_MON_P14A TYPE STRING,
ANZ_MON_P14A_CAL TYPE STRING,
RGH_MANUELL TYPE STRING,
VOR_2002 TYPE STRING,
LIMIT_ANIVERSARY TYPE STRING,
LIMIT_J TYPE STRING,
UEBER_LIMIT_J TYPE STRING,
LIMIT_VH TYPE STRING,
GROESSER_LIMIT_VH TYPE STRING,
65_ANIVERSARY TYPE STRING,
RGVH_ALT TYPE STRING,
ERHOEHUNG_CALC TYPE STRING,
ERHOEHUNG_RESULT TYPE STRING,
ANZ_MONATE_MANUELL TYPE STRING,
DETAIL_CVPERIOD TYPE STRING,
DETAIL_CVPER_LGD TYPE STRING,
DETAIL_CVPER_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HRDEPBSCASENS_CLUSTER_P14A_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_HRDEPBSCASENS_CLUSTER_P14A_STR-HEADER sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-REQTYPE sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-STATUS sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-REQMODE sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ADMNSTR sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ADMNNAME sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-CHDATE sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-CHTIME sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-PSBEG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-PSEND sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-CALCVARIANT sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LOG_PSLAW sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-MOLGA sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-PSLAW sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-TRFAR sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-TRFGB sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-DATE sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LAW_DATE sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-WERKS sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-BTRTL sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-PERSG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-PERSK sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LOG_PSLAW_VADM sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-AUFRUF sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-GRDVF sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-EINVF sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-EINBV sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-KNZRG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-NICHTBER_DETAILS sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-EINVF sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LIMIT_GEBURTSTAG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ZUSTZL_KNZRG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-GRUND_NICHTBER sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ANZ_MON_P14A_CAL sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RECHNUNG_ERH sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RGVH_ALT sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RGVH_NEU sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ERHOEHUNG_CALC sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LIMIT_ANIVERSARY sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-BES_AG_DATUM sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-BES_AG_LIMIT_J sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-BES_AG_LIMIT_M sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ERHOEHUNG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RESULT_ERHOEHUNG sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ANZ_MON_P14A sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ANZ_MON_P14A_CAL sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RGH_MANUELL sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-VOR_2002 sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LIMIT_ANIVERSARY sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LIMIT_J sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-UEBER_LIMIT_J sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-LIMIT_VH sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-GROESSER_LIMIT_VH sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-65_ANIVERSARY sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-RGVH_ALT sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ERHOEHUNG_CALC sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ERHOEHUNG_RESULT sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-ANZ_MONATE_MANUELL sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-DETAIL_CVPERIOD sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-DETAIL_CVPER_LGD sy-vline 
WA_HRDEPBSCASENS_CLUSTER_P14A_STR-DETAIL_CVPER_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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