anchor.diff:  
       CALL FUNCTION 'RS_TOOL_ACCESS'
         EXPORTING
  -        operation           = 'SHOW'    " Operation
  -        object_name         = ms_item-obj_name    " Object Name
  -        object_type         = ms_item-obj_type    " Object Type
  +        operation           = 'SHOW'
  +        object_name         = ms_item-obj_name
  +        object_type         = ms_item-obj_type
         EXCEPTIONS
           not_executed        = 1
           invalid_object_type = 2
  
positive.code: 
    METHOD lif_object~serialize.
  
      lcx_exception=>raise( 'PRAG not implemented' ).
  
    ENDMETHOD.
  
  
negative.code:   PUBLIC SECTION.
      INTERFACES lif_object.
  
    PRIVATE SECTION.
      TYPES: BEGIN OF ty_pragma,
               pragma      TYPE c LENGTH 40,
               extension   TYPE c LENGTH 1,
               signature   TYPE c LENGTH 10,
               description TYPE c LENGTH 255,
             END OF ty_pragma.
  
  ENDCLASS.
  
  CLASS lcl_object_prag IMPLEMENTATION.
  
    METHOD lif_object~changed_by.
  
      rv_user = sy-uname.
  
    ENDMETHOD.
  
  