THIS IS A SAMPLE TO SAVE TEXT INFORMATION INTO TEXT OBJECT.

*************************************************************************************
FORM save_comments.
*************************************************************************************
   DATA: e_header  TYPE thead,
     i_header  TYPE  STANDARD  TABLE  OF thead,
           w_tline   TYPE tline,
     i_tline   TYPE  STANDARD  TABLE  OF tline  WITH  HEADER  LINE.
 *************************************************************************************
  e_header-tdobject =  'ZCHD_OBJ'.
  e_header-tdid =  'Y0B1'.
  e_header-tdspras = sy-langu.
  e_header-tdlinesize =  72.
 *************************************************************************************
   CONCATENATE y0bs_Dev-objid e_header-tdid     INTO e_header-tdname.
  APPEND 'DevComments for Obj 1" to  i_tline-tdline.
 *************************************************************************************
   CALL  FUNCTION  'SAVE_TEXT'
     EXPORTING
       client          = sy-mandt
       header          = e_header
      savemode_direct =  'X'
     TABLES
       lines           = i_tline
     EXCEPTIONS
       id              =  1
       language        =  2
      name            =  3
       object          =  4
       OTHERS          =  5.
 
   IF sy-subrc <>  0.
   ENDIF.
*************************************************************************************
 ENDFORM.
*************************************************************************************