ABAP Select data from SAP table HRPAYFR_S_PY_TDC_FU_CUST 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 HRPAYFR_S_PY_TDC_FU_CUST 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 HRPAYFR_S_PY_TDC_FU_CUST. 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 HRPAYFR_S_PY_TDC_FU_CUST 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_HRPAYFR_S_PY_TDC_FU_CUST TYPE STANDARD TABLE OF HRPAYFR_S_PY_TDC_FU_CUST,
      WA_HRPAYFR_S_PY_TDC_FU_CUST TYPE HRPAYFR_S_PY_TDC_FU_CUST,
      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: <HRPAYFR_S_PY_TDC_FU_CUST> TYPE HRPAYFR_S_PY_TDC_FU_CUST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRPAYFR_S_PY_TDC_FU_CUST
*  INTO TABLE @DATA(IT_HRPAYFR_S_PY_TDC_FU_CUST2).
*--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_HRPAYFR_S_PY_TDC_FU_CUST INDEX 1 INTO DATA(WA_HRPAYFR_S_PY_TDC_FU_CUST2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRPAYFR_S_PY_TDC_FU_CUST>-FEATURES = 1.
<HRPAYFR_S_PY_TDC_FU_CUST>-TAB_T511K = 1.
<HRPAYFR_S_PY_TDC_FU_CUST>-TAB_T511P = 1.
<HRPAYFR_S_PY_TDC_FU_CUST>-TAB_T001P = 1.
<HRPAYFR_S_PY_TDC_FU_CUST>-TAB_T5F42 = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_T5F1R, sy-vline,
  WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_T5F1P, sy-vline,
  WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_T500P, sy-vline,
  WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_T5FPR, sy-vline,
  WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_T5FWG, sy-vline,
  WA_HRPAYFR_S_PY_TDC_FU_CUST-TAB_SOUWT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_HRPAYFR_S_PY_TDC_FU_CUST 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_HRPAYFR_S_PY_TDC_FU_CUST 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_HRPAYFR_S_PY_TDC_FU_CUST INTO WA_HRPAYFR_S_PY_TDC_FU_CUST.


*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 GJAHR, internal->external for field PABRJ
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_HRPAYFR_S_PY_TDC_FU_CUST-PABRJ
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRPAYFR_S_PY_TDC_FU_CUST-PABRJ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field UABRJ
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_HRPAYFR_S_PY_TDC_FU_CUST-UABRJ
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_HRPAYFR_S_PY_TDC_FU_CUST-UABRJ.
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_HRPAYFR_S_PY_TDC_FU_CUST_STR, 
FEATURES TYPE STRING,
TAB_T511K TYPE STRING,
TAB_T511P TYPE STRING,
TAB_T001P TYPE STRING,
TAB_T5F42 TYPE STRING,
TAB_T5F1R TYPE STRING,
TAB_T5F1P TYPE STRING,
TAB_T500P TYPE STRING,
TAB_T5FPR TYPE STRING,
TAB_T5FWG TYPE STRING,
TAB_SOUWT TYPE STRING,
TAB_T5FDSNABCAT TYPE STRING,
TAB_T549B TYPE STRING,
TAB_T5F30 TYPE STRING,
TAB_T549Q TYPE STRING,
TAB_T549A TYPE STRING,
TAB_T549S TYPE STRING,
TAB_T596C TYPE STRING,
TAB_T596D TYPE STRING,
TAB_T5FDSNCONDI TYPE STRING,
TAB_T5FDSNCODCO TYPE STRING,
TAB_T5FDSNCOTIS2 TYPE STRING,
TAB_SUBROGATION_PERIOD TYPE STRING,
TAB_T5FCPA TYPE STRING,
TAB_T5FCP1P TYPE STRING,
TAB_T5F1C TYPE STRING,
TAB_T5F1P_PERIOD TYPE STRING,
TAB_T5FSCPA TYPE STRING,
TAB_T5FCPO TYPE STRING,
TAB_T5FCPP TYPE STRING,
TAB_T5FDSNOPSPYMA TYPE STRING,
TAB_T596NV TYPE STRING,
TAB_T596M TYPE STRING,
TAB_T596MD TYPE STRING,
TAB_T5FDSNOPSID TYPE STRING,
TAB_T5FDSNCODCN TYPE STRING,
TAB_T5FDSNPAVAL TYPE STRING,
T569V TYPE STRING,
MANDT TYPE STRING,
ABKRS TYPE STRING,
VWSAZ TYPE STRING,
PABRJ TYPE STRING,
PABRP TYPE STRING,
STATE TYPE STRING,
SRTFD TYPE STRING,
UABRJ TYPE STRING,
UABRP TYPE STRING,
ADRUN TYPE STRING,
TAB_T5F99FMAP_FIELDS TYPE STRING,
TAB_T5F99FMAP TYPE STRING,
TAB_T5F99FMAPS TYPE STRING,
TAB_T5FPASBAREME TYPE STRING,
TAB_T5FPBS4G TYPE STRING,
TAB_T5FPBS4C TYPE STRING,
TAB_T5F49R TYPE STRING,
TAB_T5F16REASN TYPE STRING,
TAB_T5FPBS4B TYPE STRING,
TAB_T5F21 TYPE STRING,
TAB_T5F22 TYPE STRING,
TAB_T5F03 TYPE STRING,
TAB_T5F2E TYPE STRING,
TAB_T554S TYPE STRING,
TAB_T5FPBS1A TYPE STRING,
TAB_T5FPASCATEGE TYPE STRING,
TAB_T5FPASCATEGET TYPE STRING,
TAB_T5FPASCATEG TYPE STRING,END OF T_EKKO_STR.
DATA: WA_HRPAYFR_S_PY_TDC_FU_CUST_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_HRPAYFR_S_PY_TDC_FU_CUST_STR-FEATURES sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T511K sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T511P sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T001P sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F42 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F1R sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F1P sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T500P sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPR sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FWG sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_SOUWT sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNABCAT sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T549B sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F30 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T549Q sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T549A sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T549S sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T596C sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T596D sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNCONDI sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNCODCO sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNCOTIS2 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_SUBROGATION_PERIOD sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FCPA sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FCP1P sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F1C sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F1P_PERIOD sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FSCPA sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FCPO sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FCPP sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNOPSPYMA sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T596NV sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T596M sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T596MD sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNOPSID sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNCODCN sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FDSNPAVAL sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-T569V sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-MANDT sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-ABKRS sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-VWSAZ sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-PABRJ sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-PABRP sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-STATE sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-SRTFD sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-UABRJ sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-UABRP sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-ADRUN sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F99FMAP_FIELDS sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F99FMAP sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F99FMAPS sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPASBAREME sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPBS4G sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPBS4C sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F49R sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F16REASN sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPBS4B sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F21 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F22 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F03 sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5F2E sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T554S sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPBS1A sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPASCATEGE sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPASCATEGET sy-vline 
WA_HRPAYFR_S_PY_TDC_FU_CUST_STR-TAB_T5FPASCATEG sy-vline      INTO ld_text SEPARATED BY SPACE.

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