ABAP Select data from SAP table FIKZD_PROPTAX 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 FIKZD_PROPTAX 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 FIKZD_PROPTAX. 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 FIKZD_PROPTAX 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_FIKZD_PROPTAX TYPE STANDARD TABLE OF FIKZD_PROPTAX,
      WA_FIKZD_PROPTAX TYPE FIKZD_PROPTAX,
      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: <FIKZD_PROPTAX> TYPE FIKZD_PROPTAX.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FIKZD_PROPTAX
*  INTO TABLE @DATA(IT_FIKZD_PROPTAX2).
*--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_FIKZD_PROPTAX INDEX 1 INTO DATA(WA_FIKZD_PROPTAX2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FIKZD_PROPTAX ASSIGNING <FIKZD_PROPTAX>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FIKZD_PROPTAX>-MANDT = 1.
<FIKZD_PROPTAX>-BUKRS = 1.
<FIKZD_PROPTAX>-ANLN1 = 1.
<FIKZD_PROPTAX>-ANLN2 = 1.
<FIKZD_PROPTAX>-GJAHR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FIKZD_PROPTAX-LNRAN, sy-vline,
WA_FIKZD_PROPTAX-LAUFI, sy-vline,
WA_FIKZD_PROPTAX-PTAX_TYPE, sy-vline,
WA_FIKZD_PROPTAX-BUDAT, sy-vline,
WA_FIKZD_PROPTAX-ANLKL, sy-vline,
WA_FIKZD_PROPTAX-AFABE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FIKZD_PROPTAX 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_FIKZD_PROPTAX 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_FIKZD_PROPTAX INTO WA_FIKZD_PROPTAX. *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 ANLN1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-ANLN1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-ANLN1.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-GJAHR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU212, internal->external for field APC CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-APC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-APC.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field DEPR CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-DEPR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-DEPR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field POST_DEPR CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-POST_DEPR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-POST_DEPR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field AVGNBV CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-AVGNBV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-AVGNBV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV01 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV01 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV01.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV02 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV02 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV02.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV03 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV03 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV03.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV04 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV04 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV04.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV05 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV05 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV05.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV06 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV06 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV06.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV07 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV07 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV07.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV08 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV08 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV08.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV09 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV09 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV09.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV10 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV10 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV10.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV11 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV11 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV11.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV12 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV12 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV12.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU212, internal->external for field NBV13 CALL FUNCTION 'CONVERSION_EXIT_AU212_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-NBV13 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-NBV13.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX1 CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX2 CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX3 CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX4 CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX4 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX4.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX_CURR CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX_CURR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX_CURR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX_YEAR CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX_YEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX_YEAR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC185, internal->external for field PRTAX_TO_PAY CALL FUNCTION 'CONVERSION_EXIT_AC185_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-PRTAX_TO_PAY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-PRTAX_TO_PAY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FIKZD_PROPTAX-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FIKZD_PROPTAX-LIFNR.
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_FIKZD_PROPTAX_STR,
MANDT TYPE STRING,
BUKRS TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
GJAHR TYPE STRING,
LNRAN TYPE STRING,
LAUFI TYPE STRING,
PTAX_TYPE TYPE STRING,
BUDAT TYPE STRING,
ANLKL TYPE STRING,
AFABE TYPE STRING,
KOSTL TYPE STRING,
WERKS TYPE STRING,
GSBER TYPE STRING,
STORT TYPE STRING,
CAUFN TYPE STRING,
RAUMN TYPE STRING,
PERNR TYPE STRING,
BWASL TYPE STRING,
APC TYPE STRING,
DEPR TYPE STRING,
POST_DEPR TYPE STRING,
NBV TYPE STRING,
AVGNBV TYPE STRING,
NBV01 TYPE STRING,
NBV02 TYPE STRING,
NBV03 TYPE STRING,
NBV04 TYPE STRING,
NBV05 TYPE STRING,
NBV06 TYPE STRING,
NBV07 TYPE STRING,
NBV08 TYPE STRING,
NBV09 TYPE STRING,
NBV10 TYPE STRING,
NBV11 TYPE STRING,
NBV12 TYPE STRING,
NBV13 TYPE STRING,
PRTAX1 TYPE STRING,
PRTAX2 TYPE STRING,
PRTAX3 TYPE STRING,
PRTAX4 TYPE STRING,
PRTAX_CURR TYPE STRING,
PRTAX_YEAR TYPE STRING,
PRTAX_TO_PAY TYPE STRING,
PROPTYPE TYPE STRING,
OKATO TYPE STRING,
REGION TYPE STRING,
DISTRICT TYPE STRING,
PRIVILEGE TYPE STRING,
EXEMPTION TYPE STRING,
RATE TYPE STRING,
INVNR TYPE STRING,
LIFNR TYPE STRING,
MONTHBEG TYPE STRING,
MONTHEND TYPE STRING,
ERRORCODE TYPE STRING,
ICON TYPE STRING,
AKTIV TYPE STRING,
DEAKT TYPE STRING,END OF T_EKKO_STR. DATA: WA_FIKZD_PROPTAX_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_FIKZD_PROPTAX_STR-MANDT sy-vline
WA_FIKZD_PROPTAX_STR-BUKRS sy-vline
WA_FIKZD_PROPTAX_STR-ANLN1 sy-vline
WA_FIKZD_PROPTAX_STR-ANLN2 sy-vline
WA_FIKZD_PROPTAX_STR-GJAHR sy-vline
WA_FIKZD_PROPTAX_STR-LNRAN sy-vline
WA_FIKZD_PROPTAX_STR-LAUFI sy-vline
WA_FIKZD_PROPTAX_STR-PTAX_TYPE sy-vline
WA_FIKZD_PROPTAX_STR-BUDAT sy-vline
WA_FIKZD_PROPTAX_STR-ANLKL sy-vline
WA_FIKZD_PROPTAX_STR-AFABE sy-vline
WA_FIKZD_PROPTAX_STR-KOSTL sy-vline
WA_FIKZD_PROPTAX_STR-WERKS sy-vline
WA_FIKZD_PROPTAX_STR-GSBER sy-vline
WA_FIKZD_PROPTAX_STR-STORT sy-vline
WA_FIKZD_PROPTAX_STR-CAUFN sy-vline
WA_FIKZD_PROPTAX_STR-RAUMN sy-vline
WA_FIKZD_PROPTAX_STR-PERNR sy-vline
WA_FIKZD_PROPTAX_STR-BWASL sy-vline
WA_FIKZD_PROPTAX_STR-APC sy-vline
WA_FIKZD_PROPTAX_STR-DEPR sy-vline
WA_FIKZD_PROPTAX_STR-POST_DEPR sy-vline
WA_FIKZD_PROPTAX_STR-NBV sy-vline
WA_FIKZD_PROPTAX_STR-AVGNBV sy-vline
WA_FIKZD_PROPTAX_STR-NBV01 sy-vline
WA_FIKZD_PROPTAX_STR-NBV02 sy-vline
WA_FIKZD_PROPTAX_STR-NBV03 sy-vline
WA_FIKZD_PROPTAX_STR-NBV04 sy-vline
WA_FIKZD_PROPTAX_STR-NBV05 sy-vline
WA_FIKZD_PROPTAX_STR-NBV06 sy-vline
WA_FIKZD_PROPTAX_STR-NBV07 sy-vline
WA_FIKZD_PROPTAX_STR-NBV08 sy-vline
WA_FIKZD_PROPTAX_STR-NBV09 sy-vline
WA_FIKZD_PROPTAX_STR-NBV10 sy-vline
WA_FIKZD_PROPTAX_STR-NBV11 sy-vline
WA_FIKZD_PROPTAX_STR-NBV12 sy-vline
WA_FIKZD_PROPTAX_STR-NBV13 sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX1 sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX2 sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX3 sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX4 sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX_CURR sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX_YEAR sy-vline
WA_FIKZD_PROPTAX_STR-PRTAX_TO_PAY sy-vline
WA_FIKZD_PROPTAX_STR-PROPTYPE sy-vline
WA_FIKZD_PROPTAX_STR-OKATO sy-vline
WA_FIKZD_PROPTAX_STR-REGION sy-vline
WA_FIKZD_PROPTAX_STR-DISTRICT sy-vline
WA_FIKZD_PROPTAX_STR-PRIVILEGE sy-vline
WA_FIKZD_PROPTAX_STR-EXEMPTION sy-vline
WA_FIKZD_PROPTAX_STR-RATE sy-vline
WA_FIKZD_PROPTAX_STR-INVNR sy-vline
WA_FIKZD_PROPTAX_STR-LIFNR sy-vline
WA_FIKZD_PROPTAX_STR-MONTHBEG sy-vline
WA_FIKZD_PROPTAX_STR-MONTHEND sy-vline
WA_FIKZD_PROPTAX_STR-ERRORCODE sy-vline
WA_FIKZD_PROPTAX_STR-ICON sy-vline
WA_FIKZD_PROPTAX_STR-AKTIV sy-vline
WA_FIKZD_PROPTAX_STR-DEAKT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.