ABAP Select data from SAP table DFKKRA_RAI_MI 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 DFKKRA_RAI_MI 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 DFKKRA_RAI_MI. 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 DFKKRA_RAI_MI 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_DFKKRA_RAI_MI TYPE STANDARD TABLE OF DFKKRA_RAI_MI,
      WA_DFKKRA_RAI_MI TYPE DFKKRA_RAI_MI,
      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: <DFKKRA_RAI_MI> TYPE DFKKRA_RAI_MI.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM DFKKRA_RAI_MI
*  INTO TABLE @DATA(IT_DFKKRA_RAI_MI2).
*--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_DFKKRA_RAI_MI INDEX 1 INTO DATA(WA_DFKKRA_RAI_MI2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_DFKKRA_RAI_MI ASSIGNING <DFKKRA_RAI_MI>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<DFKKRA_RAI_MI>-MANDT = 1.
<DFKKRA_RAI_MI>-RAI_ID = 1.
<DFKKRA_RAI_MI>-SRCDOC_COMP = 1.
<DFKKRA_RAI_MI>-SRCDOC_LOGSYS = 1.
<DFKKRA_RAI_MI>-SRCDOC_TYPE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_DFKKRA_RAI_MI-SRCDOC_ID, sy-vline,
WA_DFKKRA_RAI_MI-TIMESTAMP_UTC, sy-vline,
WA_DFKKRA_RAI_MI-HEADER_ID, sy-vline,
WA_DFKKRA_RAI_MI-ITEM_ID, sy-vline,
WA_DFKKRA_RAI_MI-SERVICE_TYPE, sy-vline,
WA_DFKKRA_RAI_MI-CRDATE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_DFKKRA_RAI_MI 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_DFKKRA_RAI_MI 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_DFKKRA_RAI_MI INTO WA_DFKKRA_RAI_MI. *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 SRCDOC_LOGSYS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-SRCDOC_LOGSYS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-SRCDOC_LOGSYS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTLC, internal->external for field TIMESTAMP_UTC CALL FUNCTION 'CONVERSION_EXIT_TSTLC_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-TIMESTAMP_UTC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-TIMESTAMP_UTC.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit TSTLC, internal->external for field SENTTS CALL FUNCTION 'CONVERSION_EXIT_TSTLC_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-SENTTS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-SENTTS.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCHANGE_RATE CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-EXCHANGE_RATE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-EXCHANGE_RATE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EXCRT, internal->external for field EXCHANGE_RATE2 CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-EXCHANGE_RATE2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-EXCHANGE_RATE2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EXCRT, internal->external for field EXCHANGE_RATE3 CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-EXCHANGE_RATE3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-EXCHANGE_RATE3.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ALPHA, internal->external for field RECEIV_ACCOUNT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_DFKKRA_RAI_MI-RECEIV_ACCOUNT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_DFKKRA_RAI_MI-RECEIV_ACCOUNT.
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_DFKKRA_RAI_MI_STR,
MANDT TYPE STRING,
RAI_ID TYPE STRING,
SRCDOC_COMP TYPE STRING,
SRCDOC_LOGSYS TYPE STRING,
SRCDOC_TYPE TYPE STRING,
SRCDOC_ID TYPE STRING,
TIMESTAMP_UTC TYPE STRING,
HEADER_ID TYPE STRING,
ITEM_ID TYPE STRING,
SERVICE_TYPE TYPE STRING,
CRDATE TYPE STRING,
CRTIME TYPE STRING,
SENTDATE TYPE STRING,
SENTTIME TYPE STRING,
SENTTS TYPE STRING,
KUNNR TYPE STRING,
PARTNER TYPE STRING,
VKONT TYPE STRING,
VTREF TYPE STRING,
VTPOS TYPE STRING,
SUBAP TYPE STRING,
BUKRS TYPE STRING,
BETRW TYPE STRING,
WAERS TYPE STRING,
HWAER TYPE STRING,
HWAE2 TYPE STRING,
HWAE3 TYPE STRING,
QUANTITY TYPE STRING,
QUANTITY_UNIT TYPE STRING,
QUANTITY_REL TYPE STRING,
ORIGDOC_COMP TYPE STRING,
ORIGDOC_LOGSYS TYPE STRING,
ORIGDOC_TYPE TYPE STRING,
ORIGDOC_ID TYPE STRING,
DUE_DATE TYPE STRING,
INVOICE_TYPE TYPE STRING,
INVOICE_CAT TYPE STRING,
FINAL_INVOICE TYPE STRING,
INVDOCNO TYPE STRING,
RA_INVGR TYPE STRING,
POSTING_DATE TYPE STRING,
EVENT_DATE TYPE STRING,
EVENT_TIME TYPE STRING,
EVENT_TYPE TYPE STRING,
REVERSAL TYPE STRING,
DELETION_IND TYPE STRING,
EXCHANGE_RATE TYPE STRING,
EXCHANGE_RATE2 TYPE STRING,
EXCHANGE_RATE3 TYPE STRING,
REFERENCE_TYPE TYPE STRING,
REFERENCE_ID TYPE STRING,
GSBER TYPE STRING,
PRCTR TYPE STRING,
SEGMENT TYPE STRING,
START_DATE TYPE STRING,
END_DATE TYPE STRING,
HILDOC_COMP TYPE STRING,
HILDOC_LOGSYS TYPE STRING,
HILDOC_TYPE TYPE STRING,
HILDOC_ID TYPE STRING,
SALES_ORG TYPE STRING,
INCEPTION_DATE TYPE STRING,
VALUE_RELEVANT TYPE STRING,
CHRSN TYPE STRING,
PRDNR TYPE STRING,
PRDNR_SP TYPE STRING,
SPART TYPE STRING,
VTWEG TYPE STRING,
X_ESTIMATED_QUAN TYPE STRING,
KEYPP TYPE STRING,
XRECACC_DET TYPE STRING,
XACCASS_DET TYPE STRING,
CHIND TYPE STRING,
RECEIV_ACCOUNT TYPE STRING,
ITEM_TYPE TYPE STRING,
MIG_PACKAGE TYPE STRING,
INITIAL_LOAD TYPE STRING,
FINAL_DATE TYPE STRING,
PREDOC_COMP TYPE STRING,
PREDOC_LOGSYS TYPE STRING,
PREDOC_TYPE TYPE STRING,
PREDOC_ID TYPE STRING,
CRMET TYPE STRING,
EFFECTIVE_DATE TYPE STRING,
ASSET_IMPAIRMENT TYPE STRING,
CHARGE_TYPE TYPE STRING,
DUMMY_TRANS_REC_INCL_EEW_PS TYPE STRING,END OF T_EKKO_STR. DATA: WA_DFKKRA_RAI_MI_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_DFKKRA_RAI_MI_STR-MANDT sy-vline
WA_DFKKRA_RAI_MI_STR-RAI_ID sy-vline
WA_DFKKRA_RAI_MI_STR-SRCDOC_COMP sy-vline
WA_DFKKRA_RAI_MI_STR-SRCDOC_LOGSYS sy-vline
WA_DFKKRA_RAI_MI_STR-SRCDOC_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-SRCDOC_ID sy-vline
WA_DFKKRA_RAI_MI_STR-TIMESTAMP_UTC sy-vline
WA_DFKKRA_RAI_MI_STR-HEADER_ID sy-vline
WA_DFKKRA_RAI_MI_STR-ITEM_ID sy-vline
WA_DFKKRA_RAI_MI_STR-SERVICE_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-CRDATE sy-vline
WA_DFKKRA_RAI_MI_STR-CRTIME sy-vline
WA_DFKKRA_RAI_MI_STR-SENTDATE sy-vline
WA_DFKKRA_RAI_MI_STR-SENTTIME sy-vline
WA_DFKKRA_RAI_MI_STR-SENTTS sy-vline
WA_DFKKRA_RAI_MI_STR-KUNNR sy-vline
WA_DFKKRA_RAI_MI_STR-PARTNER sy-vline
WA_DFKKRA_RAI_MI_STR-VKONT sy-vline
WA_DFKKRA_RAI_MI_STR-VTREF sy-vline
WA_DFKKRA_RAI_MI_STR-VTPOS sy-vline
WA_DFKKRA_RAI_MI_STR-SUBAP sy-vline
WA_DFKKRA_RAI_MI_STR-BUKRS sy-vline
WA_DFKKRA_RAI_MI_STR-BETRW sy-vline
WA_DFKKRA_RAI_MI_STR-WAERS sy-vline
WA_DFKKRA_RAI_MI_STR-HWAER sy-vline
WA_DFKKRA_RAI_MI_STR-HWAE2 sy-vline
WA_DFKKRA_RAI_MI_STR-HWAE3 sy-vline
WA_DFKKRA_RAI_MI_STR-QUANTITY sy-vline
WA_DFKKRA_RAI_MI_STR-QUANTITY_UNIT sy-vline
WA_DFKKRA_RAI_MI_STR-QUANTITY_REL sy-vline
WA_DFKKRA_RAI_MI_STR-ORIGDOC_COMP sy-vline
WA_DFKKRA_RAI_MI_STR-ORIGDOC_LOGSYS sy-vline
WA_DFKKRA_RAI_MI_STR-ORIGDOC_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-ORIGDOC_ID sy-vline
WA_DFKKRA_RAI_MI_STR-DUE_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-INVOICE_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-INVOICE_CAT sy-vline
WA_DFKKRA_RAI_MI_STR-FINAL_INVOICE sy-vline
WA_DFKKRA_RAI_MI_STR-INVDOCNO sy-vline
WA_DFKKRA_RAI_MI_STR-RA_INVGR sy-vline
WA_DFKKRA_RAI_MI_STR-POSTING_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-EVENT_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-EVENT_TIME sy-vline
WA_DFKKRA_RAI_MI_STR-EVENT_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-REVERSAL sy-vline
WA_DFKKRA_RAI_MI_STR-DELETION_IND sy-vline
WA_DFKKRA_RAI_MI_STR-EXCHANGE_RATE sy-vline
WA_DFKKRA_RAI_MI_STR-EXCHANGE_RATE2 sy-vline
WA_DFKKRA_RAI_MI_STR-EXCHANGE_RATE3 sy-vline
WA_DFKKRA_RAI_MI_STR-REFERENCE_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-REFERENCE_ID sy-vline
WA_DFKKRA_RAI_MI_STR-GSBER sy-vline
WA_DFKKRA_RAI_MI_STR-PRCTR sy-vline
WA_DFKKRA_RAI_MI_STR-SEGMENT sy-vline
WA_DFKKRA_RAI_MI_STR-START_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-END_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-HILDOC_COMP sy-vline
WA_DFKKRA_RAI_MI_STR-HILDOC_LOGSYS sy-vline
WA_DFKKRA_RAI_MI_STR-HILDOC_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-HILDOC_ID sy-vline
WA_DFKKRA_RAI_MI_STR-SALES_ORG sy-vline
WA_DFKKRA_RAI_MI_STR-INCEPTION_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-VALUE_RELEVANT sy-vline
WA_DFKKRA_RAI_MI_STR-CHRSN sy-vline
WA_DFKKRA_RAI_MI_STR-PRDNR sy-vline
WA_DFKKRA_RAI_MI_STR-PRDNR_SP sy-vline
WA_DFKKRA_RAI_MI_STR-SPART sy-vline
WA_DFKKRA_RAI_MI_STR-VTWEG sy-vline
WA_DFKKRA_RAI_MI_STR-X_ESTIMATED_QUAN sy-vline
WA_DFKKRA_RAI_MI_STR-KEYPP sy-vline
WA_DFKKRA_RAI_MI_STR-XRECACC_DET sy-vline
WA_DFKKRA_RAI_MI_STR-XACCASS_DET sy-vline
WA_DFKKRA_RAI_MI_STR-CHIND sy-vline
WA_DFKKRA_RAI_MI_STR-RECEIV_ACCOUNT sy-vline
WA_DFKKRA_RAI_MI_STR-ITEM_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-MIG_PACKAGE sy-vline
WA_DFKKRA_RAI_MI_STR-INITIAL_LOAD sy-vline
WA_DFKKRA_RAI_MI_STR-FINAL_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-PREDOC_COMP sy-vline
WA_DFKKRA_RAI_MI_STR-PREDOC_LOGSYS sy-vline
WA_DFKKRA_RAI_MI_STR-PREDOC_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-PREDOC_ID sy-vline
WA_DFKKRA_RAI_MI_STR-CRMET sy-vline
WA_DFKKRA_RAI_MI_STR-EFFECTIVE_DATE sy-vline
WA_DFKKRA_RAI_MI_STR-ASSET_IMPAIRMENT sy-vline
WA_DFKKRA_RAI_MI_STR-CHARGE_TYPE sy-vline
WA_DFKKRA_RAI_MI_STR-DUMMY_TRANS_REC_INCL_EEW_PS sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.