ABAP Select data from SAP table IFMFG_TROR_DETAILS 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 IFMFG_TROR_DETAILS 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 IFMFG_TROR_DETAILS. 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 IFMFG_TROR_DETAILS 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_IFMFG_TROR_DETAILS TYPE STANDARD TABLE OF IFMFG_TROR_DETAILS,
      WA_IFMFG_TROR_DETAILS TYPE IFMFG_TROR_DETAILS,
      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: <IFMFG_TROR_DETAILS> TYPE IFMFG_TROR_DETAILS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IFMFG_TROR_DETAILS
*  INTO TABLE @DATA(IT_IFMFG_TROR_DETAILS2).
*--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_IFMFG_TROR_DETAILS INDEX 1 INTO DATA(WA_IFMFG_TROR_DETAILS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IFMFG_TROR_DETAILS ASSIGNING <IFMFG_TROR_DETAILS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IFMFG_TROR_DETAILS>-BUKRS = 1.
<IFMFG_TROR_DETAILS>-KUNNR = 1.
<IFMFG_TROR_DETAILS>-BELNR = 1.
<IFMFG_TROR_DETAILS>-BUZEI = 1.
<IFMFG_TROR_DETAILS>-GJAHR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IFMFG_TROR_DETAILS-BUDAT, sy-vline,
WA_IFMFG_TROR_DETAILS-AUGBL, sy-vline,
WA_IFMFG_TROR_DETAILS-AUGDT, sy-vline,
WA_IFMFG_TROR_DETAILS-REBZG, sy-vline,
WA_IFMFG_TROR_DETAILS-REBZZ, sy-vline,
WA_IFMFG_TROR_DETAILS-REBZJ, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IFMFG_TROR_DETAILS 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_IFMFG_TROR_DETAILS 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_IFMFG_TROR_DETAILS INTO WA_IFMFG_TROR_DETAILS. *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 KUNNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IFMFG_TROR_DETAILS-KUNNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IFMFG_TROR_DETAILS-KUNNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit FMCIL, internal->external for field RFIPEX CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_IFMFG_TROR_DETAILS-RFIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IFMFG_TROR_DETAILS-RFIPEX.
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_IFMFG_TROR_DETAILS_STR,
BUKRS TYPE STRING,
KUNNR TYPE STRING,
BELNR TYPE STRING,
BUZEI TYPE STRING,
GJAHR TYPE STRING,
BUDAT TYPE STRING,
AUGBL TYPE STRING,
AUGDT TYPE STRING,
REBZG TYPE STRING,
REBZZ TYPE STRING,
REBZJ TYPE STRING,
BLART TYPE STRING,
SHKZG TYPE STRING,
HKONT TYPE STRING,
DMBTR TYPE STRING,
RSTGR TYPE STRING,
STBLG TYPE STRING,
STJAH TYPE STRING,
XREVERSAL TYPE STRING,
GSBER TYPE STRING,
BSCHL TYPE STRING,
ZFBDT TYPE STRING,
BLDAT TYPE STRING,
CPUDT TYPE STRING,
ZTERM TYPE STRING,
ZBD1T TYPE STRING,
ZBD2T TYPE STRING,
ZBD3T TYPE STRING,
DUE_DATE TYPE STRING,
AGING_DAYS TYPE STRING,
COUNT_IND TYPE STRING,
DOCNR_FG TYPE STRING,
DOCLN_FG TYPE STRING,
RFUND TYPE STRING,
RCNTR TYPE STRING,
RFAREA TYPE STRING,
RFISTL TYPE STRING,
RFIPEX TYPE STRING,
FUND_TYPE TYPE STRING,
MEASURE TYPE STRING,
RAGNCY_LCTN_CODE TYPE STRING,
RFINUSE TYPE STRING,END OF T_EKKO_STR. DATA: WA_IFMFG_TROR_DETAILS_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_IFMFG_TROR_DETAILS_STR-BUKRS sy-vline
WA_IFMFG_TROR_DETAILS_STR-KUNNR sy-vline
WA_IFMFG_TROR_DETAILS_STR-BELNR sy-vline
WA_IFMFG_TROR_DETAILS_STR-BUZEI sy-vline
WA_IFMFG_TROR_DETAILS_STR-GJAHR sy-vline
WA_IFMFG_TROR_DETAILS_STR-BUDAT sy-vline
WA_IFMFG_TROR_DETAILS_STR-AUGBL sy-vline
WA_IFMFG_TROR_DETAILS_STR-AUGDT sy-vline
WA_IFMFG_TROR_DETAILS_STR-REBZG sy-vline
WA_IFMFG_TROR_DETAILS_STR-REBZZ sy-vline
WA_IFMFG_TROR_DETAILS_STR-REBZJ sy-vline
WA_IFMFG_TROR_DETAILS_STR-BLART sy-vline
WA_IFMFG_TROR_DETAILS_STR-SHKZG sy-vline
WA_IFMFG_TROR_DETAILS_STR-HKONT sy-vline
WA_IFMFG_TROR_DETAILS_STR-DMBTR sy-vline
WA_IFMFG_TROR_DETAILS_STR-RSTGR sy-vline
WA_IFMFG_TROR_DETAILS_STR-STBLG sy-vline
WA_IFMFG_TROR_DETAILS_STR-STJAH sy-vline
WA_IFMFG_TROR_DETAILS_STR-XREVERSAL sy-vline
WA_IFMFG_TROR_DETAILS_STR-GSBER sy-vline
WA_IFMFG_TROR_DETAILS_STR-BSCHL sy-vline
WA_IFMFG_TROR_DETAILS_STR-ZFBDT sy-vline
WA_IFMFG_TROR_DETAILS_STR-BLDAT sy-vline
WA_IFMFG_TROR_DETAILS_STR-CPUDT sy-vline
WA_IFMFG_TROR_DETAILS_STR-ZTERM sy-vline
WA_IFMFG_TROR_DETAILS_STR-ZBD1T sy-vline
WA_IFMFG_TROR_DETAILS_STR-ZBD2T sy-vline
WA_IFMFG_TROR_DETAILS_STR-ZBD3T sy-vline
WA_IFMFG_TROR_DETAILS_STR-DUE_DATE sy-vline
WA_IFMFG_TROR_DETAILS_STR-AGING_DAYS sy-vline
WA_IFMFG_TROR_DETAILS_STR-COUNT_IND sy-vline
WA_IFMFG_TROR_DETAILS_STR-DOCNR_FG sy-vline
WA_IFMFG_TROR_DETAILS_STR-DOCLN_FG sy-vline
WA_IFMFG_TROR_DETAILS_STR-RFUND sy-vline
WA_IFMFG_TROR_DETAILS_STR-RCNTR sy-vline
WA_IFMFG_TROR_DETAILS_STR-RFAREA sy-vline
WA_IFMFG_TROR_DETAILS_STR-RFISTL sy-vline
WA_IFMFG_TROR_DETAILS_STR-RFIPEX sy-vline
WA_IFMFG_TROR_DETAILS_STR-FUND_TYPE sy-vline
WA_IFMFG_TROR_DETAILS_STR-MEASURE sy-vline
WA_IFMFG_TROR_DETAILS_STR-RAGNCY_LCTN_CODE sy-vline
WA_IFMFG_TROR_DETAILS_STR-RFINUSE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.