ABAP Select data from SAP table J_3R_TTAX_EXT 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 J_3R_TTAX_EXT 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 J_3R_TTAX_EXT. 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 J_3R_TTAX_EXT 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_J_3R_TTAX_EXT TYPE STANDARD TABLE OF J_3R_TTAX_EXT,
      WA_J_3R_TTAX_EXT TYPE J_3R_TTAX_EXT,
      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: <J_3R_TTAX_EXT> TYPE J_3R_TTAX_EXT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3R_TTAX_EXT
*  INTO TABLE @DATA(IT_J_3R_TTAX_EXT2).
*--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_J_3R_TTAX_EXT INDEX 1 INTO DATA(WA_J_3R_TTAX_EXT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_J_3R_TTAX_EXT ASSIGNING <J_3R_TTAX_EXT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3R_TTAX_EXT>-GRTITLE = 1.
<J_3R_TTAX_EXT>-LIFNR = 1.
<J_3R_TTAX_EXT>-GRKEY = 1.
<J_3R_TTAX_EXT>-GR_BUKRS = 1.
<J_3R_TTAX_EXT>-GR_OKATO = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3R_TTAX_EXT-GR_STRUCTDIV, sy-vline,
WA_J_3R_TTAX_EXT-GR_TR_TYPE, sy-vline,
WA_J_3R_TTAX_EXT-MANDT, sy-vline,
WA_J_3R_TTAX_EXT-TAX_TYPE, sy-vline,
WA_J_3R_TTAX_EXT-BUKRS, sy-vline,
WA_J_3R_TTAX_EXT-OKATO, sy-vline.
ENDLOOP. *Add any further fields from structure WA_J_3R_TTAX_EXT 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_J_3R_TTAX_EXT 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_J_3R_TTAX_EXT INTO WA_J_3R_TTAX_EXT. *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 LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-LIFNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU175, internal->external for field TAX01 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX01 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX01.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX02 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX02 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX02.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX03 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX03 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX03.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX04 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX04 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX04.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX05 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX05 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX05.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX06 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX06 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX06.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX07 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX07 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX07.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX08 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX08 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX08.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX09 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX09 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX09.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX10 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX10 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX10.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX11 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX11 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX11.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX12 CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX12 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX12.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AU175, internal->external for field TTAX01_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX01_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX01_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX02_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX02_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX02_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX03_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX03_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX03_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX04_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX04_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX04_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX05_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX05_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX05_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX06_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX06_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX06_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX07_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX07_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX07_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX08_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX08_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX08_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX09_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX09_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX09_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX10_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX10_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX10_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX11_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX11_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX11_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX12_ORIG CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX12_ORIG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX12_ORIG.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX_SUM CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX_SUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX_SUM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU172, internal->external for field CAD_VALUE CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-CAD_VALUE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-CAD_VALUE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PLATON_AMNT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-PLATON_AMNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-PLATON_AMNT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TAX_TO_PAY CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TAX_TO_PAY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TAX_TO_PAY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field GLO_RUS_TXB_TYPE CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-GLO_RUS_TXB_TYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-GLO_RUS_TXB_TYPE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit OKTMO, internal->external for field GLO_RUS_TTX_OKTM CALL FUNCTION 'CONVERSION_EXIT_OKTMO_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-GLO_RUS_TTX_OKTM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-GLO_RUS_TTX_OKTM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX_YEAR CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX_YEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX_YEAR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU175, internal->external for field TTAX_YEARO CALL FUNCTION 'CONVERSION_EXIT_AU175_OUTPUT' EXPORTING input = WA_J_3R_TTAX_EXT-TTAX_YEARO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3R_TTAX_EXT-TTAX_YEARO.
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_J_3R_TTAX_EXT_STR,
GRTITLE TYPE STRING,
LIFNR TYPE STRING,
GRKEY TYPE STRING,
GR_BUKRS TYPE STRING,
GR_OKATO TYPE STRING,
GR_STRUCTDIV TYPE STRING,
GR_TR_TYPE TYPE STRING,
MANDT TYPE STRING,
TAX_TYPE TYPE STRING,
BUKRS TYPE STRING,
OKATO TYPE STRING,
STRUCT_DIV TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
GJAHR TYPE STRING,
VERSION TYPE STRING,
LIGHT TYPE STRING,
TAX01 TYPE STRING,
TAX02 TYPE STRING,
TAX03 TYPE STRING,
TAX04 TYPE STRING,
TAX05 TYPE STRING,
TAX06 TYPE STRING,
TAX07 TYPE STRING,
TAX08 TYPE STRING,
TAX09 TYPE STRING,
TAX10 TYPE STRING,
TAX11 TYPE STRING,
TAX12 TYPE STRING,
WAERS TYPE STRING,
STATUS TYPE STRING,
LAST_DECLARED TYPE STRING,
CREATED_ON TYPE STRING,
CALC_ID TYPE STRING,
DECL_01 TYPE STRING,
DECL_NUM1 TYPE STRING,
DECL_02 TYPE STRING,
DECL_NUM2 TYPE STRING,
DECL_03 TYPE STRING,
DECL_NUM3 TYPE STRING,
DECL_04 TYPE STRING,
DECL_NUM4 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,
VALID_MONTH TYPE STRING,
ASSETNAME TYPE STRING,
TTAX01_ORIG TYPE STRING,
TTAX02_ORIG TYPE STRING,
TTAX03_ORIG TYPE STRING,
TTAX04_ORIG TYPE STRING,
TTAX05_ORIG TYPE STRING,
TTAX06_ORIG TYPE STRING,
TTAX07_ORIG TYPE STRING,
TTAX08_ORIG TYPE STRING,
TTAX09_ORIG TYPE STRING,
TTAX10_ORIG TYPE STRING,
TTAX11_ORIG TYPE STRING,
TTAX12_ORIG TYPE STRING,
TTAX_RATE TYPE STRING,
BRAND TYPE STRING,
TAX_SUM TYPE STRING,
PRIVILEGE TYPE STRING,
AMOUNTRED TYPE STRING,
EXEMPTION TYPE STRING,
CNOTX TYPE STRING,
CPRTX TYPE STRING,
USAGE_YEARS TYPE STRING,
TAX_COEFF TYPE STRING,
PROPTYPE TYPE STRING,
CAD_VALUE TYPE STRING,
EXEMP_REASON TYPE STRING,
EXP_COEFF TYPE STRING,
PLATON_AMNT TYPE STRING,
TAX_TO_PAY TYPE STRING,
PROPTYPE_TMDPND TYPE STRING,
SPEC_TAX_CAT TYPE STRING,
REP_PERIOD TYPE STRING,
CORR_NUM TYPE STRING,
DECL_NUM TYPE STRING,
KBK TYPE STRING,
ADATU TYPE STRING,
BDATU TYPE STRING,
GLO_RUS_TXB_TYPE TYPE STRING,
GLO_RUS_TXB_UNIT TYPE STRING,
GLO_RUS_TRT_TCRT TYPE STRING,
GLO_RUS_TRT_TCAM TYPE STRING,
GLO_RUS_TRT_TCEX TYPE STRING,
GLO_RUS_TTX_EXMP TYPE STRING,
GLO_RUS_TTX_PRVG TYPE STRING,
GLO_RUS_TTX_STLD TYPE STRING,
GLO_RUS_TTX_RTRD TYPE STRING,
GLO_RUS_TTX_RGSD TYPE STRING,
GLO_RUS_TTX_RMVD TYPE STRING,
GLO_RUS_TTX_OKTM TYPE STRING,
GLO_RUS_TTX_OKT1 TYPE STRING,
GLO_RUS_TTX_OKT2 TYPE STRING,
GLO_RUS_TTX_OKT3 TYPE STRING,
GLO_RUS_TTX_OKT4 TYPE STRING,
GLO_RUS_TTX_LNUM TYPE STRING,
GLO_RUS_TTX_AMTREDUCTION TYPE STRING,
GLO_RUS_AMTRED TYPE STRING,
GLO_RUS_TTX_VPCA TYPE STRING,
GLO_RUS_TTX_PLAT TYPE STRING,
GLO_RUS_TTX_TYPE TYPE STRING,
GLO_RUS_TTX_VIN TYPE STRING,
GLO_RUS_TTX_MNFD TYPE STRING,
GLO_RUS_TTX_ECOCLASS TYPE STRING,
GLO_RUS_ECOCLASS TYPE STRING,
GLO_RUS_ECO_CLS TYPE STRING,
TTAX_YEAR TYPE STRING,
TTAX_YEARO TYPE STRING,
TAX_RATE TYPE STRING,
TAX_RATEO TYPE STRING,
GLO_RUS_OKOF TYPE STRING,
REGION TYPE STRING,
DISTRICT TYPE STRING,
KPP TYPE STRING,
PRIVG_MONTH TYPE STRING,
NONREDUCED_TAXRATE TYPE STRING,
REDUCED_TAXRATE TYPE STRING,
EXPENSIVE_COEFF TYPE STRING,
IS_RATE_DFRNTD TYPE STRING,END OF T_EKKO_STR. DATA: WA_J_3R_TTAX_EXT_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_J_3R_TTAX_EXT_STR-GRTITLE sy-vline
WA_J_3R_TTAX_EXT_STR-LIFNR sy-vline
WA_J_3R_TTAX_EXT_STR-GRKEY sy-vline
WA_J_3R_TTAX_EXT_STR-GR_BUKRS sy-vline
WA_J_3R_TTAX_EXT_STR-GR_OKATO sy-vline
WA_J_3R_TTAX_EXT_STR-GR_STRUCTDIV sy-vline
WA_J_3R_TTAX_EXT_STR-GR_TR_TYPE sy-vline
WA_J_3R_TTAX_EXT_STR-MANDT sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_TYPE sy-vline
WA_J_3R_TTAX_EXT_STR-BUKRS sy-vline
WA_J_3R_TTAX_EXT_STR-OKATO sy-vline
WA_J_3R_TTAX_EXT_STR-STRUCT_DIV sy-vline
WA_J_3R_TTAX_EXT_STR-ANLN1 sy-vline
WA_J_3R_TTAX_EXT_STR-ANLN2 sy-vline
WA_J_3R_TTAX_EXT_STR-GJAHR sy-vline
WA_J_3R_TTAX_EXT_STR-VERSION sy-vline
WA_J_3R_TTAX_EXT_STR-LIGHT sy-vline
WA_J_3R_TTAX_EXT_STR-TAX01 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX02 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX03 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX04 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX05 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX06 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX07 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX08 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX09 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX10 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX11 sy-vline
WA_J_3R_TTAX_EXT_STR-TAX12 sy-vline
WA_J_3R_TTAX_EXT_STR-WAERS sy-vline
WA_J_3R_TTAX_EXT_STR-STATUS sy-vline
WA_J_3R_TTAX_EXT_STR-LAST_DECLARED sy-vline
WA_J_3R_TTAX_EXT_STR-CREATED_ON sy-vline
WA_J_3R_TTAX_EXT_STR-CALC_ID sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_01 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_NUM1 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_02 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_NUM2 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_03 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_NUM3 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_04 sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_NUM4 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV01 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV02 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV03 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV04 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV05 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV06 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV07 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV08 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV09 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV10 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV11 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV12 sy-vline
WA_J_3R_TTAX_EXT_STR-NBV13 sy-vline
WA_J_3R_TTAX_EXT_STR-VALID_MONTH sy-vline
WA_J_3R_TTAX_EXT_STR-ASSETNAME sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX01_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX02_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX03_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX04_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX05_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX06_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX07_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX08_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX09_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX10_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX11_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX12_ORIG sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX_RATE sy-vline
WA_J_3R_TTAX_EXT_STR-BRAND sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_SUM sy-vline
WA_J_3R_TTAX_EXT_STR-PRIVILEGE sy-vline
WA_J_3R_TTAX_EXT_STR-AMOUNTRED sy-vline
WA_J_3R_TTAX_EXT_STR-EXEMPTION sy-vline
WA_J_3R_TTAX_EXT_STR-CNOTX sy-vline
WA_J_3R_TTAX_EXT_STR-CPRTX sy-vline
WA_J_3R_TTAX_EXT_STR-USAGE_YEARS sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_COEFF sy-vline
WA_J_3R_TTAX_EXT_STR-PROPTYPE sy-vline
WA_J_3R_TTAX_EXT_STR-CAD_VALUE sy-vline
WA_J_3R_TTAX_EXT_STR-EXEMP_REASON sy-vline
WA_J_3R_TTAX_EXT_STR-EXP_COEFF sy-vline
WA_J_3R_TTAX_EXT_STR-PLATON_AMNT sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_TO_PAY sy-vline
WA_J_3R_TTAX_EXT_STR-PROPTYPE_TMDPND sy-vline
WA_J_3R_TTAX_EXT_STR-SPEC_TAX_CAT sy-vline
WA_J_3R_TTAX_EXT_STR-REP_PERIOD sy-vline
WA_J_3R_TTAX_EXT_STR-CORR_NUM sy-vline
WA_J_3R_TTAX_EXT_STR-DECL_NUM sy-vline
WA_J_3R_TTAX_EXT_STR-KBK sy-vline
WA_J_3R_TTAX_EXT_STR-ADATU sy-vline
WA_J_3R_TTAX_EXT_STR-BDATU sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TXB_TYPE sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TXB_UNIT sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TRT_TCRT sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TRT_TCAM sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TRT_TCEX sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_EXMP sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_PRVG sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_STLD sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_RTRD sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_RGSD sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_RMVD sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_OKTM sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_OKT1 sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_OKT2 sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_OKT3 sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_OKT4 sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_LNUM sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_AMTREDUCTION sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_AMTRED sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_VPCA sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_PLAT sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_TYPE sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_VIN sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_MNFD sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_TTX_ECOCLASS sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_ECOCLASS sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_ECO_CLS sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX_YEAR sy-vline
WA_J_3R_TTAX_EXT_STR-TTAX_YEARO sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_RATE sy-vline
WA_J_3R_TTAX_EXT_STR-TAX_RATEO sy-vline
WA_J_3R_TTAX_EXT_STR-GLO_RUS_OKOF sy-vline
WA_J_3R_TTAX_EXT_STR-REGION sy-vline
WA_J_3R_TTAX_EXT_STR-DISTRICT sy-vline
WA_J_3R_TTAX_EXT_STR-KPP sy-vline
WA_J_3R_TTAX_EXT_STR-PRIVG_MONTH sy-vline
WA_J_3R_TTAX_EXT_STR-NONREDUCED_TAXRATE sy-vline
WA_J_3R_TTAX_EXT_STR-REDUCED_TAXRATE sy-vline
WA_J_3R_TTAX_EXT_STR-EXPENSIVE_COEFF sy-vline
WA_J_3R_TTAX_EXT_STR-IS_RATE_DFRNTD sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.