ABAP Select data from SAP table CRMTS_IC_WL_REPORT_INBOXL_G 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 CRMTS_IC_WL_REPORT_INBOXL_G 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 CRMTS_IC_WL_REPORT_INBOXL_G. 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 CRMTS_IC_WL_REPORT_INBOXL_G 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_CRMTS_IC_WL_REPORT_INBOXL_G TYPE STANDARD TABLE OF CRMTS_IC_WL_REPORT_INBOXL_G,
      WA_CRMTS_IC_WL_REPORT_INBOXL_G TYPE CRMTS_IC_WL_REPORT_INBOXL_G,
      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: <CRMTS_IC_WL_REPORT_INBOXL_G> TYPE CRMTS_IC_WL_REPORT_INBOXL_G.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM CRMTS_IC_WL_REPORT_INBOXL_G
*  INTO TABLE @DATA(IT_CRMTS_IC_WL_REPORT_INBOXL_G2).
*--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_CRMTS_IC_WL_REPORT_INBOXL_G INDEX 1 INTO DATA(WA_CRMTS_IC_WL_REPORT_INBOXL_G2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_CRMTS_IC_WL_REPORT_INBOXL_G ASSIGNING <CRMTS_IC_WL_REPORT_INBOXL_G>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<CRMTS_IC_WL_REPORT_INBOXL_G>-GUID = 1.
<CRMTS_IC_WL_REPORT_INBOXL_G>-ICON = 1.
<CRMTS_IC_WL_REPORT_INBOXL_G>-STAT = 1.
<CRMTS_IC_WL_REPORT_INBOXL_G>-CATEGORY = 1.
<CRMTS_IC_WL_REPORT_INBOXL_G>-PRIORITY = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_CRMTS_IC_WL_REPORT_INBOXL_G-DIRECTION, sy-vline,
WA_CRMTS_IC_WL_REPORT_INBOXL_G-OBJECT_ID, sy-vline,
WA_CRMTS_IC_WL_REPORT_INBOXL_G-PROCESS_TYPE, sy-vline,
WA_CRMTS_IC_WL_REPORT_INBOXL_G-POSTING_DATE, sy-vline,
WA_CRMTS_IC_WL_REPORT_INBOXL_G-DESCRIPTION, sy-vline,
WA_CRMTS_IC_WL_REPORT_INBOXL_G-PROCESS_TYPE_TEXT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_CRMTS_IC_WL_REPORT_INBOXL_G 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_CRMTS_IC_WL_REPORT_INBOXL_G 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_CRMTS_IC_WL_REPORT_INBOXL_G INTO WA_CRMTS_IC_WL_REPORT_INBOXL_G. *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 OBJECT_ID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_CRMTS_IC_WL_REPORT_INBOXL_G-OBJECT_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_CRMTS_IC_WL_REPORT_INBOXL_G-OBJECT_ID.
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_CRMTS_IC_WL_REPORT_INBOXL_G_STR,
GUID TYPE STRING,
ICON TYPE STRING,
STAT TYPE STRING,
CATEGORY TYPE STRING,
PRIORITY TYPE STRING,
DIRECTION TYPE STRING,
OBJECT_ID TYPE STRING,
PROCESS_TYPE TYPE STRING,
POSTING_DATE TYPE STRING,
DESCRIPTION TYPE STRING,
PROCESS_TYPE_TEXT TYPE STRING,
CATEGORY_TEXT TYPE STRING,
PRIORITY_TEXT TYPE STRING,
DIRECTION_TEXT TYPE STRING,
PARTNER_FCT TYPE STRING,
FCT_DESCRIPTION TYPE STRING,
FCT_SHORT_DESC TYPE STRING,
MAIN_BP_1_NO TYPE STRING,
MAIN_BP_1_FCT TYPE STRING,
MAIN_BP_1 TYPE STRING,
MAIN_BP_1_DESC TYPE STRING,
MAIN_BP_1_DESC_S TYPE STRING,
MAIN_BP_1_NAMELIST TYPE STRING,
MAIN_BP_2_NO TYPE STRING,
MAIN_BP_2_FCT TYPE STRING,
MAIN_BP_2 TYPE STRING,
MAIN_BP_2_DESC TYPE STRING,
MAIN_BP_2_DESC_S TYPE STRING,
MAIN_BP_2_NAMELIST TYPE STRING,
STATUS_USER_LONG TYPE STRING,
STATUS_USER TYPE STRING,
STATUS_LONG TYPE STRING,
STATUS TYPE STRING,
PLANNEDDATEFROM TYPE STRING,
PLANNEDDATETO TYPE STRING,
PLANNEDZONE TYPE STRING,
PLANNEDTIMEFROM TYPE STRING,
PLANNEDTIMETO TYPE STRING,
ACTUALDATEFROM TYPE STRING,
ACTUALDATETO TYPE STRING,
ACTUALZONE TYPE STRING,
ACTUALTIMEFROM TYPE STRING,
ACTUALTIMETO TYPE STRING,
VALID_FROM TYPE STRING,
VALID_TO TYPE STRING,
FROM TYPE STRING,
TO TYPE STRING,
CONCATSTAT TYPE STRING,
CONCATSTATUSER TYPE STRING,
TIMEZONE_FROM TYPE STRING,
TIMEZONE_TO TYPE STRING,
CONTACT_PERSON_LIST TYPE STRING,
STAT_OPEN TYPE STRING,
FOREIGN_LOCK TYPE STRING,END OF T_EKKO_STR. DATA: WA_CRMTS_IC_WL_REPORT_INBOXL_G_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_CRMTS_IC_WL_REPORT_INBOXL_G_STR-GUID sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ICON sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STAT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-CATEGORY sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PRIORITY sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-DIRECTION sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-OBJECT_ID sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PROCESS_TYPE sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-POSTING_DATE sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-DESCRIPTION sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PROCESS_TYPE_TEXT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-CATEGORY_TEXT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PRIORITY_TEXT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-DIRECTION_TEXT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PARTNER_FCT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-FCT_DESCRIPTION sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-FCT_SHORT_DESC sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1_NO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1_FCT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1 sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1_DESC sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1_DESC_S sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_1_NAMELIST sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2_NO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2_FCT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2 sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2_DESC sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2_DESC_S sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-MAIN_BP_2_NAMELIST sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STATUS_USER_LONG sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STATUS_USER sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STATUS_LONG sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STATUS sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PLANNEDDATEFROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PLANNEDDATETO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PLANNEDZONE sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PLANNEDTIMEFROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-PLANNEDTIMETO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ACTUALDATEFROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ACTUALDATETO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ACTUALZONE sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ACTUALTIMEFROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-ACTUALTIMETO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-VALID_FROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-VALID_TO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-FROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-TO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-CONCATSTAT sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-CONCATSTATUSER sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-TIMEZONE_FROM sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-TIMEZONE_TO sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-CONTACT_PERSON_LIST sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-STAT_OPEN sy-vline
WA_CRMTS_IC_WL_REPORT_INBOXL_G_STR-FOREIGN_LOCK sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.