* ====================================================================
* Stefanos Moschidis - SAP Certified Technical Consultant
* ====================================================================
*&---------------------------------------------------------------------*
*& STORE DATA IN CLUSTER TABLES AND RETIEVE DATA STORED IN SUCH TABLES
*&---------------------------------------------------------------------*

REPORT  Z_IMPORT_TO_EXPORT_FROM_DB.
*=====================================================================
* DECLARATIONS
*=====================================================================
TABLES INDX .
DATA: INDXKEY LIKE INDX-SRTFD .

*=====================================================================
* SELECTION SCREEN DEFAULT
*=====================================================================
PARAMETERS MSGTXT LIKE ANEK-SGTXT   .

*=====================================================================
START-OF-SELECTION .
*=====================================================================
  INDXKEY = 'SGTXT'.
  INDX-AEDAT = SY-DATUM.
  INDX-USERA = SY-UNAME.

  IF NOT MSGTXT IS INITIAL .
    EXPORT MSGTXT TO  DATABASE INDX(ST) ID INDXKEY.
  ENDIF .

*=====================================================================
END-OF-SELECTION .
*=====================================================================
  CLEAR MSGTXT .
  IMPORT MSGTXT FROM
         DATABASE INDX(ST) ID INDXKEY.

  WRITE MSGTXT  .