ABAP Select data from SAP table DB2_ACCOUNTING_DATA 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 DB2_ACCOUNTING_DATA 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 DB2_ACCOUNTING_DATA. 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 DB2_ACCOUNTING_DATA 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_DB2_ACCOUNTING_DATA TYPE STANDARD TABLE OF DB2_ACCOUNTING_DATA,
      WA_DB2_ACCOUNTING_DATA TYPE DB2_ACCOUNTING_DATA,
      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: <DB2_ACCOUNTING_DATA> TYPE DB2_ACCOUNTING_DATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM DB2_ACCOUNTING_DATA
*  INTO TABLE @DATA(IT_DB2_ACCOUNTING_DATA2).
*--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_DB2_ACCOUNTING_DATA INDEX 1 INTO DATA(WA_DB2_ACCOUNTING_DATA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_DB2_ACCOUNTING_DATA ASSIGNING <DB2_ACCOUNTING_DATA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<DB2_ACCOUNTING_DATA>-INTERVAL_START = 1.
<DB2_ACCOUNTING_DATA>-SUBSYSTEM_ID = 1.
<DB2_ACCOUNTING_DATA>-DB2_MEMBER = 1.
<DB2_ACCOUNTING_DATA>-DS_GROUP = 1.
<DB2_ACCOUNTING_DATA>-CLIENT_IP_ADDRESS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_DB2_ACCOUNTING_DATA-ENDUSER, sy-vline,
WA_DB2_ACCOUNTING_DATA-TRANSACTION, sy-vline,
WA_DB2_ACCOUNTING_DATA-PROGRAM, sy-vline,
WA_DB2_ACCOUNTING_DATA-CL1_ELAPSED, sy-vline,
WA_DB2_ACCOUNTING_DATA-CL1_NONNESTED, sy-vline,
WA_DB2_ACCOUNTING_DATA-CL1_STOPROC, sy-vline.
ENDLOOP. *Add any further fields from structure WA_DB2_ACCOUNTING_DATA 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_DB2_ACCOUNTING_DATA 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_DB2_ACCOUNTING_DATA INTO WA_DB2_ACCOUNTING_DATA. *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_DB2_ACCOUNTING_DATA_STR,
INTERVAL_START TYPE STRING,
SUBSYSTEM_ID TYPE STRING,
DB2_MEMBER TYPE STRING,
DS_GROUP TYPE STRING,
CLIENT_IP_ADDRESS TYPE STRING,
ENDUSER TYPE STRING,
TRANSACTION TYPE STRING,
PROGRAM TYPE STRING,
CL1_ELAPSED TYPE STRING,
CL1_NONNESTED TYPE STRING,
CL1_STOPROC TYPE STRING,
CL1_UDF TYPE STRING,
CL1_TRIGGER TYPE STRING,
CL1_CPU_AGENT TYPE STRING,
CL1_CPU_NONNESTED TYPE STRING,
CL1_CPU_STOPROC TYPE STRING,
CL1_CPU_UDF TYPE STRING,
CL1_CPU_TRIGGER TYPE STRING,
CL1_CPU_PAR_TASKS TYPE STRING,
CL1_ZIIP TYPE STRING,
CL1_ZIIP_NONNESTED TYPE STRING,
CL1_ZIIP_STOPROC TYPE STRING,
CL1_ZIIP_UDF TYPE STRING,
CL1_ZIIP_TRIGGER TYPE STRING,
CL1_ZIIP_PAR_TASKS TYPE STRING,
CL1_ELAPSED_NOT_IN_DB2 TYPE STRING,
CL2_ELAPSED TYPE STRING,
CL2_NONNESTED TYPE STRING,
CL2_STOPROC TYPE STRING,
CL2_UDF TYPE STRING,
CL2_TRIGGER TYPE STRING,
CL2_CPU_AGENT TYPE STRING,
CL2_CPU_NONNESTED TYPE STRING,
CL2_CPU_STOPROC TYPE STRING,
CL2_CPU_UDF TYPE STRING,
CL2_CPU_TRIGGER TYPE STRING,
CL2_CPU_PAR_TASKS TYPE STRING,
CL2_ZIIP TYPE STRING,
CL2_ZIIP_NONNESTED TYPE STRING,
CL2_ZIIP_STOPROC TYPE STRING,
CL2_ZIIP_UDF TYPE STRING,
CL2_ZIIP_TRIGGER TYPE STRING,
CL2_ZIIP_PAR_TASKS TYPE STRING,
CL2_CPU_NOT_IN_DB2_AGENT TYPE STRING,
CL2_NOT_ACCOUNTED_IN_DB2 TYPE STRING,
CL3_TOTAL_SUSPENSIONS TYPE STRING,
CL3_LLOCKS TYPE STRING,
CL3_PLOCKS TYPE STRING,
CL3_LOCK TYPE STRING,
CL3_LATCH TYPE STRING,
CL3_DB_IO TYPE STRING,
CL3_LOG_WRITE_IO TYPE STRING,
CL3_OTHER_READ_IO TYPE STRING,
CL3_OTHER_WRITE_IO TYPE STRING,
CL3_UPDATE_COMMIT TYPE STRING,
CL3_OPEN_CLOSE TYPE STRING,
CL3_SYSLGRNX_RECORDING TYPE STRING,
CL3_EXT_DEL_DEF TYPE STRING,
CL3_OTHER_SERVICE TYPE STRING,
CL3_ARCH_LOG TYPE STRING,
CL3_ARCH_READS TYPE STRING,
CL3_DRAIN_LOCK TYPE STRING,
CL3_CLAIM_RELEASE TYPE STRING,
CL3_PAGE_LATCH TYPE STRING,
CL3_NOTIFY_MESSAGE TYPE STRING,
CL3_FORCE_AT_COMMIT TYPE STRING,
CL3_ASYNC_CF_REQU TYPE STRING,
CL3_LOB_MATERIALIZATION TYPE STRING,
CL3_ACCELERATOR TYPE STRING,
CL3_AUTON_PROCS TYPE STRING,
CL3_PARENT_GROUP_SYNC TYPE STRING,
CL3_SCHEDULE_UDFS TYPE STRING,
CL3_LLOCKS_PARENT TYPE STRING,
CL3_LLOCKS_CHILD TYPE STRING,
CL3_LLOCKS_OTHER TYPE STRING,
CL3_PLOCKS_PSET TYPE STRING,
CL3_PLOCKS_PAGE TYPE STRING,
CL3_PLOCKS_OTHER TYPE STRING,
CL3_GLOBAL_CONTENTION TYPE STRING,
SYNC_IO_AVG TYPE STRING,
COMMITS TYPE STRING,
ROLLBACKS TYPE STRING,
OCCURRENCES TYPE STRING,
IO_PARALLELISM TYPE STRING,
CP_PARALLELISM TYPE STRING,END OF T_EKKO_STR. DATA: WA_DB2_ACCOUNTING_DATA_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_DB2_ACCOUNTING_DATA_STR-INTERVAL_START sy-vline
WA_DB2_ACCOUNTING_DATA_STR-SUBSYSTEM_ID sy-vline
WA_DB2_ACCOUNTING_DATA_STR-DB2_MEMBER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-DS_GROUP sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CLIENT_IP_ADDRESS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-ENDUSER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-TRANSACTION sy-vline
WA_DB2_ACCOUNTING_DATA_STR-PROGRAM sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ELAPSED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_AGENT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_CPU_PAR_TASKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ZIIP_PAR_TASKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL1_ELAPSED_NOT_IN_DB2 sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ELAPSED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_AGENT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_PAR_TASKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP_NONNESTED sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP_STOPROC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP_UDF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP_TRIGGER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_ZIIP_PAR_TASKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_CPU_NOT_IN_DB2_AGENT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL2_NOT_ACCOUNTED_IN_DB2 sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_TOTAL_SUSPENSIONS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LLOCKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PLOCKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LOCK sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LATCH sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_DB_IO sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LOG_WRITE_IO sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_OTHER_READ_IO sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_OTHER_WRITE_IO sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_UPDATE_COMMIT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_OPEN_CLOSE sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_SYSLGRNX_RECORDING sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_EXT_DEL_DEF sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_OTHER_SERVICE sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_ARCH_LOG sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_ARCH_READS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_DRAIN_LOCK sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_CLAIM_RELEASE sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PAGE_LATCH sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_NOTIFY_MESSAGE sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_FORCE_AT_COMMIT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_ASYNC_CF_REQU sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LOB_MATERIALIZATION sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_ACCELERATOR sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_AUTON_PROCS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PARENT_GROUP_SYNC sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_SCHEDULE_UDFS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LLOCKS_PARENT sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LLOCKS_CHILD sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_LLOCKS_OTHER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PLOCKS_PSET sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PLOCKS_PAGE sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_PLOCKS_OTHER sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CL3_GLOBAL_CONTENTION sy-vline
WA_DB2_ACCOUNTING_DATA_STR-SYNC_IO_AVG sy-vline
WA_DB2_ACCOUNTING_DATA_STR-COMMITS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-ROLLBACKS sy-vline
WA_DB2_ACCOUNTING_DATA_STR-OCCURRENCES sy-vline
WA_DB2_ACCOUNTING_DATA_STR-IO_PARALLELISM sy-vline
WA_DB2_ACCOUNTING_DATA_STR-CP_PARALLELISM sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.