ABAP Select data from SAP table HRDEPBSCAS_CLUSTER_NACHVERS 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 HRDEPBSCAS_CLUSTER_NACHVERS 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 HRDEPBSCAS_CLUSTER_NACHVERS. 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 HRDEPBSCAS_CLUSTER_NACHVERS 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_HRDEPBSCAS_CLUSTER_NACHVERS TYPE STANDARD TABLE OF HRDEPBSCAS_CLUSTER_NACHVERS,
      WA_HRDEPBSCAS_CLUSTER_NACHVERS TYPE HRDEPBSCAS_CLUSTER_NACHVERS,
      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: <HRDEPBSCAS_CLUSTER_NACHVERS> TYPE HRDEPBSCAS_CLUSTER_NACHVERS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRDEPBSCAS_CLUSTER_NACHVERS
*  INTO TABLE @DATA(IT_HRDEPBSCAS_CLUSTER_NACHVERS2).
*--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_HRDEPBSCAS_CLUSTER_NACHVERS INDEX 1 INTO DATA(WA_HRDEPBSCAS_CLUSTER_NACHVERS2).


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

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

ENDLOOP.

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

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


*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 ADR_NEU_AG
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_HRDEPBSCAS_CLUSTER_NACHVERS-ADR_NEU_AG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRDEPBSCAS_CLUSTER_NACHVERS-ADR_NEU_AG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field GEBURTSDATUM
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_HRDEPBSCAS_CLUSTER_NACHVERS-GEBURTSDATUM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRDEPBSCAS_CLUSTER_NACHVERS-GEBURTSDATUM.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field ABW_ADRNR_GER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_HRDEPBSCAS_CLUSTER_NACHVERS-ABW_ADRNR_GER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRDEPBSCAS_CLUSTER_NACHVERS-ABW_ADRNR_GER.
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_HRDEPBSCAS_CLUSTER_NACHVERS_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,
CALC_TIME TYPE STRING,
RESULT_IDS TYPE STRING,
GRUNDDATEN TYPE STRING,
APRFNR TYPE STRING,
BERECH_ART TYPE STRING,
BERECH_GRND TYPE STRING,
OBJPS_REF TYPE STRING,
NVBEGDA TYPE STRING,
NVENDDA TYPE STRING,
RVNUM TYPE STRING,
MITNR TYPE STRING,
BESCH_ART TYPE STRING,
PABNR TYPE STRING,
PABNR_2 TYPE STRING,
AUFSCH_BEGDA TYPE STRING,
AUFSCH_ART TYPE STRING,
AUFSCH_GRND TYPE STRING,
AUFSCH_BESCH_ART TYPE STRING,
AUFSCH_AMTSBEZ TYPE STRING,
ADR_NEU_AG TYPE STRING,
MITNR_BV TYPE STRING,
DH_NEU_AUFSCHUB TYPE STRING,
RECHTSGRUNDLAGE TYPE STRING,
BERECHNUNG TYPE STRING,
NVBET TYPE STRING,
NVBET_MAN TYPE STRING,
KUERZ_P225 TYPE STRING,
KUERZ_P225_MAN TYPE STRING,
BUDAT_RVTRGER TYPE STRING,
ANZMON_SAZUS TYPE STRING,
ANZMON_SAZUS_MAN TYPE STRING,
SAZUS TYPE STRING,
SAZUS_MAN TYPE STRING,
UEBBET_OLD TYPE STRING,
ABRDAT_OLD TYPE STRING,
UEBBET TYPE STRING,
FORDBET TYPE STRING,
EINBET TYPE STRING,
WAERS TYPE STRING,
BERECH_DATUM TYPE STRING,
ERST_P225 TYPE STRING,
ERST_P225_MAN TYPE STRING,
SUMME_DYN_ENTGELT TYPE STRING,
BEITRAGSSATZ TYPE STRING,
BEWERTETE_ANZR TYPE STRING,
PERIODS TYPE STRING,
EINMALZAHLUNGEN TYPE STRING,
ANFRAGE_FAMG TYPE STRING,
EHE_NUMMER TYPE STRING,
DATUM_ANFRAGE TYPE STRING,
DATUM_EHE_VON TYPE STRING,
DATUM_EHE_BIS TYPE STRING,
DATUM_VB_EHE_VON TYPE STRING,
DATUM_VB_EHE_BIS TYPE STRING,
VORNAME TYPE STRING,
NAME TYPE STRING,
GEBURTSNAME TYPE STRING,
GEBURTSDATUM TYPE STRING,
GERICHT TYPE STRING,
ADRNR_GERICHT TYPE STRING,
AKTENZ_VERS_AUSG TYPE STRING,
ANTRAGSTELLER TYPE STRING,
EINGETR_LEBENSPARTNERSCHAFT TYPE STRING,
DIFF_ANZR TYPE STRING,
ANZR_DYN_VOR TYPE STRING,
URTEIL TYPE STRING,
DATUM_URTEIL_VOM TYPE STRING,
DATUM_RECHTSKR TYPE STRING,
ART_VERFAHREN TYPE STRING,
VERS_AUSGLEICH TYPE STRING,
BEGR_BETRAG TYPE STRING,
BEGR_BETRAG_WAER TYPE STRING,
DATUM_WIRKSAM_AB TYPE STRING,
TRFGB_RENTE TYPE STRING,
ABW_GERICHT TYPE STRING,
ABW_ADRNR_GER TYPE STRING,
ABW_AKTENZ TYPE STRING,
ANTRAGSTELLER TYPE STRING,
ABFINDUNG TYPE STRING,
ABFINDUNG TYPE STRING,
SOLDAT_AUF_ZEIT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HRDEPBSCAS_CLUSTER_NACHVERS_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_HRDEPBSCAS_CLUSTER_NACHVERS_STR-HEADER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-REQTYPE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-STATUS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-REQMODE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ADMNSTR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ADMNNAME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-CHDATE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-CHTIME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-PSBEG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-PSEND sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-CALCVARIANT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-CALC_TIME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-RESULT_IDS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-GRUNDDATEN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-APRFNR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BERECH_ART sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BERECH_GRND sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-OBJPS_REF sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-NVBEGDA sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-NVENDDA sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-RVNUM sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-MITNR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BESCH_ART sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-PABNR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-PABNR_2 sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AUFSCH_BEGDA sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AUFSCH_ART sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AUFSCH_GRND sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AUFSCH_BESCH_ART sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AUFSCH_AMTSBEZ sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ADR_NEU_AG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-MITNR_BV sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DH_NEU_AUFSCHUB sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-RECHTSGRUNDLAGE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BERECHNUNG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-NVBET sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-NVBET_MAN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-KUERZ_P225 sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-KUERZ_P225_MAN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BUDAT_RVTRGER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANZMON_SAZUS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANZMON_SAZUS_MAN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-SAZUS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-SAZUS_MAN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-UEBBET_OLD sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABRDAT_OLD sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-UEBBET sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-FORDBET sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-EINBET sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-WAERS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BERECH_DATUM sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ERST_P225 sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ERST_P225_MAN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-SUMME_DYN_ENTGELT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BEITRAGSSATZ sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BEWERTETE_ANZR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-PERIODS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-EINMALZAHLUNGEN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANFRAGE_FAMG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-EHE_NUMMER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_ANFRAGE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_EHE_VON sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_EHE_BIS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_VB_EHE_VON sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_VB_EHE_BIS sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-VORNAME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-NAME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-GEBURTSNAME sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-GEBURTSDATUM sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-GERICHT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ADRNR_GERICHT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-AKTENZ_VERS_AUSG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANTRAGSTELLER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-EINGETR_LEBENSPARTNERSCHAFT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DIFF_ANZR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANZR_DYN_VOR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-URTEIL sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_URTEIL_VOM sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_RECHTSKR sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ART_VERFAHREN sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-VERS_AUSGLEICH sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BEGR_BETRAG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-BEGR_BETRAG_WAER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-DATUM_WIRKSAM_AB sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-TRFGB_RENTE sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABW_GERICHT sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABW_ADRNR_GER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABW_AKTENZ sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ANTRAGSTELLER sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABFINDUNG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-ABFINDUNG sy-vline 
WA_HRDEPBSCAS_CLUSTER_NACHVERS_STR-SOLDAT_AUF_ZEIT sy-vline      INTO ld_text SEPARATED BY SPACE.

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