ABAP Select data from SAP table HRPAYFR_S_DSN_TDC_SECTN_CONST 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 HRPAYFR_S_DSN_TDC_SECTN_CONST 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_DSN_TDC_SECTN_CONST. 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_DSN_TDC_SECTN_CONST 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_DSN_TDC_SECTN_CONST TYPE STANDARD TABLE OF HRPAYFR_S_DSN_TDC_SECTN_CONST,
      WA_HRPAYFR_S_DSN_TDC_SECTN_CONST TYPE HRPAYFR_S_DSN_TDC_SECTN_CONST,
      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_DSN_TDC_SECTN_CONST> TYPE HRPAYFR_S_DSN_TDC_SECTN_CONST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM HRPAYFR_S_DSN_TDC_SECTN_CONST
*  INTO TABLE @DATA(IT_HRPAYFR_S_DSN_TDC_SECTN_CONST2).
*--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_DSN_TDC_SECTN_CONST INDEX 1 INTO DATA(WA_HRPAYFR_S_DSN_TDC_SECTN_CONST2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_HRPAYFR_S_DSN_TDC_SECTN_CONST ASSIGNING <HRPAYFR_S_DSN_TDC_SECTN_CONST>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<HRPAYFR_S_DSN_TDC_SECTN_CONST>-CODAQ = 1.
<HRPAYFR_S_DSN_TDC_SECTN_CONST>-PERNR = 1.
<HRPAYFR_S_DSN_TDC_SECTN_CONST>-BEGDA = 1.
<HRPAYFR_S_DSN_TDC_SECTN_CONST>-ENDDA = 1.
<HRPAYFR_S_DSN_TDC_SECTN_CONST>-WAERS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-ABKRS, sy-vline,
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-PERMO, sy-vline,
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-BEGPER, sy-vline,
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-ENDPER, sy-vline,
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-INPER_LST, sy-vline,
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-INPER_ACT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_HRPAYFR_S_DSN_TDC_SECTN_CONST 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_DSN_TDC_SECTN_CONST 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_DSN_TDC_SECTN_CONST INTO WA_HRPAYFR_S_DSN_TDC_SECTN_CONST. *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_DSN_TDC_SECTN_CONST-PABRJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_HRPAYFR_S_DSN_TDC_SECTN_CONST-PABRJ.
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_DSN_TDC_SECTN_CONST_STR,
CODAQ TYPE STRING,
PERNR TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
WAERS TYPE STRING,
ABKRS TYPE STRING,
PERMO TYPE STRING,
BEGPER TYPE STRING,
ENDPER TYPE STRING,
INPER_LST TYPE STRING,
INPER_ACT TYPE STRING,
ACTUAL TYPE STRING,
NOPAY TYPE STRING,
NOCONDT TYPE STRING,
SEL_PARAM TYPE STRING,
MOLGA TYPE STRING,
APPL TYPE STRING,
DENAT TYPE STRING,
RDNAT TYPE STRING,
DETYP TYPE STRING,
RDTYP TYPE STRING,
DEFRC TYPE STRING,
DECHA TYPE STRING,
DEMOI TYPE STRING,
ABKRS TYPE STRING,
PERMO TYPE STRING,
PABRJ TYPE STRING,
PABRP TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
DCATH TYPE STRING,
OSELS TYPE STRING,
SIRET_RANGE TYPE STRING,
CDREF TYPE STRING,
HSAVE TYPE STRING,
CILTY TYPE STRING,
NOITC TYPE STRING,
REFNV TYPE STRING,
B2TXT TYPE STRING,
SECTN TYPE STRING,
RSECTN TYPE STRING,
TRANSPORT TYPE STRING,
OWRTE_CUST TYPE STRING,
OWRTE_INPUT TYPE STRING,
OWRTE_EXP_RESULT TYPE STRING,
OWRTE_INSTANCE TYPE STRING,
ECATT_INT_GEN TYPE STRING,
ATHD TYPE STRING,
NON2F TYPE STRING,
NON2FD TYPE STRING,
APLTX TYPE STRING,
ALLI1 TYPE STRING,
FPERN TYPE STRING,
FPERT TYPE STRING,
NBDSN TYPE STRING,
DEBEG TYPE STRING,
CLSTR TYPE STRING,
KEEP_REFERENCES TYPE STRING,
ESECT TYPE STRING,
UNAME TYPE STRING,
CUMUL TYPE STRING,
SORTR TYPE STRING,
CODET TYPE STRING,
MITSV TYPE STRING,
BACOD_TAB TYPE STRING,
AGCOD_TAB TYPE STRING,
BEDIT TYPE STRING,
MITCO TYPE STRING,
DO_ROUNDING TYPE STRING,
MITSVI TYPE STRING,
COCAR TYPE STRING,
B20SP TYPE STRING,
OSELP TYPE STRING,
CCINT TYPE STRING,
ICDET TYPE STRING,
B20UP TYPE STRING,
B78SO TYPE STRING,
SHNSH TYPE STRING,
CCPER TYPE STRING,
B44HP TYPE STRING,
SLPER TYPE STRING,
PTDEP TYPE STRING,
TYENV TYPE STRING,
EMENV TYPE STRING,
TRTYP TYPE STRING,
PB2A TYPE STRING,
EMSIR TYPE STRING,
CEME TYPE STRING,
DCRE TYPE STRING,
FOVER TYPE STRING,
PACK TYPE STRING,
SRVGRP TYPE STRING,
PACKID TYPE STRING,
FCTUID TYPE STRING,
FCTU2 TYPE STRING,
EXPFI TYPE STRING,
FCTUVA TYPE STRING,
FCTOLD TYPE STRING,
MITIC TYPE STRING,
LOGIC TYPE STRING,
TAB_PERNR TYPE STRING,END OF T_EKKO_STR. DATA: WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_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_DSN_TDC_SECTN_CONST_STR-CODAQ sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PERNR sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-BEGDA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ENDDA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-WAERS sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ABKRS sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PERMO sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-BEGPER sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ENDPER sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-INPER_LST sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-INPER_ACT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ACTUAL sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NOPAY sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NOCONDT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SEL_PARAM sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-MOLGA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-APPL sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DENAT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-RDNAT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DETYP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-RDTYP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DEFRC sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DECHA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DEMOI sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ABKRS sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PERMO sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PABRJ sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PABRP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-BEGDA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ENDDA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DCATH sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OSELS sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SIRET_RANGE sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CDREF sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-HSAVE sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CILTY sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NOITC sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-REFNV sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-B2TXT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SECTN sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-RSECTN sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-TRANSPORT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OWRTE_CUST sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OWRTE_INPUT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OWRTE_EXP_RESULT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OWRTE_INSTANCE sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ECATT_INT_GEN sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ATHD sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NON2F sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NON2FD sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-APLTX sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ALLI1 sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FPERN sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FPERT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-NBDSN sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DEBEG sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CLSTR sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-KEEP_REFERENCES sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ESECT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-UNAME sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CUMUL sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SORTR sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CODET sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-MITSV sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-BACOD_TAB sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-AGCOD_TAB sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-BEDIT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-MITCO sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DO_ROUNDING sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-MITSVI sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-COCAR sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-B20SP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-OSELP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CCINT sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-ICDET sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-B20UP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-B78SO sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SHNSH sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CCPER sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-B44HP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SLPER sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PTDEP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-TYENV sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-EMENV sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-TRTYP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PB2A sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-EMSIR sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-CEME sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-DCRE sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FOVER sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PACK sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-SRVGRP sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-PACKID sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FCTUID sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FCTU2 sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-EXPFI sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FCTUVA sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-FCTOLD sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-MITIC sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-LOGIC sy-vline
WA_HRPAYFR_S_DSN_TDC_SECTN_CONST_STR-TAB_PERNR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.