ABAP Select data from SAP table MMPUR_ANAEXTEKET 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 MMPUR_ANAEXTEKET 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 MMPUR_ANAEXTEKET. 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 MMPUR_ANAEXTEKET 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_MMPUR_ANAEXTEKET TYPE STANDARD TABLE OF MMPUR_ANAEXTEKET,
      WA_MMPUR_ANAEXTEKET TYPE MMPUR_ANAEXTEKET,
      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: <MMPUR_ANAEXTEKET> TYPE MMPUR_ANAEXTEKET.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM MMPUR_ANAEXTEKET
*  INTO TABLE @DATA(IT_MMPUR_ANAEXTEKET2).
*--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_MMPUR_ANAEXTEKET INDEX 1 INTO DATA(WA_MMPUR_ANAEXTEKET2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_MMPUR_ANAEXTEKET ASSIGNING <MMPUR_ANAEXTEKET>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<MMPUR_ANAEXTEKET>-MANDT = 1.
<MMPUR_ANAEXTEKET>-EBELN = 1.
<MMPUR_ANAEXTEKET>-EBELP = 1.
<MMPUR_ANAEXTEKET>-ETENR = 1.
<MMPUR_ANAEXTEKET>-BE_SOURCE_SYS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_MMPUR_ANAEXTEKET-UNIQUEID, sy-vline,
WA_MMPUR_ANAEXTEKET-NETWR_SL_REPCURR1, sy-vline,
WA_MMPUR_ANAEXTEKET-NETWR_SL_REPCURR2, sy-vline,
WA_MMPUR_ANAEXTEKET-WAERS_REPCURR1, sy-vline,
WA_MMPUR_ANAEXTEKET-WAERS_REPCURR2, sy-vline,
WA_MMPUR_ANAEXTEKET-NETWR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_MMPUR_ANAEXTEKET 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_MMPUR_ANAEXTEKET 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_MMPUR_ANAEXTEKET INTO WA_MMPUR_ANAEXTEKET. *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 EBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_MMPUR_ANAEXTEKET-EBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MMPUR_ANAEXTEKET-EBELN.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_MMPUR_ANAEXTEKET-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MMPUR_ANAEXTEKET-MATNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_MMPUR_ANAEXTEKET-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_MMPUR_ANAEXTEKET-BELNR.
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_MMPUR_ANAEXTEKET_STR,
MANDT TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
ETENR TYPE STRING,
BE_SOURCE_SYS TYPE STRING,
UNIQUEID TYPE STRING,
NETWR_SL_REPCURR1 TYPE STRING,
NETWR_SL_REPCURR2 TYPE STRING,
WAERS_REPCURR1 TYPE STRING,
WAERS_REPCURR2 TYPE STRING,
NETWR TYPE STRING,
WAERS TYPE STRING,
NETWR_BASE TYPE STRING,
WAERS_BASE TYPE STRING,
OBMNG TYPE STRING,
OBMNG_NETWR_REPCURR1 TYPE STRING,
OBMNG_NETWR_REPCURR2 TYPE STRING,
OBMNG_NETWR_BASE TYPE STRING,
OBMNG_NETWR TYPE STRING,
MEINS TYPE STRING,
ZERO_VAL_REPCURR_IND TYPE STRING,
NETPR_REPCURR1 TYPE STRING,
NETPR_REPCURR2 TYPE STRING,
NETPR_BASE TYPE STRING,
EKORG TYPE STRING,
EKGRP TYPE STRING,
BUKRS TYPE STRING,
WERKS TYPE STRING,
LIFNR TYPE STRING,
MATNR TYPE STRING,
MATKL TYPE STRING,
SERVICEPERFORMER TYPE STRING,
ELIKZ TYPE STRING,
WEPOS TYPE STRING,
LOEKZ TYPE STRING,
MEMORY TYPE STRING,
BSTYP TYPE STRING,
BSART TYPE STRING,
PSTYP TYPE STRING,
KTPNR TYPE STRING,
KNTTP TYPE STRING,
VRTKZ TYPE STRING,
KONNR TYPE STRING,
AEDAT TYPE STRING,
STATU TYPE STRING,
ERNAM TYPE STRING,
LASTCHANGEDATETIME TYPE STRING,
PROCSTAT TYPE STRING,
BEDAT_POHDR TYPE STRING,
ISAGED TYPE STRING,
MENGE_EKPO TYPE STRING,
MEINS_EKPO TYPE STRING,
BPUMZ TYPE STRING,
BPUMN TYPE STRING,
BPRME TYPE STRING,
NETPR TYPE STRING,
RETPO TYPE STRING,
PEINH TYPE STRING,
PRODUCTTYPE TYPE STRING,
FRGRL TYPE STRING,
LOEKZ_POHDR TYPE STRING,
USERDESCRIPTION TYPE STRING,
EXTRACTIONDATETIME TYPE STRING,
UMREZ TYPE STRING,
UMREN TYPE STRING,
LMEIN TYPE STRING,
RESWK TYPE STRING,
EINDT TYPE STRING,
SLFDT TYPE STRING,
LPEIN TYPE STRING,
MENGE TYPE STRING,
AMENG TYPE STRING,
WEMNG TYPE STRING,
WAMNG TYPE STRING,
UZEIT TYPE STRING,
BANFN TYPE STRING,
BNFPO TYPE STRING,
ESTKZ TYPE STRING,
MAHNZ TYPE STRING,
BEDAT TYPE STRING,
FIXKZ TYPE STRING,
ABART TYPE STRING,
MNG02 TYPE STRING,
DAT01 TYPE STRING,
ALTDT TYPE STRING,
MBDAT TYPE STRING,
MBUHR TYPE STRING,
LDDAT TYPE STRING,
LDUHR TYPE STRING,
TDDAT TYPE STRING,
TDUHR TYPE STRING,
WADAT TYPE STRING,
WAUHR TYPE STRING,
ELDAT TYPE STRING,
ELUHR TYPE STRING,
STARTDATE TYPE STRING,
ENDDATE TYPE STRING,
_DATAAGING TYPE STRING,
GJAHR TYPE STRING,
BELNR TYPE STRING,
BUZEI TYPE STRING,
BUDAT TYPE STRING,
DUMMY_EXT_EKPO_INCL_EEW_PS TYPE STRING,
DUMMY_EXTN_EKKO_INCL_EEW_PS TYPE STRING,
DUMMY_EXT_EKKO_INCL_EEW_PS TYPE STRING,
ZDUMMY TYPE STRING,END OF T_EKKO_STR. DATA: WA_MMPUR_ANAEXTEKET_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_MMPUR_ANAEXTEKET_STR-MANDT sy-vline
WA_MMPUR_ANAEXTEKET_STR-EBELN sy-vline
WA_MMPUR_ANAEXTEKET_STR-EBELP sy-vline
WA_MMPUR_ANAEXTEKET_STR-ETENR sy-vline
WA_MMPUR_ANAEXTEKET_STR-BE_SOURCE_SYS sy-vline
WA_MMPUR_ANAEXTEKET_STR-UNIQUEID sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETWR_SL_REPCURR1 sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETWR_SL_REPCURR2 sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAERS_REPCURR1 sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAERS_REPCURR2 sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETWR sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAERS sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETWR_BASE sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAERS_BASE sy-vline
WA_MMPUR_ANAEXTEKET_STR-OBMNG sy-vline
WA_MMPUR_ANAEXTEKET_STR-OBMNG_NETWR_REPCURR1 sy-vline
WA_MMPUR_ANAEXTEKET_STR-OBMNG_NETWR_REPCURR2 sy-vline
WA_MMPUR_ANAEXTEKET_STR-OBMNG_NETWR_BASE sy-vline
WA_MMPUR_ANAEXTEKET_STR-OBMNG_NETWR sy-vline
WA_MMPUR_ANAEXTEKET_STR-MEINS sy-vline
WA_MMPUR_ANAEXTEKET_STR-ZERO_VAL_REPCURR_IND sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETPR_REPCURR1 sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETPR_REPCURR2 sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETPR_BASE sy-vline
WA_MMPUR_ANAEXTEKET_STR-EKORG sy-vline
WA_MMPUR_ANAEXTEKET_STR-EKGRP sy-vline
WA_MMPUR_ANAEXTEKET_STR-BUKRS sy-vline
WA_MMPUR_ANAEXTEKET_STR-WERKS sy-vline
WA_MMPUR_ANAEXTEKET_STR-LIFNR sy-vline
WA_MMPUR_ANAEXTEKET_STR-MATNR sy-vline
WA_MMPUR_ANAEXTEKET_STR-MATKL sy-vline
WA_MMPUR_ANAEXTEKET_STR-SERVICEPERFORMER sy-vline
WA_MMPUR_ANAEXTEKET_STR-ELIKZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-WEPOS sy-vline
WA_MMPUR_ANAEXTEKET_STR-LOEKZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-MEMORY sy-vline
WA_MMPUR_ANAEXTEKET_STR-BSTYP sy-vline
WA_MMPUR_ANAEXTEKET_STR-BSART sy-vline
WA_MMPUR_ANAEXTEKET_STR-PSTYP sy-vline
WA_MMPUR_ANAEXTEKET_STR-KTPNR sy-vline
WA_MMPUR_ANAEXTEKET_STR-KNTTP sy-vline
WA_MMPUR_ANAEXTEKET_STR-VRTKZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-KONNR sy-vline
WA_MMPUR_ANAEXTEKET_STR-AEDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-STATU sy-vline
WA_MMPUR_ANAEXTEKET_STR-ERNAM sy-vline
WA_MMPUR_ANAEXTEKET_STR-LASTCHANGEDATETIME sy-vline
WA_MMPUR_ANAEXTEKET_STR-PROCSTAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-BEDAT_POHDR sy-vline
WA_MMPUR_ANAEXTEKET_STR-ISAGED sy-vline
WA_MMPUR_ANAEXTEKET_STR-MENGE_EKPO sy-vline
WA_MMPUR_ANAEXTEKET_STR-MEINS_EKPO sy-vline
WA_MMPUR_ANAEXTEKET_STR-BPUMZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-BPUMN sy-vline
WA_MMPUR_ANAEXTEKET_STR-BPRME sy-vline
WA_MMPUR_ANAEXTEKET_STR-NETPR sy-vline
WA_MMPUR_ANAEXTEKET_STR-RETPO sy-vline
WA_MMPUR_ANAEXTEKET_STR-PEINH sy-vline
WA_MMPUR_ANAEXTEKET_STR-PRODUCTTYPE sy-vline
WA_MMPUR_ANAEXTEKET_STR-FRGRL sy-vline
WA_MMPUR_ANAEXTEKET_STR-LOEKZ_POHDR sy-vline
WA_MMPUR_ANAEXTEKET_STR-USERDESCRIPTION sy-vline
WA_MMPUR_ANAEXTEKET_STR-EXTRACTIONDATETIME sy-vline
WA_MMPUR_ANAEXTEKET_STR-UMREZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-UMREN sy-vline
WA_MMPUR_ANAEXTEKET_STR-LMEIN sy-vline
WA_MMPUR_ANAEXTEKET_STR-RESWK sy-vline
WA_MMPUR_ANAEXTEKET_STR-EINDT sy-vline
WA_MMPUR_ANAEXTEKET_STR-SLFDT sy-vline
WA_MMPUR_ANAEXTEKET_STR-LPEIN sy-vline
WA_MMPUR_ANAEXTEKET_STR-MENGE sy-vline
WA_MMPUR_ANAEXTEKET_STR-AMENG sy-vline
WA_MMPUR_ANAEXTEKET_STR-WEMNG sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAMNG sy-vline
WA_MMPUR_ANAEXTEKET_STR-UZEIT sy-vline
WA_MMPUR_ANAEXTEKET_STR-BANFN sy-vline
WA_MMPUR_ANAEXTEKET_STR-BNFPO sy-vline
WA_MMPUR_ANAEXTEKET_STR-ESTKZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-MAHNZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-BEDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-FIXKZ sy-vline
WA_MMPUR_ANAEXTEKET_STR-ABART sy-vline
WA_MMPUR_ANAEXTEKET_STR-MNG02 sy-vline
WA_MMPUR_ANAEXTEKET_STR-DAT01 sy-vline
WA_MMPUR_ANAEXTEKET_STR-ALTDT sy-vline
WA_MMPUR_ANAEXTEKET_STR-MBDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-MBUHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-LDDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-LDUHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-TDDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-TDUHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-WADAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-WAUHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-ELDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-ELUHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-STARTDATE sy-vline
WA_MMPUR_ANAEXTEKET_STR-ENDDATE sy-vline
WA_MMPUR_ANAEXTEKET_STR-_DATAAGING sy-vline
WA_MMPUR_ANAEXTEKET_STR-GJAHR sy-vline
WA_MMPUR_ANAEXTEKET_STR-BELNR sy-vline
WA_MMPUR_ANAEXTEKET_STR-BUZEI sy-vline
WA_MMPUR_ANAEXTEKET_STR-BUDAT sy-vline
WA_MMPUR_ANAEXTEKET_STR-DUMMY_EXT_EKPO_INCL_EEW_PS sy-vline
WA_MMPUR_ANAEXTEKET_STR-DUMMY_EXTN_EKKO_INCL_EEW_PS sy-vline
WA_MMPUR_ANAEXTEKET_STR-DUMMY_EXT_EKKO_INCL_EEW_PS sy-vline
WA_MMPUR_ANAEXTEKET_STR-ZDUMMY sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.