anchor.diff:             END OF ty_sicf_key.
   
       METHODS read
  +      IMPORTING iv_clear      TYPE abap_bool DEFAULT abap_true
         EXPORTING es_icfservice TYPE icfservice
                   es_icfdocu    TYPE icfdocu
                   et_icfhandler TYPE ty_icfhandler_tt
  
positive.code:     ASSERT sy-subrc = 0.
  
      MOVE-CORRESPONDING ls_serv_info-service TO es_icfservice.
      CLEAR es_icfservice-icf_cuser.
      CLEAR es_icfservice-icf_cdate.
      CLEAR es_icfservice-icf_muser.
      CLEAR es_icfservice-icf_mdate.
  
      CLEAR es_icfdocu-icfparguid.
  
  
negative.code:     DATA: ls_icfservice TYPE icfservice.
  
  
      read( EXPORTING iv_clear = abap_false
            IMPORTING es_icfservice = ls_icfservice ).
  
      rv_user = ls_icfservice-icf_muser.
  
  