ABAP Select data from SAP table /STTPEC/S_PROC_EVTO 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 /STTPEC/S_PROC_EVTO 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 /STTPEC/S_PROC_EVTO. 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 /STTPEC/S_PROC_EVTO 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_/STTPEC/S_PROC_EVTO TYPE STANDARD TABLE OF /STTPEC/S_PROC_EVTO, WA_/STTPEC/S_PROC_EVTO TYPE /STTPEC/S_PROC_EVTO, 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: </STTPEC/S_PROC_EVTO> TYPE /STTPEC/S_PROC_EVTO. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_/STTPEC/S_PROC_EVTO. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM /STTPEC/S_PROC_EVTO INTO TABLE IT_/STTPEC/S_PROC_EVTO. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM /STTPEC/S_PROC_EVTO * INTO TABLE @DATA(IT_/STTPEC/S_PROC_EVTO2). *--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_/STTPEC/S_PROC_EVTO INDEX 1 INTO DATA(WA_/STTPEC/S_PROC_EVTO2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_/STTPEC/S_PROC_EVTO ASSIGNING </STTPEC/S_PROC_EVTO>.*To update a field value using a field symbol simply change the value via the field symbol pointer
</STTPEC/S_PROC_EVTO>-EVTTIME = 1.
</STTPEC/S_PROC_EVTO>-EVTTZONE = 1.
</STTPEC/S_PROC_EVTO>-EVTACTION = 1.
</STTPEC/S_PROC_EVTO>-BIZSTEP = 1.
</STTPEC/S_PROC_EVTO>-DISPOSITION = 1.
ENDLOOP. LOOP AT IT_/STTPEC/S_PROC_EVTO INTO WA_/STTPEC/S_PROC_EVTO. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/STTPEC/S_PROC_EVTO-BIZLOCATION, sy-vline,
WA_/STTPEC/S_PROC_EVTO-READPOINT, sy-vline,
WA_/STTPEC/S_PROC_EVTO-OBJECTLIST, sy-vline,
WA_/STTPEC/S_PROC_EVTO-QUANTITYLIST, sy-vline,
WA_/STTPEC/S_PROC_EVTO-BIZTRANSACTIONLIST, sy-vline,
WA_/STTPEC/S_PROC_EVTO-SOURCELIST, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/STTPEC/S_PROC_EVTO 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_/STTPEC/S_PROC_EVTO 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_/STTPEC/S_PROC_EVTO INTO WA_/STTPEC/S_PROC_EVTO. *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 TSTPS, internal->external for field EVTTIME CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT' EXPORTING input = WA_/STTPEC/S_PROC_EVTO-EVTTIME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/STTPEC/S_PROC_EVTO-EVTTIME.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field WEIGHT_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/STTPEC/S_PROC_EVTO-WEIGHT_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/STTPEC/S_PROC_EVTO-WEIGHT_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field VOLUME_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/STTPEC/S_PROC_EVTO-VOLUME_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/STTPEC/S_PROC_EVTO-VOLUME_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field QUANTITY_UOM CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/STTPEC/S_PROC_EVTO-QUANTITY_UOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/STTPEC/S_PROC_EVTO-QUANTITY_UOM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_/STTPEC/S_PROC_EVTO-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/STTPEC/S_PROC_EVTO-MATNR.
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_/STTPEC/S_PROC_EVTO_STR,
EVTTIME TYPE STRING,
EVTTZONE TYPE STRING,
EVTACTION TYPE STRING,
BIZSTEP TYPE STRING,
DISPOSITION TYPE STRING,
BIZLOCATION TYPE STRING,
READPOINT TYPE STRING,
OBJECTLIST TYPE STRING,
QUANTITYLIST TYPE STRING,
BIZTRANSACTIONLIST TYPE STRING,
SOURCELIST TYPE STRING,
DESTINATIONLIST TYPE STRING,
SAPEXTENSION TYPE STRING,
EVTATTRIBUTES TYPE STRING,
TRG_COUNTRY TYPE STRING,
OBJATTRIBUTES TYPE STRING,
GTIN TYPE STRING,
SERNO TYPE STRING,
LOT_OBJID TYPE STRING,
WEIGHT TYPE STRING,
WEIGHT_UOM TYPE STRING,
VOLUME TYPE STRING,
VOLUME_UOM TYPE STRING,
QUANTITY TYPE STRING,
QUANTITY_UOM TYPE STRING,
GLN TYPE STRING,
GLN_EXT TYPE STRING,
LOTNO TYPE STRING,
DATEX TYPE STRING,
DATMF TYPE STRING,
MATNR TYPE STRING,
QTY_PROD TYPE STRING,
QTY_REC TYPE STRING,
QTY_SHP TYPE STRING,
TRNATTRIBUTES TYPE STRING,
SHIP_FR_LOC TYPE STRING,
SHIP_TO_LOC TYPE STRING,
SOLD_FR_LOC TYPE STRING,
SOLD_TO_LOC TYPE STRING,
OBJATTGROUPLIST TYPE STRING,
EXT_XMLX TYPE STRING,END OF T_EKKO_STR. DATA: WA_/STTPEC/S_PROC_EVTO_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_/STTPEC/S_PROC_EVTO_STR-EVTTIME sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-EVTTZONE sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-EVTACTION sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-BIZSTEP sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-DISPOSITION sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-BIZLOCATION sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-READPOINT sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-OBJECTLIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QUANTITYLIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-BIZTRANSACTIONLIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SOURCELIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-DESTINATIONLIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SAPEXTENSION sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-EVTATTRIBUTES sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-TRG_COUNTRY sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-OBJATTRIBUTES sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-GTIN sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SERNO sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-LOT_OBJID sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-WEIGHT sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-WEIGHT_UOM sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-VOLUME sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-VOLUME_UOM sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QUANTITY sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QUANTITY_UOM sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-GLN sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-GLN_EXT sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-LOTNO sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-DATEX sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-DATMF sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-MATNR sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QTY_PROD sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QTY_REC sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-QTY_SHP sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-TRNATTRIBUTES sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SHIP_FR_LOC sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SHIP_TO_LOC sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SOLD_FR_LOC sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-SOLD_TO_LOC sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-OBJATTGROUPLIST sy-vline
WA_/STTPEC/S_PROC_EVTO_STR-EXT_XMLX sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.