ABAP Select data from SAP table PMY_TAXEABL00Y_STR 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 PMY_TAXEABL00Y_STR 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 PMY_TAXEABL00Y_STR. 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 PMY_TAXEABL00Y_STR 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_PMY_TAXEABL00Y_STR TYPE STANDARD TABLE OF PMY_TAXEABL00Y_STR,
      WA_PMY_TAXEABL00Y_STR TYPE PMY_TAXEABL00Y_STR,
      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: <PMY_TAXEABL00Y_STR> TYPE PMY_TAXEABL00Y_STR.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PMY_TAXEABL00Y_STR
*  INTO TABLE @DATA(IT_PMY_TAXEABL00Y_STR2).
*--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_PMY_TAXEABL00Y_STR INDEX 1 INTO DATA(WA_PMY_TAXEABL00Y_STR2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PMY_TAXEABL00Y_STR>-IS_HEADER = 1.
<PMY_TAXEABL00Y_STR>-COMPANY = 1.
<PMY_TAXEABL00Y_STR>-PA = 1.
<PMY_TAXEABL00Y_STR>-PSA = 1.
<PMY_TAXEABL00Y_STR>-CC = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PMY_TAXEABL00Y_STR-ORGUNIT, sy-vline,
  WA_PMY_TAXEABL00Y_STR-EMP_NAME, sy-vline,
  WA_PMY_TAXEABL00Y_STR-PERNR, sy-vline,
  WA_PMY_TAXEABL00Y_STR-EGR, sy-vline,
  WA_PMY_TAXEABL00Y_STR-ESG, sy-vline,
  WA_PMY_TAXEABL00Y_STR-TOT_GROSS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PMY_TAXEABL00Y_STR 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_PMY_TAXEABL00Y_STR 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_PMY_TAXEABL00Y_STR INTO WA_PMY_TAXEABL00Y_STR.


*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 CC
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_PMY_TAXEABL00Y_STR-CC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PMY_TAXEABL00Y_STR-CC.
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_PMY_TAXEABL00Y_STR_STR, 
IS_HEADER TYPE STRING,
COMPANY TYPE STRING,
PA TYPE STRING,
PSA TYPE STRING,
CC TYPE STRING,
ORGUNIT TYPE STRING,
EMP_NAME TYPE STRING,
PERNR TYPE STRING,
EGR TYPE STRING,
ESG TYPE STRING,
TOT_GROSS TYPE STRING,
YEAR_EABL TYPE STRING,
IT_DATA TYPE STRING,
SUMMRY TYPE STRING,
AMOUNT TYPE STRING,
GS_EA_FORM1 TYPE STRING,
PFX TYPE STRING,
PER_NO TYPE STRING,
POS TYPE STRING,
IC_NO TYPE STRING,
MARST TYPE STRING,
SEX TYPE STRING,
EPF_NO TYPE STRING,
E_STRAS TYPE STRING,
E_LOCAT TYPE STRING,
E_ORT01 TYPE STRING,
E_ORT02 TYPE STRING,
E_PSTLZ TYPE STRING,
E_LAND1 TYPE STRING,
E_STATE TYPE STRING,
COMM_DT TYPE STRING,
CESS_DT TYPE STRING,
EMP_NAME TYPE STRING,
HUS_ADD1 TYPE STRING,
HUS_ADD2 TYPE STRING,
HUS_IC_NO TYPE STRING,
HUS_IT_NO TYPE STRING,
HUS_BRCH TYPE STRING,
PRERNAM1 TYPE STRING,
PSERNAM1 TYPE STRING,
PRERNAM2 TYPE STRING,
PSERNAM2 TYPE STRING,
BRCH TYPE STRING,
DT1 TYPE STRING,
DT2 TYPE STRING,
CNTRYTXT TYPE STRING,
REGTXT TYPE STRING,
FNAME TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
STREET TYPE STRING,
POST_CODE1 TYPE STRING,
CITY1 TYPE STRING,
CITY2 TYPE STRING,
GS_EA_FORM2 TYPE STRING,
SER_NO TYPE STRING,
IT_NO TYPE STRING,
ERF_NO TYPE STRING,
YER TYPE STRING,
YR TYPE STRING,
CHILD TYPE STRING,
W10 TYPE STRING,
W11 TYPE STRING,
W12 TYPE STRING,
W13 TYPE STRING,
W20 TYPE STRING,
W21 TYPE STRING,
W22 TYPE STRING,
W27 TYPE STRING,
W28 TYPE STRING,
W29 TYPE STRING,
W2A TYPE STRING,
W2B TYPE STRING,
W2C TYPE STRING,
W2D TYPE STRING,
W2E TYPE STRING,
W30 TYPE STRING,
W40 TYPE STRING,
W50 TYPE STRING,
W60 TYPE STRING,
W70 TYPE STRING,
WTT TYPE STRING,
WE0 TYPE STRING,
WFR TYPE STRING,
CRD TYPE STRING,
CMO TYPE STRING,
CYR TYPE STRING,
CNM TYPE STRING,
VAL_ADDR TYPE STRING,
STD_AMT TYPE STRING,
FND_NAM TYPE STRING,
YOWP TYPE STRING,
TOI TYPE STRING,
AMT TYPE STRING,
CONT_EPF TYPE STRING,
YOW1 TYPE STRING,
TO1 TYPE STRING,
AM1 TYPE STRING,
CONT_EP1 TYPE STRING,
IT_EASL_DATA TYPE STRING,
IS_EASL_DATA1 TYPE STRING,
TOT_LISTED_EMP TYPE STRING,
TOT_OTHER_EMP TYPE STRING,
TOT_EMP TYPE STRING,
TOT_EMP_LISTED_SAL TYPE STRING,
TOT_OTHEREMP_SAL TYPE STRING,
TOT_EMP_SAL TYPE STRING,
TOT_STD_SAL TYPE STRING,
IT_EASL_DATA_LAST TYPE STRING,
WAERS TYPE STRING,
YEAR TYPE STRING,
TEMP_SEQNR TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PMY_TAXEABL00Y_STR_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_PMY_TAXEABL00Y_STR_STR-IS_HEADER sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-COMPANY sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PA sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PSA sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CC sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-ORGUNIT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-EMP_NAME sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PERNR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-EGR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-ESG sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_GROSS sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YEAR_EABL sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IT_DATA sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-SUMMRY sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-AMOUNT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-GS_EA_FORM1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PFX sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PER_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-POS sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IC_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-MARST sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-SEX sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-EPF_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_STRAS sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_LOCAT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_ORT01 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_ORT02 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_PSTLZ sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_LAND1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-E_STATE sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-COMM_DT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CESS_DT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-EMP_NAME sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-HUS_ADD1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-HUS_ADD2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-HUS_IC_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-HUS_IT_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-HUS_BRCH sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PRERNAM1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PSERNAM1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PRERNAM2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-PSERNAM2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-BRCH sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-DT1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-DT2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CNTRYTXT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-REGTXT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-FNAME sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-NAME1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-NAME2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-STREET sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-POST_CODE1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CITY1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CITY2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-GS_EA_FORM2 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-SER_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IT_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-ERF_NO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YER sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CHILD sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W10 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W11 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W12 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W13 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W20 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W21 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W22 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W27 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W28 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W29 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W2A sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W2B sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W2C sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W2D sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W2E sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W30 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W40 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W50 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W60 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-W70 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-WTT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-WE0 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-WFR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CRD sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CMO sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CYR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CNM sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-VAL_ADDR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-STD_AMT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-FND_NAM sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YOWP sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOI sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-AMT sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CONT_EPF sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YOW1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TO1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-AM1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-CONT_EP1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IT_EASL_DATA sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IS_EASL_DATA1 sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_LISTED_EMP sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_OTHER_EMP sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_EMP sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_EMP_LISTED_SAL sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_OTHEREMP_SAL sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_EMP_SAL sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TOT_STD_SAL sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-IT_EASL_DATA_LAST sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-WAERS sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-YEAR sy-vline 
WA_PMY_TAXEABL00Y_STR_STR-TEMP_SEQNR sy-vline      INTO ld_text SEPARATED BY SPACE.

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