ABAP Select data from SAP table SYBMON_REPSCANNERS 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 SYBMON_REPSCANNERS 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 SYBMON_REPSCANNERS. 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 SYBMON_REPSCANNERS 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_SYBMON_REPSCANNERS TYPE STANDARD TABLE OF SYBMON_REPSCANNERS,
      WA_SYBMON_REPSCANNERS TYPE SYBMON_REPSCANNERS,
      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: <SYBMON_REPSCANNERS> TYPE SYBMON_REPSCANNERS.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SYBMON_REPSCANNERS
*  INTO TABLE @DATA(IT_SYBMON_REPSCANNERS2).
*--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_SYBMON_REPSCANNERS INDEX 1 INTO DATA(WA_SYBMON_REPSCANNERS2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<SYBMON_REPSCANNERS>-INSTANCEID = 1.
<SYBMON_REPSCANNERS>-DBID = 1.
<SYBMON_REPSCANNERS>-DBNAME = 1.
<SYBMON_REPSCANNERS>-SCANNERSPID = 1.
<SYBMON_REPSCANNERS>-PATHNAME = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SYBMON_REPSCANNERS-ENGINEBINDING, sy-vline,
  WA_SYBMON_REPSCANNERS-LOGRECORDSSCANNED, sy-vline,
  WA_SYBMON_REPSCANNERS-LOGRECORDSPROCESSED, sy-vline,
  WA_SYBMON_REPSCANNERS-TRUNCPOINTREQUESTS, sy-vline,
  WA_SYBMON_REPSCANNERS-TRUNCPOINTMOVES, sy-vline,
  WA_SYBMON_REPSCANNERS-STATUS, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_SYBMON_REPSCANNERS 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_SYBMON_REPSCANNERS 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_SYBMON_REPSCANNERS INTO WA_SYBMON_REPSCANNERS.


*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_SYBMON_REPSCANNERS_STR, 
INSTANCEID TYPE STRING,
DBID TYPE STRING,
DBNAME TYPE STRING,
SCANNERSPID TYPE STRING,
PATHNAME TYPE STRING,
ENGINEBINDING TYPE STRING,
LOGRECORDSSCANNED TYPE STRING,
LOGRECORDSPROCESSED TYPE STRING,
TRUNCPOINTREQUESTS TYPE STRING,
TRUNCPOINTMOVES TYPE STRING,
STATUS TYPE STRING,
SLEEPSTATUS TYPE STRING,
STARTMARKER TYPE STRING,
ENDMARKER TYPE STRING,
CURRENTMARKER TYPE STRING,
OLDESTTRANSACTION TYPE STRING,
LOGSCANS TYPE STRING,
UPDATES TYPE STRING,
INSERTS TYPE STRING,
DELETES TYPE STRING,
STOREDPROCEDURES TYPE STRING,
SQLSTATEMENTS TYPE STRING,
DDL TYPE STRING,
WRITETXT TYPE STRING,
LOBCOLUMNS TYPE STRING,
CLRS TYPE STRING,
CHECKPOINTS TYPE STRING,
BEGINTRANSACTION TYPE STRING,
COMMITTRANSACTION TYPE STRING,
ABORTEDTRANSACTION TYPE STRING,
PREPAREDTRANSACTION TYPE STRING,
DELAYEDCOMMIT TYPE STRING,
MAINTUSERTRANSACTION TYPE STRING,
LOGEXTENTIONS TYPE STRING,
SCHEMAFWDLOOKUPS TYPE STRING,
SCHEMABCKWLOOKUPS TYPE STRING,
SNAPSHOT_TIMESTAMP TYPE STRING,
TIMESTAMP_FROM TYPE STRING,
TIMESTAMP_TO TYPE STRING,
TIME_PERIOD TYPE STRING,
ABORTCOMMAND TYPE STRING,
PARTIALROLLBACK TYPE STRING,
SAVETRANSACTION TYPE STRING,
CACHEDBEFOREIMAGEUSED TYPE STRING,END OF T_EKKO_STR.
DATA: WA_SYBMON_REPSCANNERS_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_SYBMON_REPSCANNERS_STR-INSTANCEID sy-vline 
WA_SYBMON_REPSCANNERS_STR-DBID sy-vline 
WA_SYBMON_REPSCANNERS_STR-DBNAME sy-vline 
WA_SYBMON_REPSCANNERS_STR-SCANNERSPID sy-vline 
WA_SYBMON_REPSCANNERS_STR-PATHNAME sy-vline 
WA_SYBMON_REPSCANNERS_STR-ENGINEBINDING sy-vline 
WA_SYBMON_REPSCANNERS_STR-LOGRECORDSSCANNED sy-vline 
WA_SYBMON_REPSCANNERS_STR-LOGRECORDSPROCESSED sy-vline 
WA_SYBMON_REPSCANNERS_STR-TRUNCPOINTREQUESTS sy-vline 
WA_SYBMON_REPSCANNERS_STR-TRUNCPOINTMOVES sy-vline 
WA_SYBMON_REPSCANNERS_STR-STATUS sy-vline 
WA_SYBMON_REPSCANNERS_STR-SLEEPSTATUS sy-vline 
WA_SYBMON_REPSCANNERS_STR-STARTMARKER sy-vline 
WA_SYBMON_REPSCANNERS_STR-ENDMARKER sy-vline 
WA_SYBMON_REPSCANNERS_STR-CURRENTMARKER sy-vline 
WA_SYBMON_REPSCANNERS_STR-OLDESTTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-LOGSCANS sy-vline 
WA_SYBMON_REPSCANNERS_STR-UPDATES sy-vline 
WA_SYBMON_REPSCANNERS_STR-INSERTS sy-vline 
WA_SYBMON_REPSCANNERS_STR-DELETES sy-vline 
WA_SYBMON_REPSCANNERS_STR-STOREDPROCEDURES sy-vline 
WA_SYBMON_REPSCANNERS_STR-SQLSTATEMENTS sy-vline 
WA_SYBMON_REPSCANNERS_STR-DDL sy-vline 
WA_SYBMON_REPSCANNERS_STR-WRITETXT sy-vline 
WA_SYBMON_REPSCANNERS_STR-LOBCOLUMNS sy-vline 
WA_SYBMON_REPSCANNERS_STR-CLRS sy-vline 
WA_SYBMON_REPSCANNERS_STR-CHECKPOINTS sy-vline 
WA_SYBMON_REPSCANNERS_STR-BEGINTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-COMMITTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-ABORTEDTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-PREPAREDTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-DELAYEDCOMMIT sy-vline 
WA_SYBMON_REPSCANNERS_STR-MAINTUSERTRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-LOGEXTENTIONS sy-vline 
WA_SYBMON_REPSCANNERS_STR-SCHEMAFWDLOOKUPS sy-vline 
WA_SYBMON_REPSCANNERS_STR-SCHEMABCKWLOOKUPS sy-vline 
WA_SYBMON_REPSCANNERS_STR-SNAPSHOT_TIMESTAMP sy-vline 
WA_SYBMON_REPSCANNERS_STR-TIMESTAMP_FROM sy-vline 
WA_SYBMON_REPSCANNERS_STR-TIMESTAMP_TO sy-vline 
WA_SYBMON_REPSCANNERS_STR-TIME_PERIOD sy-vline 
WA_SYBMON_REPSCANNERS_STR-ABORTCOMMAND sy-vline 
WA_SYBMON_REPSCANNERS_STR-PARTIALROLLBACK sy-vline 
WA_SYBMON_REPSCANNERS_STR-SAVETRANSACTION sy-vline 
WA_SYBMON_REPSCANNERS_STR-CACHEDBEFOREIMAGEUSED sy-vline      INTO ld_text SEPARATED BY SPACE.

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