ABAP Select data from SAP table SINTIT 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 SINTIT 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 SINTIT. 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 SINTIT 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_SINTIT TYPE STANDARD TABLE OF SINTIT,
      WA_SINTIT TYPE SINTIT,
      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: <SINTIT> TYPE SINTIT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM SINTIT
*  INTO TABLE @DATA(IT_SINTIT2).
*--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_SINTIT INDEX 1 INTO DATA(WA_SINTIT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_SINTIT ASSIGNING <SINTIT>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<SINTIT>-MANDT = 1.
<SINTIT>-RSYSTEM = 1.
<SINTIT>-RFCDES = 1.
<SINTIT>-CLASS = 1.
<SINTIT>-CLDES = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_SINTIT-OBJTP, sy-vline,
WA_SINTIT-TPDES, sy-vline,
WA_SINTIT-OBJNAM, sy-vline,
WA_SINTIT-OBJDES, sy-vline,
WA_SINTIT-INDAT, sy-vline,
WA_SINTIT-INTIM, sy-vline.
ENDLOOP. *Add any further fields from structure WA_SINTIT 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_SINTIT 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_SINTIT INTO WA_SINTIT. *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_SINTIT_STR,
MANDT TYPE STRING,
RSYSTEM TYPE STRING,
RFCDES TYPE STRING,
CLASS TYPE STRING,
CLDES TYPE STRING,
OBJTP TYPE STRING,
TPDES TYPE STRING,
OBJNAM TYPE STRING,
OBJDES TYPE STRING,
INDAT TYPE STRING,
INTIM TYPE STRING,
CRDAT TYPE STRING,
CRTIM TYPE STRING,
REDAT TYPE STRING,
RETIM TYPE STRING,
CHDAT TYPE STRING,
CHTIM TYPE STRING,
OBJPR TYPE STRING,
RECPR TYPE STRING,
FORADR TYPE STRING,
CRADR TYPE STRING,
ACDAT TYPE STRING,
ACTIM TYPE STRING,
STATSO TYPE STRING,
STATWF TYPE STRING,
PROCESS TYPE STRING,
OBJAC TYPE STRING,
ACDO TYPE STRING,
ATTACH TYPE STRING,
WIOBJID TYPE STRING,
GROUPID TYPE STRING,
WIREJECT TYPE STRING,
TASK TYPE STRING,
DHSTAT TYPE STRING,
DISTRIB TYPE STRING,
TOLATE TYPE STRING,
SUBST TYPE STRING,
OBJSND TYPE STRING,
OBJCHN TYPE STRING,
OBJRD TYPE STRING,
RESUB TYPE STRING,
SNDEX TYPE STRING,
SNDCP TYPE STRING,
SNDBC TYPE STRING,
OBJRR TYPE STRING,
PRIFB TYPE STRING,
FORFB TYPE STRING,
OBJLA TYPE STRING,
RECCNT TYPE STRING,
RRDCNT TYPE STRING,
RRRCNT TYPE STRING,
RRPCNT TYPE STRING,
RARCNT TYPE STRING,
RAPCNT TYPE STRING,
RATCNT TYPE STRING,
RCPCNT TYPE STRING,
RBCCNT TYPE STRING,
SDDAT TYPE STRING,
SDTIM TYPE STRING,
RBDAT TYPE STRING,
RBTIM TYPE STRING,
FOLNAM TYPE STRING,
FOLDES TYPE STRING,
OBJRS TYPE STRING,
DLDAT TYPE STRING,
FOLRGTP TYPE STRING,
OBJLEN TYPE STRING,
DYNCOL1 TYPE STRING,
DYNCOL2 TYPE STRING,
DYNCOL3 TYPE STRING,
DYNCOL4 TYPE STRING,
DYNCOL5 TYPE STRING,
DYNCOL6 TYPE STRING,END OF T_EKKO_STR. DATA: WA_SINTIT_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_SINTIT_STR-MANDT sy-vline
WA_SINTIT_STR-RSYSTEM sy-vline
WA_SINTIT_STR-RFCDES sy-vline
WA_SINTIT_STR-CLASS sy-vline
WA_SINTIT_STR-CLDES sy-vline
WA_SINTIT_STR-OBJTP sy-vline
WA_SINTIT_STR-TPDES sy-vline
WA_SINTIT_STR-OBJNAM sy-vline
WA_SINTIT_STR-OBJDES sy-vline
WA_SINTIT_STR-INDAT sy-vline
WA_SINTIT_STR-INTIM sy-vline
WA_SINTIT_STR-CRDAT sy-vline
WA_SINTIT_STR-CRTIM sy-vline
WA_SINTIT_STR-REDAT sy-vline
WA_SINTIT_STR-RETIM sy-vline
WA_SINTIT_STR-CHDAT sy-vline
WA_SINTIT_STR-CHTIM sy-vline
WA_SINTIT_STR-OBJPR sy-vline
WA_SINTIT_STR-RECPR sy-vline
WA_SINTIT_STR-FORADR sy-vline
WA_SINTIT_STR-CRADR sy-vline
WA_SINTIT_STR-ACDAT sy-vline
WA_SINTIT_STR-ACTIM sy-vline
WA_SINTIT_STR-STATSO sy-vline
WA_SINTIT_STR-STATWF sy-vline
WA_SINTIT_STR-PROCESS sy-vline
WA_SINTIT_STR-OBJAC sy-vline
WA_SINTIT_STR-ACDO sy-vline
WA_SINTIT_STR-ATTACH sy-vline
WA_SINTIT_STR-WIOBJID sy-vline
WA_SINTIT_STR-GROUPID sy-vline
WA_SINTIT_STR-WIREJECT sy-vline
WA_SINTIT_STR-TASK sy-vline
WA_SINTIT_STR-DHSTAT sy-vline
WA_SINTIT_STR-DISTRIB sy-vline
WA_SINTIT_STR-TOLATE sy-vline
WA_SINTIT_STR-SUBST sy-vline
WA_SINTIT_STR-OBJSND sy-vline
WA_SINTIT_STR-OBJCHN sy-vline
WA_SINTIT_STR-OBJRD sy-vline
WA_SINTIT_STR-RESUB sy-vline
WA_SINTIT_STR-SNDEX sy-vline
WA_SINTIT_STR-SNDCP sy-vline
WA_SINTIT_STR-SNDBC sy-vline
WA_SINTIT_STR-OBJRR sy-vline
WA_SINTIT_STR-PRIFB sy-vline
WA_SINTIT_STR-FORFB sy-vline
WA_SINTIT_STR-OBJLA sy-vline
WA_SINTIT_STR-RECCNT sy-vline
WA_SINTIT_STR-RRDCNT sy-vline
WA_SINTIT_STR-RRRCNT sy-vline
WA_SINTIT_STR-RRPCNT sy-vline
WA_SINTIT_STR-RARCNT sy-vline
WA_SINTIT_STR-RAPCNT sy-vline
WA_SINTIT_STR-RATCNT sy-vline
WA_SINTIT_STR-RCPCNT sy-vline
WA_SINTIT_STR-RBCCNT sy-vline
WA_SINTIT_STR-SDDAT sy-vline
WA_SINTIT_STR-SDTIM sy-vline
WA_SINTIT_STR-RBDAT sy-vline
WA_SINTIT_STR-RBTIM sy-vline
WA_SINTIT_STR-FOLNAM sy-vline
WA_SINTIT_STR-FOLDES sy-vline
WA_SINTIT_STR-OBJRS sy-vline
WA_SINTIT_STR-DLDAT sy-vline
WA_SINTIT_STR-FOLRGTP sy-vline
WA_SINTIT_STR-OBJLEN sy-vline
WA_SINTIT_STR-DYNCOL1 sy-vline
WA_SINTIT_STR-DYNCOL2 sy-vline
WA_SINTIT_STR-DYNCOL3 sy-vline
WA_SINTIT_STR-DYNCOL4 sy-vline
WA_SINTIT_STR-DYNCOL5 sy-vline
WA_SINTIT_STR-DYNCOL6 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.