ABAP Select data from SAP table IDCFM_FRCR_TRPOS 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 IDCFM_FRCR_TRPOS 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 IDCFM_FRCR_TRPOS. 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 IDCFM_FRCR_TRPOS 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_IDCFM_FRCR_TRPOS TYPE STANDARD TABLE OF IDCFM_FRCR_TRPOS,
      WA_IDCFM_FRCR_TRPOS TYPE IDCFM_FRCR_TRPOS,
      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: <IDCFM_FRCR_TRPOS> TYPE IDCFM_FRCR_TRPOS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IDCFM_FRCR_TRPOS
*  INTO TABLE @DATA(IT_IDCFM_FRCR_TRPOS2).
*--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_IDCFM_FRCR_TRPOS INDEX 1 INTO DATA(WA_IDCFM_FRCR_TRPOS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IDCFM_FRCR_TRPOS ASSIGNING <IDCFM_FRCR_TRPOS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IDCFM_FRCR_TRPOS>-MANDT = 1.
<IDCFM_FRCR_TRPOS>-PRODUCT_GROUP = 1.
<IDCFM_FRCR_TRPOS>-BUSTRANSCAT = 1.
<IDCFM_FRCR_TRPOS>-TRLDATE = 1.
<IDCFM_FRCR_TRPOS>-BUSTRANSID = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IDCFM_FRCR_TRPOS-CREATE_DATE, sy-vline,
WA_IDCFM_FRCR_TRPOS-CREATE_TIME, sy-vline,
WA_IDCFM_FRCR_TRPOS-BUSTRANSSTATE, sy-vline,
WA_IDCFM_FRCR_TRPOS-BOOKING_STATE, sy-vline,
WA_IDCFM_FRCR_TRPOS-VALUATION_AREA, sy-vline,
WA_IDCFM_FRCR_TRPOS-TR_ACC_CODE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IDCFM_FRCR_TRPOS 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_IDCFM_FRCR_TRPOS 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_IDCFM_FRCR_TRPOS INTO WA_IDCFM_FRCR_TRPOS. *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 TRLBS, internal->external for field BOOKING_STATE CALL FUNCTION 'CONVERSION_EXIT_TRLBS_OUTPUT' EXPORTING input = WA_IDCFM_FRCR_TRPOS-BOOKING_STATE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IDCFM_FRCR_TRPOS-BOOKING_STATE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit POSCT, internal->external for field ACTIVE_PASSIVE CALL FUNCTION 'CONVERSION_EXIT_POSCT_OUTPUT' EXPORTING input = WA_IDCFM_FRCR_TRPOS-ACTIVE_PASSIVE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IDCFM_FRCR_TRPOS-ACTIVE_PASSIVE.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ALPHA, internal->external for field GRANT_NBR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IDCFM_FRCR_TRPOS-GRANT_NBR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IDCFM_FRCR_TRPOS-GRANT_NBR.
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_IDCFM_FRCR_TRPOS_STR,
MANDT TYPE STRING,
PRODUCT_GROUP TYPE STRING,
BUSTRANSCAT TYPE STRING,
TRLDATE TYPE STRING,
BUSTRANSID TYPE STRING,
CREATE_DATE TYPE STRING,
CREATE_TIME TYPE STRING,
BUSTRANSSTATE TYPE STRING,
BOOKING_STATE TYPE STRING,
VALUATION_AREA TYPE STRING,
TR_ACC_CODE TYPE STRING,
REFBUSTRANSID TYPE STRING,
FI_POST_DATE TYPE STRING,
FI_POST_PERIOD TYPE STRING,
FI_REV_DATE TYPE STRING,
FI_REV_PERIOD TYPE STRING,
MIGR_INIT_FLG TYPE STRING,
IGT_STATUS TYPE STRING,
FBP_NEEDED TYPE STRING,
FBP_EXISTS TYPE STRING,
LINK_VAL_AREA TYPE STRING,
LINK_BUSTRANSID TYPE STRING,
FLG_EFFTEST TYPE STRING,
USER_DATA_OID TYPE STRING,
USER_DATA_CLS TYPE STRING,
TRANSACTION_OID TYPE STRING,
TRLFLOWNUMBER TYPE STRING,
FLOWNUMBER TYPE STRING,
SOURCETARGET_FLG TYPE STRING,
TRANSFER_GROUP TYPE STRING,
DIS_FLOWTYPE TYPE STRING,
AMOUNT_FACTOR TYPE STRING,
QUANT_CAT TYPE STRING,
AMOUNT_CAT TYPE STRING,
UNITS TYPE STRING,
NOMINAL_AMT TYPE STRING,
NOMINAL_ORG_AMT TYPE STRING,
NOMINAL_CURR TYPE STRING,
POSAMT_IDX_CLEAN TYPE STRING,
POSITION_AMT TYPE STRING,
POSITION_CURR TYPE STRING,
VALUATION_AMT TYPE STRING,
VALUATION_CURR TYPE STRING,
CALCULATION_DATE TYPE STRING,
CALC_DATE_INCL TYPE STRING,
DUE_DATE TYPE STRING,
CALC_BEGIN TYPE STRING,
CALC_END TYPE STRING,
EFF_INT_RATE_U TYPE STRING,
SCHED_EFF_RATE TYPE STRING,
EFF_INT_RATE_N TYPE STRING,
SCHED_FIX TYPE STRING,
BBASIS TYPE STRING,
PAR_USAGE TYPE STRING,
SUB_SOURCETARGET TYPE STRING,
SUB_TRANSFERGRP TYPE STRING,
DOCUMENTID TYPE STRING,
POSITION_OID TYPE STRING,
SUBPOSITION_OID TYPE STRING,
POS_MAN_PROC TYPE STRING,
ACTIVE_PASSIVE TYPE STRING,
SBILK TYPE STRING,
SKWG14NEU TYPE STRING,
RERF TYPE STRING,
DERF TYPE STRING,
TERF TYPE STRING,
REHER TYPE STRING,
RBEAR TYPE STRING,
DBEAR TYPE STRING,
TBEAR TYPE STRING,
RBHER TYPE STRING,
FLG_SUBPOSITION TYPE STRING,
IDENTIFIER_OID TYPE STRING,
IDENTIFIER_CLS TYPE STRING,
OBJNR TYPE STRING,
CONTEXT TYPE STRING,
IDENTIFIED_OID TYPE STRING,
IDENTIFIED_CLS TYPE STRING,
COM_VAL_CLASS TYPE STRING,
VALUATION_CLASS TYPE STRING,
ACCOUNTING_CODE TYPE STRING,
COMPANY_CODE TYPE STRING,
PRODUCT_TYPE TYPE STRING,
SECURITY_ACCOUNT TYPE STRING,
SECURITY_ID TYPE STRING,
PORTFOLIO TYPE STRING,
TRADER TYPE STRING,
ACCOUNT_GROUP TYPE STRING,
LOANS_CONTRACT TYPE STRING,
POSITION_ACCOUNT TYPE STRING,
FLAG_LONG_SHORT TYPE STRING,
LOT_ID TYPE STRING,
DEAL_NUMBER TYPE STRING,
FUND TYPE STRING,
GRANT_NBR TYPE STRING,END OF T_EKKO_STR. DATA: WA_IDCFM_FRCR_TRPOS_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_IDCFM_FRCR_TRPOS_STR-MANDT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-PRODUCT_GROUP sy-vline
WA_IDCFM_FRCR_TRPOS_STR-BUSTRANSCAT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TRLDATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-BUSTRANSID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CREATE_DATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CREATE_TIME sy-vline
WA_IDCFM_FRCR_TRPOS_STR-BUSTRANSSTATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-BOOKING_STATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-VALUATION_AREA sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TR_ACC_CODE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-REFBUSTRANSID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FI_POST_DATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FI_POST_PERIOD sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FI_REV_DATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FI_REV_PERIOD sy-vline
WA_IDCFM_FRCR_TRPOS_STR-MIGR_INIT_FLG sy-vline
WA_IDCFM_FRCR_TRPOS_STR-IGT_STATUS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FBP_NEEDED sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FBP_EXISTS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-LINK_VAL_AREA sy-vline
WA_IDCFM_FRCR_TRPOS_STR-LINK_BUSTRANSID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FLG_EFFTEST sy-vline
WA_IDCFM_FRCR_TRPOS_STR-USER_DATA_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-USER_DATA_CLS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TRANSACTION_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TRLFLOWNUMBER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FLOWNUMBER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SOURCETARGET_FLG sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TRANSFER_GROUP sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DIS_FLOWTYPE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-AMOUNT_FACTOR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-QUANT_CAT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-AMOUNT_CAT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-UNITS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-NOMINAL_AMT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-NOMINAL_ORG_AMT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-NOMINAL_CURR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POSAMT_IDX_CLEAN sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POSITION_AMT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POSITION_CURR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-VALUATION_AMT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-VALUATION_CURR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CALCULATION_DATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CALC_DATE_INCL sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DUE_DATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CALC_BEGIN sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CALC_END sy-vline
WA_IDCFM_FRCR_TRPOS_STR-EFF_INT_RATE_U sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SCHED_EFF_RATE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-EFF_INT_RATE_N sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SCHED_FIX sy-vline
WA_IDCFM_FRCR_TRPOS_STR-BBASIS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-PAR_USAGE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SUB_SOURCETARGET sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SUB_TRANSFERGRP sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DOCUMENTID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POSITION_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SUBPOSITION_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POS_MAN_PROC sy-vline
WA_IDCFM_FRCR_TRPOS_STR-ACTIVE_PASSIVE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SBILK sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SKWG14NEU sy-vline
WA_IDCFM_FRCR_TRPOS_STR-RERF sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DERF sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TERF sy-vline
WA_IDCFM_FRCR_TRPOS_STR-REHER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-RBEAR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DBEAR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TBEAR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-RBHER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FLG_SUBPOSITION sy-vline
WA_IDCFM_FRCR_TRPOS_STR-IDENTIFIER_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-IDENTIFIER_CLS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-OBJNR sy-vline
WA_IDCFM_FRCR_TRPOS_STR-CONTEXT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-IDENTIFIED_OID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-IDENTIFIED_CLS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-COM_VAL_CLASS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-VALUATION_CLASS sy-vline
WA_IDCFM_FRCR_TRPOS_STR-ACCOUNTING_CODE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-COMPANY_CODE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-PRODUCT_TYPE sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SECURITY_ACCOUNT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-SECURITY_ID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-PORTFOLIO sy-vline
WA_IDCFM_FRCR_TRPOS_STR-TRADER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-ACCOUNT_GROUP sy-vline
WA_IDCFM_FRCR_TRPOS_STR-LOANS_CONTRACT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-POSITION_ACCOUNT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FLAG_LONG_SHORT sy-vline
WA_IDCFM_FRCR_TRPOS_STR-LOT_ID sy-vline
WA_IDCFM_FRCR_TRPOS_STR-DEAL_NUMBER sy-vline
WA_IDCFM_FRCR_TRPOS_STR-FUND sy-vline
WA_IDCFM_FRCR_TRPOS_STR-GRANT_NBR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.