anchor.diff:                            true  -> IsForcedCheck;
                             false -> IsStrictCheck
                         end,
  -    Fun = fun() ->
                     BackendKey = ?gen_backend_key(StorageInfo#backend_info.avs_ver_cur,
                                                   AddrId, Key),
                     Reply = leo_object_storage_haystack:get(
                               MetaDBId, StorageInfo, BackendKey, StartPos, EndPos, IsStrictCheck_1),
                     State_1 = after_proc(Reply, State),
  -                  {Reply, State_1}
  -          end,
  -    {Reply_1, State_2} = execute(get, Key, Fun, ThresholdSlowProcessing),
       erlang:garbage_collect(self()),
  -    {reply, Reply_1, State_2};
  +    check_slow_op(get, Key, InTime, ThresholdSlowProcessing),
  +    {reply, Reply, State_1};
   
   %% Remove an object
  -handle_call({delete,_}, _From, #obj_server_state{is_locked = true} = State) ->
  +handle_call({delete,_,_}, _From, #obj_server_state{is_locked = true} = State) ->
       {reply, {error, ?ERROR_LOCKED_CONTAINER}, State};
  -handle_call({delete,_}, _From, #obj_server_state{is_del_blocked = true} = State) ->
  +handle_call({delete,_,_}, _From, #obj_server_state{is_del_blocked = true} = State) ->
       {reply, {error, ?ERROR_LOCKED_CONTAINER}, State};
  -handle_call({delete, _}, _From, #obj_server_state{privilege = ?OBJ_PRV_READ_ONLY} = State) ->
  +handle_call({delete,_,_}, _From, #obj_server_state{privilege = ?OBJ_PRV_READ_ONLY} = State) ->
       {reply, {error, ?ERROR_NOT_ALLOWED_ACCESS}, State};
   handle_call({delete, #?OBJECT{addr_id = AddrId,
  -                              key = Key} = Object}, _From,
  +                              key = Key} = Object, InTime}, _From,
               #obj_server_state{object_storage = StorageInfo,
                                 threshold_slow_processing = ThresholdSlowProcessing} = State) ->
  -    Fun = fun() ->
  -                  Key_1 = ?gen_backend_key(StorageInfo#backend_info.avs_ver_cur,
  -                                           AddrId, Key),
  -                  delete_1(Key_1, Object, State)
  -          end,
  -    {Reply, State_1} = execute(delete, Key, Fun, ThresholdSlowProcessing),
  +    Key_1 = ?gen_backend_key(StorageInfo#backend_info.avs_ver_cur,
  +                             AddrId, Key),
  +    {Reply, State_1} = delete_1(Key_1, Object, State),
  +    check_slow_op(delete, Key, InTime, ThresholdSlowProcessing),
       {reply, Reply, State_1};
   
   %% Head an object
  -handle_call({head, {AddrId, Key}},
  +handle_call({head, {AddrId, Key}, InTime},
               _From, #obj_server_state{meta_db_id = MetaDBId,
  -                                     object_storage = StorageInfo} = State) ->
  +                                     object_storage = StorageInfo,
  +                                     threshold_slow_processing = ThresholdSlowProcessing} = State) ->
       BackendKey = ?gen_backend_key(StorageInfo#backend_info.avs_ver_cur,
                                     AddrId, Key),
       Reply = leo_object_storage_haystack:head(MetaDBId, StorageInfo, BackendKey),
  +    check_slow_op(head, Key, InTime, ThresholdSlowProcessing),
       {reply, Reply, State};
   
   %% Fetch objects with address-id and key to maximum numbers of keys
  -handle_call({fetch, {AddrId, Key}, Fun, MaxKeys},
  +handle_call({fetch, {AddrId, Key}, Fun, MaxKeys, InTime},
               _From, #obj_server_state{meta_db_id     = MetaDBId,
  -                                     object_storage = StorageInfo} = State) ->
  +                                     object_storage = StorageInfo,
  +                                     threshold_slow_processing = ThresholdSlowProcessing} = State) ->
       BackendKey = ?gen_backend_key(StorageInfo#backend_info.avs_ver_cur, AddrId, Key),
       Reply = case catch leo_object_storage_haystack:fetch(
                            MetaDBId, BackendKey, Fun, MaxKeys) of
  
positive.code:                                  EndPos::non_neg_integer(),
                                   IsForcedCheck::boolean()).
  get(Id, AddrIdAndKey, StartPos, EndPos, IsForcedCheck) ->
      gen_server:call(Id, {get, AddrIdAndKey, StartPos, EndPos, IsForcedCheck}, ?DEF_TIMEOUT).
  
  
  %% @doc Remove an object from the object-storage - (logical-delete)
  
negative.code:                                                              Key::tuple(),
                                                               MD5Context::any()).
  head_with_calc_md5(Id, Key, MD5Context) ->
      {InTime, _} = erlang:statistics(wall_clock),
      gen_server:call(Id, {head_with_calc_md5, Key, MD5Context, InTime}, ?DEF_TIMEOUT).
  
  
  %% @doc Close the object-container
  