anchor.diff:      FileName=proplists:get_value(data_dir, _Config) ++ "res4.json",
       {ok,File}=file:read_file(FileName),
       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)),
  +    {ok,{{_Protocol,Code,_Status},_Headers,_Body}} =  httpc:request(post,{Id,[],"application/json", File},[],[]),
       ?assertEqual(200,Code).
     
   
  
positive.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).
  
  
  
negative.code:     FileName=proplists:get_value(data_dir, _Config) ++ "res7.json",
      {ok,File}=file:read_file(FileName),
      Id = ?NAME ++ "/collections/os_tpl/",
      {ok,{{_Protocol,Code,_Status},_Headers,_Body}} =  httpc:request(post,{Id,[],"application/json",File},[],[]),
      ?assertEqual(200,Code).
     
  
  