ABAP Select data from SAP table HRPADRU_S_SVTD_ALV 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 HRPADRU_S_SVTD_ALV 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 HRPADRU_S_SVTD_ALV. 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 HRPADRU_S_SVTD_ALV 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_HRPADRU_S_SVTD_ALV TYPE STANDARD TABLE OF HRPADRU_S_SVTD_ALV,
      WA_HRPADRU_S_SVTD_ALV TYPE HRPADRU_S_SVTD_ALV,
      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: <HRPADRU_S_SVTD_ALV> TYPE HRPADRU_S_SVTD_ALV.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRPADRU_S_SVTD_ALV
*  INTO TABLE @DATA(IT_HRPADRU_S_SVTD_ALV2).
*--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_HRPADRU_S_SVTD_ALV INDEX 1 INTO DATA(WA_HRPADRU_S_SVTD_ALV2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRPADRU_S_SVTD_ALV>-REPORT_YEAR = 1.
<HRPADRU_S_SVTD_ALV>-REPORT_MONTH = 1.
<HRPADRU_S_SVTD_ALV>-REPORT_MONTH_TEXT = 1.
<HRPADRU_S_SVTD_ALV>-FILING_DATE = 1.
<HRPADRU_S_SVTD_ALV>-REGNO = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRPADRU_S_SVTD_ALV-LNAME, sy-vline,
  WA_HRPADRU_S_SVTD_ALV-INN, sy-vline,
  WA_HRPADRU_S_SVTD_ALV-KPP, sy-vline,
  WA_HRPADRU_S_SVTD_ALV-HEAD_POSITION, sy-vline,
  WA_HRPADRU_S_SVTD_ALV-HEAD_FULL_NAME, sy-vline,
  WA_HRPADRU_S_SVTD_ALV-PRED_REGNO, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_HRPADRU_S_SVTD_ALV 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_HRPADRU_S_SVTD_ALV 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_HRPADRU_S_SVTD_ALV INTO WA_HRPADRU_S_SVTD_ALV.


*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 PDATE, internal->external for field BIRTH_DATE
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_HRPADRU_S_SVTD_ALV-BIRTH_DATE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRPADRU_S_SVTD_ALV-BIRTH_DATE.
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_HRPADRU_S_SVTD_ALV_STR, 
REPORT_YEAR TYPE STRING,
REPORT_MONTH TYPE STRING,
REPORT_MONTH_TEXT TYPE STRING,
FILING_DATE TYPE STRING,
REGNO TYPE STRING,
LNAME TYPE STRING,
INN TYPE STRING,
KPP TYPE STRING,
HEAD_POSITION TYPE STRING,
HEAD_FULL_NAME TYPE STRING,
PRED_REGNO TYPE STRING,
PRED_LNAME TYPE STRING,
PRED_INN TYPE STRING,
PRED_KPP TYPE STRING,
EMPLOYEE_NAME TYPE STRING,
SNILS TYPE STRING,
BIRTH_DATE TYPE STRING,
ACTION_TYPE TYPE STRING,
RECALL_DATE TYPE STRING,
EVENT_DATE TYPE STRING,
EVENT_CODE TYPE STRING,
EVENT_TYPE TYPE STRING,
INFORMATION TYPE STRING,
WORKING_CONDITIONS_CODE TYPE STRING,
EVENT_POSITION TYPE STRING,
CONCR_EMPL TYPE STRING,
DEPARTMENT TYPE STRING,
ACTIVITY_TYPE TYPE STRING,
POSITION_CODE TYPE STRING,
OKZ_FUNCTION_CODE TYPE STRING,
LEAVING_ARTICLE TYPE STRING,
LEAVING_SECTN TYPE STRING,
LEAVING_PARAGRAPH TYPE STRING,
LEAVING_SUBPARAGRAPH TYPE STRING,
LEAVING_SUBSECTION TYPE STRING,
LEAVING_BASIS_DOCUMENT TYPE STRING,
LEAVING_BASIS_ARTICLE TYPE STRING,
LEAVING_BASIS_SECTN TYPE STRING,
LEAVING_BASIS_PARAGRAPH TYPE STRING,
LEAVING_BASIS_SUBPARAGRAPH TYPE STRING,
LEAVING_BASIS_SUBSECTION TYPE STRING,
LEAVING_REASON TYPE STRING,
DATE_FROM TYPE STRING,
DATE_TO TYPE STRING,
TYPE01 TYPE STRING,
NAME01 TYPE STRING,
DOCDAT01 TYPE STRING,
SERIES01 TYPE STRING,
DOCNO01 TYPE STRING,
TYPE02 TYPE STRING,
NAME02 TYPE STRING,
DOCDAT02 TYPE STRING,
SERIES02 TYPE STRING,
DOCNO02 TYPE STRING,
STSUBTY TYPE STRING,
STTYPE TYPE STRING,
STDAT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HRPADRU_S_SVTD_ALV_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_HRPADRU_S_SVTD_ALV_STR-REPORT_YEAR sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-REPORT_MONTH sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-REPORT_MONTH_TEXT sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-FILING_DATE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-REGNO sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LNAME sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-INN sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-KPP sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-HEAD_POSITION sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-HEAD_FULL_NAME sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-PRED_REGNO sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-PRED_LNAME sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-PRED_INN sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-PRED_KPP sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-EMPLOYEE_NAME sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-SNILS sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-BIRTH_DATE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-ACTION_TYPE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-RECALL_DATE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-EVENT_DATE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-EVENT_CODE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-EVENT_TYPE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-INFORMATION sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-WORKING_CONDITIONS_CODE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-EVENT_POSITION sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-CONCR_EMPL sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DEPARTMENT sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-ACTIVITY_TYPE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-POSITION_CODE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-OKZ_FUNCTION_CODE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_ARTICLE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_SECTN sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_PARAGRAPH sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_SUBPARAGRAPH sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_SUBSECTION sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_DOCUMENT sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_ARTICLE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_SECTN sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_PARAGRAPH sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_SUBPARAGRAPH sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_BASIS_SUBSECTION sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-LEAVING_REASON sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DATE_FROM sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DATE_TO sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-TYPE01 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-NAME01 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DOCDAT01 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-SERIES01 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DOCNO01 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-TYPE02 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-NAME02 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DOCDAT02 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-SERIES02 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-DOCNO02 sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-STSUBTY sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-STTYPE sy-vline 
WA_HRPADRU_S_SVTD_ALV_STR-STDAT sy-vline      INTO ld_text SEPARATED BY SPACE.

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