anchor.diff:  post_link(_Config) ->
       FileName=proplists:get_value(data_dir, _Config) ++ "link1.json",
       {ok,File}=file:read_file(FileName),
  -    Id = "http://localhost:8080/myresources/id11",
  +    Id = ?NAME ++ "/myresources/id11",
       {ok,{{_Protocol,Code,_Status},_Headers,_Body}} =  httpc:request(post,{Id,[],"application/json",File},[],[]),
       ?assertEqual(404,Code).
   
   post_kind_col(_Config) ->
       FileName=proplists:get_value(data_dir, _Config) ++ "res4.json",
       {ok,File}=file:read_file(FileName),
  -    Id = "http://localhost:8080/collections/compute",
  +    Id = ?NAME ++ "/collections/compute",
       {ok,{{_Protocol,Code,_Status},Headers,_Body}} =  httpc:request(post,{Id,[],"application/json", File},[],[]),
       lager:info("###POST-KIND ~p",[Headers]),
       %%?assert(lists:member({"location",Id}, Headers)),
  
positive.code:      {test_dir,
        [],
        [
        %put_resource_dir,get_dir  %Code http: {expected,200}, {value,500}
        ]}
      ].
  
  
negative.code: put_link(_Config) ->
      FileName=proplists:get_value(data_dir, _Config) ++ "link1.json",
      {ok,File}=file:read_file(FileName),
      Id =?NAME ++ "/myresources/id4",
      {ok,{{_Protocol,Code,_Status},_Headers,_Body}} =  httpc:request(put,{Id,[],"application/json",File},[],[]),
      ?assertEqual(409,Code).
  
  put_kind_col(_Config) ->
      FileName=proplists:get_value(data_dir, _Config) ++ "res5.json",
      {ok,File}=file:read_file(FileName),
      Id = ?NAME ++ "/collections/compute",
      {ok,{{_Protocol,Code,_Status},Headers,_Body}} =  httpc:request(put,{Id,[],"application/json",File},[],[]),
      ?assertEqual(201,Code),
      lager:info("####FILE_KIND : ~p",[File]),
  