anchor.diff:  
   
   get_dir(_Config) ->
  -    {ok,{{_Protocol, Code, _Status}, Headers, Body}} = httpc:request(get,{"http://localhost:8080/myresources/",[{"accept","application/json"}]},[],[]),
  +    {ok,{{_Protocol, Code, _Status}, Headers, Body}} = httpc:request(get,{?NAME ++ "/myresources/",[{"accept","application/json"}]},[],[]),
       lager:info("### GET DIR Headers~p",[Headers]),
       lager:info("### GET DIR Body ~p",[Body]),
       ?assertEqual(200,Code).
  
positive.code: put_link_new(_Config) ->
      FileName=proplists:get_value(data_dir, _Config) ++ "link1.json",
      {ok,File}=file:read_file(FileName),
      Id = "http://localhost:8080/myresources/id4",
      {ok,{{_Protocol,Code,_Status},Headers,_Body}} =  httpc:request(put,{Id,[],"application/json",File},[],[]),
      ?assertEqual(201,Code),
      lager:info("####FILE_LINK : ~p",[File]),
  
negative.code: 
  
  get_resource(_Config) ->
      Id = ?NAME ++ "/myresources/id", 
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),  
      ?assertEqual(200, Code).
  
  get_resource_delete(_Config) ->
      Id = ?NAME ++ "/myresources/id",
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      ?assertEqual(404, Code).
  
  get_link(_Config) ->
      Id = ?NAME ++ "/myresources/id4",
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      ?assertEqual(200, Code).
  
  get_link_delete(_Config) ->
      Id = ?NAME ++ "/myresources/id4",
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      ?assertEqual(404, Code).
  
  get_kind_col(_Config) ->
      Id = ?NAME ++ "/collections/compute",
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      ?assertEqual(200, Code).
  
  get_kind_col_delete(_Config) ->
      Id = ?NAME ++ "/collections/compute",
      {ok, {{_Protocol,Code,_Status}, _Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      ?assertEqual(404, Code).
  
  
  get_mixin_col(_Config) ->
       Id = ?NAME ++ "/collections/os_tpl/",
      {ok, {{_Protocol,Code,_Status}, Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      lager:info("#### GET_MIXIN:::~p",[Headers]),
      ?assertEqual(200, Code).
  
  get_mixin_col_delete(_Config) ->
       Id = ?NAME ++ "/collections/os_tpl/",
      {ok, {{_Protocol,Code,_Status}, Headers, _Body}} = httpc:request(get, {Id, [{"accept","application/json"}]}, [], []),   
      lager:info("#### GET_MIXIN_DELETE:::~p",[Headers]),
      ?assertEqual(404, Code).
  
  
  get_query(_Config) ->
      {ok,{{_Protocol, Code, _Status}, Headers, _Body}} = httpc:request(get,{?NAME ++ "/-/",[{"accept","application/json"}]},[],[]),
      ?assertEqual(200,Code),
      ?assert(lists:member({"content-type","application/json"}, Headers)).
  
  