ABAP Select data from SAP table SYB_XCHG_SEGMENT into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP SYB_XCHG_SEGMENT 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 SYB_XCHG_SEGMENT. 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 SYB_XCHG_SEGMENT 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_SYB_XCHG_SEGMENT TYPE STANDARD TABLE OF SYB_XCHG_SEGMENT,
      WA_SYB_XCHG_SEGMENT TYPE SYB_XCHG_SEGMENT,
      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: <SYB_XCHG_SEGMENT> TYPE SYB_XCHG_SEGMENT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SYB_XCHG_SEGMENT
*  INTO TABLE @DATA(IT_SYB_XCHG_SEGMENT2).
*--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_SYB_XCHG_SEGMENT INDEX 1 INTO DATA(WA_SYB_XCHG_SEGMENT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_SYB_XCHG_SEGMENT ASSIGNING <SYB_XCHG_SEGMENT>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<SYB_XCHG_SEGMENT>-SEGMENT = 1.
<SYB_XCHG_SEGMENT>-SEGMENT = 1.
<SYB_XCHG_SEGMENT>-NAME = 1.
<SYB_XCHG_SEGMENT>-STATUS = 1.
<SYB_XCHG_SEGMENT>-SEGM_TOTAL_MB = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SYB_XCHG_SEGMENT-SEGM_FREE_MB, sy-vline,
  WA_SYB_XCHG_SEGMENT-AEXP_ENABLED, sy-vline,
  WA_SYB_XCHG_SEGMENT-AEXP_ENABLED_ICON, sy-vline,
  WA_SYB_XCHG_SEGMENT-AEXP_ENABLED_TEXT, sy-vline,
  WA_SYB_XCHG_SEGMENT-AEXP_GROWBY_VALUE, sy-vline,
  WA_SYB_XCHG_SEGMENT-AEXP_GROWBY_UNIT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_SYB_XCHG_SEGMENT 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_SYB_XCHG_SEGMENT 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_SYB_XCHG_SEGMENT INTO WA_SYB_XCHG_SEGMENT.


*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_SYB_XCHG_SEGMENT_STR, 
SEGMENT TYPE STRING,
SEGMENT TYPE STRING,
NAME TYPE STRING,
STATUS TYPE STRING,
SEGM_TOTAL_MB TYPE STRING,
SEGM_FREE_MB TYPE STRING,
AEXP_ENABLED TYPE STRING,
AEXP_ENABLED_ICON TYPE STRING,
AEXP_ENABLED_TEXT TYPE STRING,
AEXP_GROWBY_VALUE TYPE STRING,
AEXP_GROWBY_UNIT TYPE STRING,
AEXP_MAXSIZE_MB TYPE STRING,
AEXP_THRESHOLD_MB TYPE STRING,
AEXP_INH_FROM_DEFAULT TYPE STRING,
SEGBIT TYPE STRING,
DBID TYPE STRING,
BGCOLOR TYPE STRING,
DATABASE TYPE STRING,
NAME TYPE STRING,
DBID TYPE STRING,
SUSER_NAME TYPE STRING,
SUID TYPE STRING,
STATUS TYPE STRING,
LOGPTR TYPE STRING,
CRDATE TYPE STRING,
DUMPTRDATE TYPE STRING,
STATUS2 TYPE STRING,
STATUS3 TYPE STRING,
STATUS4 TYPE STRING,
STATUS5 TYPE STRING,
ENCRYPTION_STATUS TYPE STRING,
DURABILITY TYPE STRING,
SIZE_MB TYPE STRING,
VDEVNO TYPE STRING,
IN_DROP TYPE STRING,
MIXEDLOG TYPE STRING,
SUSPECT_PAGES TYPE STRING,
BGCOLOR TYPE STRING,
SUSPECT_DB TYPE STRING,
LOG_FREE_PAGES TYPE STRING,
LOG_FREE_MB TYPE STRING,
LOG_TOTAL_MB TYPE STRING,
DATA_RESERVED_PCT TYPE STRING,
LOG_RESERVED_PCT TYPE STRING,
DATA_MB TYPE STRING,
DATA_FREE_MB TYPE STRING,
AEXP_ENABLED TYPE STRING,
AEXP_ENABLED_ICON TYPE STRING,
AEXP_ENABLED_TEXT TYPE STRING,
AEXP_LAST_DATA_EXP TYPE STRING,
AEXP_LAST_LOG_EXP TYPE STRING,
AEXP_INH_FROM_DEFAULT TYPE STRING,
LOGTHR_COUNT TYPE STRING,
LOGTHR_LAST_EXEC_TIME TYPE STRING,
IS_ONLINE TYPE STRING,
CACHE_BOUND_TO TYPE STRING,
IMRSCACHE TYPE STRING,
IMRSLOGLASTPTR TYPE STRING,
IMRSLOGPTR TYPE STRING,
VERSIONDBID TYPE STRING,END OF T_EKKO_STR.
DATA: WA_SYB_XCHG_SEGMENT_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_SYB_XCHG_SEGMENT_STR-SEGMENT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SEGMENT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-NAME sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SEGM_TOTAL_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SEGM_FREE_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED_ICON sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED_TEXT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_GROWBY_VALUE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_GROWBY_UNIT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_MAXSIZE_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_THRESHOLD_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_INH_FROM_DEFAULT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SEGBIT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DBID sy-vline 
WA_SYB_XCHG_SEGMENT_STR-BGCOLOR sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DATABASE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-NAME sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DBID sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SUSER_NAME sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SUID sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOGPTR sy-vline 
WA_SYB_XCHG_SEGMENT_STR-CRDATE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DUMPTRDATE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS2 sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS3 sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS4 sy-vline 
WA_SYB_XCHG_SEGMENT_STR-STATUS5 sy-vline 
WA_SYB_XCHG_SEGMENT_STR-ENCRYPTION_STATUS sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DURABILITY sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SIZE_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-VDEVNO sy-vline 
WA_SYB_XCHG_SEGMENT_STR-IN_DROP sy-vline 
WA_SYB_XCHG_SEGMENT_STR-MIXEDLOG sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SUSPECT_PAGES sy-vline 
WA_SYB_XCHG_SEGMENT_STR-BGCOLOR sy-vline 
WA_SYB_XCHG_SEGMENT_STR-SUSPECT_DB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOG_FREE_PAGES sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOG_FREE_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOG_TOTAL_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DATA_RESERVED_PCT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOG_RESERVED_PCT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DATA_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-DATA_FREE_MB sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED_ICON sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_ENABLED_TEXT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_LAST_DATA_EXP sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_LAST_LOG_EXP sy-vline 
WA_SYB_XCHG_SEGMENT_STR-AEXP_INH_FROM_DEFAULT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOGTHR_COUNT sy-vline 
WA_SYB_XCHG_SEGMENT_STR-LOGTHR_LAST_EXEC_TIME sy-vline 
WA_SYB_XCHG_SEGMENT_STR-IS_ONLINE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-CACHE_BOUND_TO sy-vline 
WA_SYB_XCHG_SEGMENT_STR-IMRSCACHE sy-vline 
WA_SYB_XCHG_SEGMENT_STR-IMRSLOGLASTPTR sy-vline 
WA_SYB_XCHG_SEGMENT_STR-IMRSLOGPTR sy-vline 
WA_SYB_XCHG_SEGMENT_STR-VERSIONDBID sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.