SAP DB2QSTCC ABAP Select data from SAP table
Below is a number of ABAP code snippets to demonstrate how to select data from SAP DB2QSTCC 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 DB2QSTCC. 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 DB2QSTCC 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_DB2QSTCC TYPE STANDARD TABLE OF DB2QSTCC,
WA_DB2QSTCC TYPE DB2QSTCC,
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: <DB2QSTCC> TYPE DB2QSTCC.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_DB2QSTCC.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM DB2QSTCC
INTO TABLE IT_DB2QSTCC.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM DB2QSTCC
* INTO TABLE @DATA(IT_DB2QSTCC2).
*--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_DB2QSTCC INDEX 1 INTO DATA(WA_DB2QSTCC2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_DB2QSTCC ASSIGNING <DB2QSTCC>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<DB2QSTCC>-RETOEXECS = 1.
<DB2QSTCC>-RPTOEXECS = 1.
<DB2QSTCC>-RPTOROWEXE = 1.
<DB2QSTCC>-RAETOEXECS = 1.
<DB2QSTCC>-AVGCPU = 1.
ENDLOOP. LOOP AT IT_DB2QSTCC INTO WA_DB2QSTCC. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_DB2QSTCC-AVGWAIT, sy-vline,
WA_DB2QSTCC-AVGSIOW, sy-vline,
WA_DB2QSTCC-AVGSYIO, sy-vline,
WA_DB2QSTCC-RIDFAIL, sy-vline,
WA_DB2QSTCC-GPRPROC, sy-vline,
WA_DB2QSTCC-RETOPROW, sy-vline.
ENDLOOP. *Add any further fields from structure WA_DB2QSTCC 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_DB2QSTCC 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_DB2QSTCC INTO WA_DB2QSTCC. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_DB2QSTCC_STR,
RETOEXECS TYPE STRING,
RPTOEXECS TYPE STRING,
RPTOROWEXE TYPE STRING,
RAETOEXECS TYPE STRING,
AVGCPU TYPE STRING,
AVGWAIT TYPE STRING,
AVGSIOW TYPE STRING,
AVGSYIO TYPE STRING,
RIDFAIL TYPE STRING,
GPRPROC TYPE STRING,
RETOPROW TYPE STRING,
STATTXT TYPE STRING,
AVGLOLA TYPE STRING,
AVGEUSW TYPE STRING,
AVGGLLO TYPE STRING,
AVGREAD TYPE STRING,
AVGWRIT TYPE STRING,
AVGLARQ TYPE STRING,
AVGPGLA TYPE STRING,
AVGDRLO TYPE STRING,
AVGCLRL TYPE STRING,
AVGLOGW TYPE STRING,
AVGOTHE TYPE STRING,
TIMCPU TYPE STRING,
TIMWAIT TYPE STRING,
TIMSYIO TYPE STRING,
TIMLOLA TYPE STRING,
TIMEUSW TYPE STRING,
TIMGLLO TYPE STRING,
TIMREAD TYPE STRING,
TIMWRIT TYPE STRING,
TIMLARQ TYPE STRING,
TIMPGLA TYPE STRING,
TIMDRLO TYPE STRING,
TIMCLRL TYPE STRING,
TIMLOGW TYPE STRING,
TIMOTHE TYPE STRING,
RANBTONE TYPE STRING,
RANWTONE TYPE STRING,
RANGTONE TYPE STRING,
RANSTONE TYPE STRING,
RANITONE TYPE STRING,
RANTTONE TYPE STRING,
RARSTONE TYPE STRING,
RARTTONE TYPE STRING,
RANLTONE TYPE STRING,
RANGTONP TYPE STRING,
RANRTONP TYPE STRING,
RAW1TOBW TYPE STRING,
EXECPSEC TYPE STRING,
QSTCSTNM TYPE STRING,
QSTCTOKN TYPE STRING,
QSTCUSE TYPE STRING,
QSTCCOPY TYPE STRING,
QSTCSTAT TYPE STRING,
QSTCIDDL TYPE STRING,
QSTCIRVK TYPE STRING,
QSTCIRST TYPE STRING,
QSTCCLRU TYPE STRING,
QSTCISTM TYPE STRING,
QSTCEXEC TYPE STRING,
QSTCRBUF TYPE STRING,
QSTCGPAG TYPE STRING,
QSTCEROW TYPE STRING,
QSTCPROW TYPE STRING,
QSTCSORT TYPE STRING,
QSTCINDX TYPE STRING,
QSTCTSCN TYPE STRING,
QSTCPLGP TYPE STRING,
QSTCWRIT TYPE STRING,
QSTCAET1 TYPE STRING,
QSTCAET2 TYPE STRING,
QSTCAET TYPE STRING,
QSTCSTLN TYPE STRING,
QSTCSTMT TYPE STRING,
QW0316L1 TYPE STRING,
QW0316T1 TYPE STRING,
QW0316LX TYPE STRING,
QW0316L2 TYPE STRING,
QW0316T2 TYPE STRING,
QW0316L3 TYPE STRING,
QW0316T3 TYPE STRING,
QW0316X4 TYPE STRING,
QW0316X5 TYPE STRING,
QW0316X6 TYPE STRING,
QW0316X7T TYPE STRING,
QW0316X8T TYPE STRING,
QW0316X9T TYPE STRING,
QW0316XAT TYPE STRING,
QW0316XBT TYPE STRING,
QW0316XCT TYPE STRING,
QW0316TS TYPE STRING,
QW0316TD TYPE STRING,
QW0316CT TYPE STRING,
QW0316W1 TYPE STRING,
QW0316W2 TYPE STRING,
QW0316W3 TYPE STRING,
QW0316W4 TYPE STRING,
QW0316W5 TYPE STRING,
QW0316W6 TYPE STRING,
QW0316W7 TYPE STRING,
QW0316W8 TYPE STRING,
QW0316W9 TYPE STRING,
QW0316WA TYPE STRING,
QW0316WB TYPE STRING,
QW0316RT TYPE STRING,
QW0316RS TYPE STRING,
RRSAFPGM TYPE STRING,
RRSAFLEN TYPE STRING,END OF T_EKKO_STR. DATA: WA_DB2QSTCC_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_DB2QSTCC_STR-RETOEXECS sy-vline
WA_DB2QSTCC_STR-RPTOEXECS sy-vline
WA_DB2QSTCC_STR-RPTOROWEXE sy-vline
WA_DB2QSTCC_STR-RAETOEXECS sy-vline
WA_DB2QSTCC_STR-AVGCPU sy-vline
WA_DB2QSTCC_STR-AVGWAIT sy-vline
WA_DB2QSTCC_STR-AVGSIOW sy-vline
WA_DB2QSTCC_STR-AVGSYIO sy-vline
WA_DB2QSTCC_STR-RIDFAIL sy-vline
WA_DB2QSTCC_STR-GPRPROC sy-vline
WA_DB2QSTCC_STR-RETOPROW sy-vline
WA_DB2QSTCC_STR-STATTXT sy-vline
WA_DB2QSTCC_STR-AVGLOLA sy-vline
WA_DB2QSTCC_STR-AVGEUSW sy-vline
WA_DB2QSTCC_STR-AVGGLLO sy-vline
WA_DB2QSTCC_STR-AVGREAD sy-vline
WA_DB2QSTCC_STR-AVGWRIT sy-vline
WA_DB2QSTCC_STR-AVGLARQ sy-vline
WA_DB2QSTCC_STR-AVGPGLA sy-vline
WA_DB2QSTCC_STR-AVGDRLO sy-vline
WA_DB2QSTCC_STR-AVGCLRL sy-vline
WA_DB2QSTCC_STR-AVGLOGW sy-vline
WA_DB2QSTCC_STR-AVGOTHE sy-vline
WA_DB2QSTCC_STR-TIMCPU sy-vline
WA_DB2QSTCC_STR-TIMWAIT sy-vline
WA_DB2QSTCC_STR-TIMSYIO sy-vline
WA_DB2QSTCC_STR-TIMLOLA sy-vline
WA_DB2QSTCC_STR-TIMEUSW sy-vline
WA_DB2QSTCC_STR-TIMGLLO sy-vline
WA_DB2QSTCC_STR-TIMREAD sy-vline
WA_DB2QSTCC_STR-TIMWRIT sy-vline
WA_DB2QSTCC_STR-TIMLARQ sy-vline
WA_DB2QSTCC_STR-TIMPGLA sy-vline
WA_DB2QSTCC_STR-TIMDRLO sy-vline
WA_DB2QSTCC_STR-TIMCLRL sy-vline
WA_DB2QSTCC_STR-TIMLOGW sy-vline
WA_DB2QSTCC_STR-TIMOTHE sy-vline
WA_DB2QSTCC_STR-RANBTONE sy-vline
WA_DB2QSTCC_STR-RANWTONE sy-vline
WA_DB2QSTCC_STR-RANGTONE sy-vline
WA_DB2QSTCC_STR-RANSTONE sy-vline
WA_DB2QSTCC_STR-RANITONE sy-vline
WA_DB2QSTCC_STR-RANTTONE sy-vline
WA_DB2QSTCC_STR-RARSTONE sy-vline
WA_DB2QSTCC_STR-RARTTONE sy-vline
WA_DB2QSTCC_STR-RANLTONE sy-vline
WA_DB2QSTCC_STR-RANGTONP sy-vline
WA_DB2QSTCC_STR-RANRTONP sy-vline
WA_DB2QSTCC_STR-RAW1TOBW sy-vline
WA_DB2QSTCC_STR-EXECPSEC sy-vline
WA_DB2QSTCC_STR-QSTCSTNM sy-vline
WA_DB2QSTCC_STR-QSTCTOKN sy-vline
WA_DB2QSTCC_STR-QSTCUSE sy-vline
WA_DB2QSTCC_STR-QSTCCOPY sy-vline
WA_DB2QSTCC_STR-QSTCSTAT sy-vline
WA_DB2QSTCC_STR-QSTCIDDL sy-vline
WA_DB2QSTCC_STR-QSTCIRVK sy-vline
WA_DB2QSTCC_STR-QSTCIRST sy-vline
WA_DB2QSTCC_STR-QSTCCLRU sy-vline
WA_DB2QSTCC_STR-QSTCISTM sy-vline
WA_DB2QSTCC_STR-QSTCEXEC sy-vline
WA_DB2QSTCC_STR-QSTCRBUF sy-vline
WA_DB2QSTCC_STR-QSTCGPAG sy-vline
WA_DB2QSTCC_STR-QSTCEROW sy-vline
WA_DB2QSTCC_STR-QSTCPROW sy-vline
WA_DB2QSTCC_STR-QSTCSORT sy-vline
WA_DB2QSTCC_STR-QSTCINDX sy-vline
WA_DB2QSTCC_STR-QSTCTSCN sy-vline
WA_DB2QSTCC_STR-QSTCPLGP sy-vline
WA_DB2QSTCC_STR-QSTCWRIT sy-vline
WA_DB2QSTCC_STR-QSTCAET1 sy-vline
WA_DB2QSTCC_STR-QSTCAET2 sy-vline
WA_DB2QSTCC_STR-QSTCAET sy-vline
WA_DB2QSTCC_STR-QSTCSTLN sy-vline
WA_DB2QSTCC_STR-QSTCSTMT sy-vline
WA_DB2QSTCC_STR-QW0316L1 sy-vline
WA_DB2QSTCC_STR-QW0316T1 sy-vline
WA_DB2QSTCC_STR-QW0316LX sy-vline
WA_DB2QSTCC_STR-QW0316L2 sy-vline
WA_DB2QSTCC_STR-QW0316T2 sy-vline
WA_DB2QSTCC_STR-QW0316L3 sy-vline
WA_DB2QSTCC_STR-QW0316T3 sy-vline
WA_DB2QSTCC_STR-QW0316X4 sy-vline
WA_DB2QSTCC_STR-QW0316X5 sy-vline
WA_DB2QSTCC_STR-QW0316X6 sy-vline
WA_DB2QSTCC_STR-QW0316X7T sy-vline
WA_DB2QSTCC_STR-QW0316X8T sy-vline
WA_DB2QSTCC_STR-QW0316X9T sy-vline
WA_DB2QSTCC_STR-QW0316XAT sy-vline
WA_DB2QSTCC_STR-QW0316XBT sy-vline
WA_DB2QSTCC_STR-QW0316XCT sy-vline
WA_DB2QSTCC_STR-QW0316TS sy-vline
WA_DB2QSTCC_STR-QW0316TD sy-vline
WA_DB2QSTCC_STR-QW0316CT sy-vline
WA_DB2QSTCC_STR-QW0316W1 sy-vline
WA_DB2QSTCC_STR-QW0316W2 sy-vline
WA_DB2QSTCC_STR-QW0316W3 sy-vline
WA_DB2QSTCC_STR-QW0316W4 sy-vline
WA_DB2QSTCC_STR-QW0316W5 sy-vline
WA_DB2QSTCC_STR-QW0316W6 sy-vline
WA_DB2QSTCC_STR-QW0316W7 sy-vline
WA_DB2QSTCC_STR-QW0316W8 sy-vline
WA_DB2QSTCC_STR-QW0316W9 sy-vline
WA_DB2QSTCC_STR-QW0316WA sy-vline
WA_DB2QSTCC_STR-QW0316WB sy-vline
WA_DB2QSTCC_STR-QW0316RT sy-vline
WA_DB2QSTCC_STR-QW0316RS sy-vline
WA_DB2QSTCC_STR-RRSAFPGM sy-vline
WA_DB2QSTCC_STR-RRSAFLEN sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
Search for further information about these or an SAP related objects