ABAP Select data from SAP table IFMRKJRA 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 IFMRKJRA 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 IFMRKJRA. 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 IFMRKJRA 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_IFMRKJRA TYPE STANDARD TABLE OF IFMRKJRA,
      WA_IFMRKJRA TYPE IFMRKJRA,
      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: <IFMRKJRA> TYPE IFMRKJRA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IFMRKJRA
*  INTO TABLE @DATA(IT_IFMRKJRA2).
*--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_IFMRKJRA INDEX 1 INTO DATA(WA_IFMRKJRA2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<IFMRKJRA>-FIPEX = 1.
<IFMRKJRA>-FICTR = 1.
<IFMRKJRA>-FOND = 1.
<IFMRKJRA>-PRAEFIX = 1.
<IFMRKJRA>-GLD = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IFMRKJRA-EPL, sy-vline,
  WA_IFMRKJRA-ABSCHN, sy-vline,
  WA_IFMRKJRA-UABSCH, sy-vline,
  WA_IFMRKJRA-GRUPPE, sy-vline,
  WA_IFMRKJRA-HGR, sy-vline,
  WA_IFMRKJRA-GRP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_IFMRKJRA 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_IFMRKJRA 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_IFMRKJRA INTO WA_IFMRKJRA.


*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 FIPEX, internal->external for field FIPEX
CALL FUNCTION 'CONVERSION_EXIT_FIPEX_OUTPUT'
  EXPORTING
    input =                      WA_IFMRKJRA-FIPEX
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IFMRKJRA-FIPEX.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FIPEX, internal->external for field HHSTELLE
CALL FUNCTION 'CONVERSION_EXIT_FIPEX_OUTPUT'
  EXPORTING
    input =                      WA_IFMRKJRA-HHSTELLE
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IFMRKJRA-HHSTELLE.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIL, internal->external for field FIPUP
CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT'
  EXPORTING
    input =                      WA_IFMRKJRA-FIPUP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_IFMRKJRA-FIPUP.
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_IFMRKJRA_STR, 
FIPEX TYPE STRING,
FICTR TYPE STRING,
FOND TYPE STRING,
PRAEFIX TYPE STRING,
GLD TYPE STRING,
EPL TYPE STRING,
ABSCHN TYPE STRING,
UABSCH TYPE STRING,
GRUPPE TYPE STRING,
HGR TYPE STRING,
GRP TYPE STRING,
UGR TYPE STRING,
MASS TYPE STRING,
HMASS TYPE STRING,
MASSN TYPE STRING,
UMASS TYPE STRING,
OBJ TYPE STRING,
PRUEFZ TYPE STRING,
HHSTELLE TYPE STRING,
PNAME TYPE STRING,
TEXT1 TYPE STRING,
TEXT2 TYPE STRING,
TEXT3 TYPE STRING,
POTYP TYPE STRING,
HSART TYPE STRING,
BSAMT TYPE STRING,
BEZIRK TYPE STRING,
HIE_ID TYPE STRING,
PLEVL TYPE STRING,
FIPUP TYPE STRING,
WAERS TYPE STRING,
ZB_PLJ_O TYPE STRING,
ZB_PLJ_N TYPE STRING,
ZB_RUECK TYPE STRING,
ZB_RED TYPE STRING,
ZB_PLJ_RM TYPE STRING,
ZB_PLJ_AR TYPE STRING,
GJW_S TYPE STRING,
GJW_E TYPE STRING,
GJW_SP TYPE STRING,
APL_UEPL_S TYPE STRING,
APL_UEPL_E TYPE STRING,
APL_UEPL_T TYPE STRING,
APL_UEPL_EA TYPE STRING,
E_DF_S TYPE STRING,
E_DF_E TYPE STRING,
E_DF_T TYPE STRING,
UE_DF TYPE STRING,
VO_MSPERR TYPE STRING,
VO_MRES TYPE STRING,
VO_MVORB TYPE STRING,
VO_MBIND TYPE STRING,
BANF TYPE STRING,
BESTELL TYPE STRING,
AO_SOLL_VOR TYPE STRING,
AO_SOLL_BUCH TYPE STRING,
EUMBU TYPE STRING,
CO_BUCH TYPE STRING,
IST_ANZ TYPE STRING,
IST TYPE STRING,
KA_REST TYPE STRING,
KA_REST_AB TYPE STRING,
KA_REST_IST TYPE STRING,
CURROBJ0 TYPE STRING,
CURROBJ1 TYPE STRING,
CURROBJ2 TYPE STRING,
CURROBJ3 TYPE STRING,
CURROBJ4 TYPE STRING,
CURROBJ5 TYPE STRING,
CURROBJ6 TYPE STRING,
CURROBJ7 TYPE STRING,
CURROBJ8 TYPE STRING,
CURROBJ9 TYPE STRING,
CURROBJ10 TYPE STRING,
CURROBJ11 TYPE STRING,
CURROBJ12 TYPE STRING,
CURROBJ13 TYPE STRING,
CURROBJ14 TYPE STRING,
CURROBJ15 TYPE STRING,
V_BEZEI TYPE STRING,
VOBJ0 TYPE STRING,
VOBJ0T TYPE STRING,
VOBJ1 TYPE STRING,
VOBJ1T TYPE STRING,
VOBJ2 TYPE STRING,
VOBJ2T TYPE STRING,
VOBJ3 TYPE STRING,
VOBJ3T TYPE STRING,
VOBJ4 TYPE STRING,
VOBJ4T TYPE STRING,
VOBJ5 TYPE STRING,
VOBJ5T TYPE STRING,
VOBJ6 TYPE STRING,
VOBJ6T TYPE STRING,
VOBJ7 TYPE STRING,
VOBJ7T TYPE STRING,
VOBJ8 TYPE STRING,
VOBJ8T TYPE STRING,
VOBJ9 TYPE STRING,
VOBJ9T TYPE STRING,
INFO TYPE STRING,
CHECKBOX TYPE STRING,END OF T_EKKO_STR.
DATA: WA_IFMRKJRA_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_IFMRKJRA_STR-FIPEX sy-vline 
WA_IFMRKJRA_STR-FICTR sy-vline 
WA_IFMRKJRA_STR-FOND sy-vline 
WA_IFMRKJRA_STR-PRAEFIX sy-vline 
WA_IFMRKJRA_STR-GLD sy-vline 
WA_IFMRKJRA_STR-EPL sy-vline 
WA_IFMRKJRA_STR-ABSCHN sy-vline 
WA_IFMRKJRA_STR-UABSCH sy-vline 
WA_IFMRKJRA_STR-GRUPPE sy-vline 
WA_IFMRKJRA_STR-HGR sy-vline 
WA_IFMRKJRA_STR-GRP sy-vline 
WA_IFMRKJRA_STR-UGR sy-vline 
WA_IFMRKJRA_STR-MASS sy-vline 
WA_IFMRKJRA_STR-HMASS sy-vline 
WA_IFMRKJRA_STR-MASSN sy-vline 
WA_IFMRKJRA_STR-UMASS sy-vline 
WA_IFMRKJRA_STR-OBJ sy-vline 
WA_IFMRKJRA_STR-PRUEFZ sy-vline 
WA_IFMRKJRA_STR-HHSTELLE sy-vline 
WA_IFMRKJRA_STR-PNAME sy-vline 
WA_IFMRKJRA_STR-TEXT1 sy-vline 
WA_IFMRKJRA_STR-TEXT2 sy-vline 
WA_IFMRKJRA_STR-TEXT3 sy-vline 
WA_IFMRKJRA_STR-POTYP sy-vline 
WA_IFMRKJRA_STR-HSART sy-vline 
WA_IFMRKJRA_STR-BSAMT sy-vline 
WA_IFMRKJRA_STR-BEZIRK sy-vline 
WA_IFMRKJRA_STR-HIE_ID sy-vline 
WA_IFMRKJRA_STR-PLEVL sy-vline 
WA_IFMRKJRA_STR-FIPUP sy-vline 
WA_IFMRKJRA_STR-WAERS sy-vline 
WA_IFMRKJRA_STR-ZB_PLJ_O sy-vline 
WA_IFMRKJRA_STR-ZB_PLJ_N sy-vline 
WA_IFMRKJRA_STR-ZB_RUECK sy-vline 
WA_IFMRKJRA_STR-ZB_RED sy-vline 
WA_IFMRKJRA_STR-ZB_PLJ_RM sy-vline 
WA_IFMRKJRA_STR-ZB_PLJ_AR sy-vline 
WA_IFMRKJRA_STR-GJW_S sy-vline 
WA_IFMRKJRA_STR-GJW_E sy-vline 
WA_IFMRKJRA_STR-GJW_SP sy-vline 
WA_IFMRKJRA_STR-APL_UEPL_S sy-vline 
WA_IFMRKJRA_STR-APL_UEPL_E sy-vline 
WA_IFMRKJRA_STR-APL_UEPL_T sy-vline 
WA_IFMRKJRA_STR-APL_UEPL_EA sy-vline 
WA_IFMRKJRA_STR-E_DF_S sy-vline 
WA_IFMRKJRA_STR-E_DF_E sy-vline 
WA_IFMRKJRA_STR-E_DF_T sy-vline 
WA_IFMRKJRA_STR-UE_DF sy-vline 
WA_IFMRKJRA_STR-VO_MSPERR sy-vline 
WA_IFMRKJRA_STR-VO_MRES sy-vline 
WA_IFMRKJRA_STR-VO_MVORB sy-vline 
WA_IFMRKJRA_STR-VO_MBIND sy-vline 
WA_IFMRKJRA_STR-BANF sy-vline 
WA_IFMRKJRA_STR-BESTELL sy-vline 
WA_IFMRKJRA_STR-AO_SOLL_VOR sy-vline 
WA_IFMRKJRA_STR-AO_SOLL_BUCH sy-vline 
WA_IFMRKJRA_STR-EUMBU sy-vline 
WA_IFMRKJRA_STR-CO_BUCH sy-vline 
WA_IFMRKJRA_STR-IST_ANZ sy-vline 
WA_IFMRKJRA_STR-IST sy-vline 
WA_IFMRKJRA_STR-KA_REST sy-vline 
WA_IFMRKJRA_STR-KA_REST_AB sy-vline 
WA_IFMRKJRA_STR-KA_REST_IST sy-vline 
WA_IFMRKJRA_STR-CURROBJ0 sy-vline 
WA_IFMRKJRA_STR-CURROBJ1 sy-vline 
WA_IFMRKJRA_STR-CURROBJ2 sy-vline 
WA_IFMRKJRA_STR-CURROBJ3 sy-vline 
WA_IFMRKJRA_STR-CURROBJ4 sy-vline 
WA_IFMRKJRA_STR-CURROBJ5 sy-vline 
WA_IFMRKJRA_STR-CURROBJ6 sy-vline 
WA_IFMRKJRA_STR-CURROBJ7 sy-vline 
WA_IFMRKJRA_STR-CURROBJ8 sy-vline 
WA_IFMRKJRA_STR-CURROBJ9 sy-vline 
WA_IFMRKJRA_STR-CURROBJ10 sy-vline 
WA_IFMRKJRA_STR-CURROBJ11 sy-vline 
WA_IFMRKJRA_STR-CURROBJ12 sy-vline 
WA_IFMRKJRA_STR-CURROBJ13 sy-vline 
WA_IFMRKJRA_STR-CURROBJ14 sy-vline 
WA_IFMRKJRA_STR-CURROBJ15 sy-vline 
WA_IFMRKJRA_STR-V_BEZEI sy-vline 
WA_IFMRKJRA_STR-VOBJ0 sy-vline 
WA_IFMRKJRA_STR-VOBJ0T sy-vline 
WA_IFMRKJRA_STR-VOBJ1 sy-vline 
WA_IFMRKJRA_STR-VOBJ1T sy-vline 
WA_IFMRKJRA_STR-VOBJ2 sy-vline 
WA_IFMRKJRA_STR-VOBJ2T sy-vline 
WA_IFMRKJRA_STR-VOBJ3 sy-vline 
WA_IFMRKJRA_STR-VOBJ3T sy-vline 
WA_IFMRKJRA_STR-VOBJ4 sy-vline 
WA_IFMRKJRA_STR-VOBJ4T sy-vline 
WA_IFMRKJRA_STR-VOBJ5 sy-vline 
WA_IFMRKJRA_STR-VOBJ5T sy-vline 
WA_IFMRKJRA_STR-VOBJ6 sy-vline 
WA_IFMRKJRA_STR-VOBJ6T sy-vline 
WA_IFMRKJRA_STR-VOBJ7 sy-vline 
WA_IFMRKJRA_STR-VOBJ7T sy-vline 
WA_IFMRKJRA_STR-VOBJ8 sy-vline 
WA_IFMRKJRA_STR-VOBJ8T sy-vline 
WA_IFMRKJRA_STR-VOBJ9 sy-vline 
WA_IFMRKJRA_STR-VOBJ9T sy-vline 
WA_IFMRKJRA_STR-INFO sy-vline 
WA_IFMRKJRA_STR-CHECKBOX sy-vline      INTO ld_text SEPARATED BY SPACE.

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