anchor.diff:       %% modify DB after work_phase, before validation
        %% read - modify - commit (rmc)
        [begin
  +          Key = init_new_db_key("abort_prepared_rmc"),
             {TLog, _} =
                 ?CS_API:process_request_list(?CS_API:new_tlog(),
  -                                           [{read, 0}]),
  -          abort_prepared(0, {commit_tlog, TLog}, [MC1, MC2, MC3, MC4],
  +                                           [{read, Key}]),
  +          abort_prepared(Key, {commit_tlog, TLog}, [MC1, MC2, MC3, MC4],
                            calc_rmc_outcome([MC1, MC2, MC3, MC4]))
         end
         || MC1 <- causes(), MC2 <- causes(),
  
positive.code: 
      Outcome =
          case Op of
              write -> ?CS_API:write(0,
                                       io_lib:format("~p with ~p", [Op, PreOps]));
              read ->
                  case ?CS_API:read(0) of
                      {fail, Reason} -> {fail, Reason};
                      _ -> ok
                  end;
              read_commit ->
                  case ?CS_API:process_request_list(?CS_API:new_tlog(),
                                                    [{read, 0}, {commit}]) of
                      %% cs_api
                      {_TLog, {results, [_, {commit, fail, {fail, abort}}]}} -> {fail, abort};
                      {_TLog, {results, [_, {commit, ok, _}]}} -> ok;
  
negative.code:     Config2 = unittest_helper:init_per_suite(Config),
      {priv_dir, PrivDir} = lists:keyfind(priv_dir, 1, Config2),
      unittest_helper:make_ring_with_ids(fun() -> ?RT:get_replica_keys(?RT:hash_key(0)) end, [{config, [{log_path, PrivDir}]}]),
      Config2.
  
  end_per_suite(Config) ->
  