ABAP Select data from SAP table J_3R_PROPTAX_LAYOUT 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 J_3R_PROPTAX_LAYOUT 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_PROPTAX_LAYOUT. 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_PROPTAX_LAYOUT 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_PROPTAX_LAYOUT TYPE STANDARD TABLE OF J_3R_PROPTAX_LAYOUT,
      WA_J_3R_PROPTAX_LAYOUT TYPE J_3R_PROPTAX_LAYOUT,
      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_PROPTAX_LAYOUT> TYPE J_3R_PROPTAX_LAYOUT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_3R_PROPTAX_LAYOUT
*  INTO TABLE @DATA(IT_J_3R_PROPTAX_LAYOUT2).
*--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_PROPTAX_LAYOUT INDEX 1 INTO DATA(WA_J_3R_PROPTAX_LAYOUT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_3R_PROPTAX_LAYOUT>-ALV_TEXT = 1.
<J_3R_PROPTAX_LAYOUT>-FSD = 1.
<J_3R_PROPTAX_LAYOUT>-INN = 1.
<J_3R_PROPTAX_LAYOUT>-KPP = 1.
<J_3R_PROPTAX_LAYOUT>-DOC_TYPE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_3R_PROPTAX_LAYOUT-CORR_NUM, sy-vline,
  WA_J_3R_PROPTAX_LAYOUT-REP_PERIOD, sy-vline,
  WA_J_3R_PROPTAX_LAYOUT-REP_YEAR, sy-vline,
  WA_J_3R_PROPTAX_LAYOUT-TAX_AUTH, sy-vline,
  WA_J_3R_PROPTAX_LAYOUT-TAX_AUTH_CODE, sy-vline,
  WA_J_3R_PROPTAX_LAYOUT-P_AT_LOCATION1, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_3R_PROPTAX_LAYOUT 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_PROPTAX_LAYOUT 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_PROPTAX_LAYOUT INTO WA_J_3R_PROPTAX_LAYOUT.


*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 TAX_AUTH
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_J_3R_PROPTAX_LAYOUT-TAX_AUTH
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_3R_PROPTAX_LAYOUT-TAX_AUTH.
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_PROPTAX_LAYOUT_STR, 
ALV_TEXT TYPE STRING,
FSD TYPE STRING,
INN TYPE STRING,
KPP TYPE STRING,
DOC_TYPE TYPE STRING,
CORR_NUM TYPE STRING,
REP_PERIOD TYPE STRING,
REP_YEAR TYPE STRING,
TAX_AUTH TYPE STRING,
TAX_AUTH_CODE TYPE STRING,
P_AT_LOCATION1 TYPE STRING,
P_AT_LOCATION2 TYPE STRING,
P_AT_LOCATION3 TYPE STRING,
P_AT_LOCATION4 TYPE STRING,
P_AT_LOCATION5 TYPE STRING,
ORGANIZATION TYPE STRING,
OGRN TYPE STRING,
CONTACT_PHONE TYPE STRING,
PAGE_NUM TYPE STRING,
SHEET_NUM TYPE STRING,
CEO_NAME TYPE STRING,
CEO_INN TYPE STRING,
CHIEF_ACC_NAME TYPE STRING,
CHIEF_ACC_INN TYPE STRING,
REPR_NAME TYPE STRING,
REPR_INN TYPE STRING,
DOC_NUM TYPE STRING,
APPENDIX TYPE STRING,
REP_PERIOD_2C TYPE STRING,
OKVED_CODE TYPE STRING,
TAXPAYER_ORG TYPE STRING,
DECL_BY_REPR TYPE STRING,
REPR_DOC_NAME TYPE STRING,
REPR_LASTNAME TYPE STRING,
REPR_SECNAME TYPE STRING,
SIGN_DATE TYPE STRING,
NAME1 TYPE STRING,
REORGINN TYPE STRING,
REORGKPP TYPE STRING,
P_AT_LOCATION TYPE STRING,
REORGANIZATION TYPE STRING,
ORGNAME1 TYPE STRING,
ORGNAME2 TYPE STRING,
ORGNAME3 TYPE STRING,
ORGNAME4 TYPE STRING,
REPRORGNAME1 TYPE STRING,
REPRORGNAME2 TYPE STRING,
REPRORGNAME3 TYPE STRING,
REPRORGNAME4 TYPE STRING,
REPRORGNAME5 TYPE STRING,
REPRORGNAME6 TYPE STRING,
REPRORGNAME7 TYPE STRING,
REPRORGNAME8 TYPE STRING,
CONFIRMDOCNAME1 TYPE STRING,
CONFIRMDOCNAME2 TYPE STRING,
S1D TYPE STRING,
INN TYPE STRING,
KPP TYPE STRING,
TAXPAYER_STATUS_INDICATOR TYPE STRING,
PAGE_NUM TYPE STRING,
S1T TYPE STRING,
S2D TYPE STRING,
INN TYPE STRING,
KPP TYPE STRING,
TAXPAYER_STATUS_INDICATOR TYPE STRING,
PAGE_NUM TYPE STRING,
S2T TYPE STRING,
S21T TYPE STRING,
S3D TYPE STRING,
INN TYPE STRING,
KPP TYPE STRING,
TAXPAYER_STATUS_INDICATOR TYPE STRING,
PAGE_NUM TYPE STRING,
S3T TYPE STRING,
S4T TYPE STRING,
S1M TYPE STRING,
S1S TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_3R_PROPTAX_LAYOUT_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_PROPTAX_LAYOUT_STR-ALV_TEXT sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-FSD sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-KPP sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-DOC_TYPE sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CORR_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REP_PERIOD sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REP_YEAR sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAX_AUTH sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAX_AUTH_CODE sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION1 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION2 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION3 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION4 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION5 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-ORGANIZATION sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-OGRN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CONTACT_PHONE sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-PAGE_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-SHEET_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CEO_NAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CEO_INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CHIEF_ACC_NAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CHIEF_ACC_INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPR_NAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPR_INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-DOC_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-APPENDIX sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REP_PERIOD_2C sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-OKVED_CODE sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAXPAYER_ORG sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-DECL_BY_REPR sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPR_DOC_NAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPR_LASTNAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPR_SECNAME sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-SIGN_DATE sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-NAME1 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REORGINN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REORGKPP sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-P_AT_LOCATION sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REORGANIZATION sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-ORGNAME1 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-ORGNAME2 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-ORGNAME3 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-ORGNAME4 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME1 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME2 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME3 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME4 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME5 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME6 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME7 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-REPRORGNAME8 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CONFIRMDOCNAME1 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-CONFIRMDOCNAME2 sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S1D sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-KPP sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAXPAYER_STATUS_INDICATOR sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-PAGE_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S1T sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S2D sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-KPP sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAXPAYER_STATUS_INDICATOR sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-PAGE_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S2T sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S21T sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S3D sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-INN sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-KPP sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-TAXPAYER_STATUS_INDICATOR sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-PAGE_NUM sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S3T sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S4T sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S1M sy-vline 
WA_J_3R_PROPTAX_LAYOUT_STR-S1S sy-vline      INTO ld_text SEPARATED BY SPACE.

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