anchor.diff:      
   
   put_authz_ids(Path, UpdateAuthzIds, AuthzId) ->
  -    [oc_chef_authz_http:request(Path ++ binary_to_list(UpdateAuthzId), put, ?DEFAULT_HEADERS, [], AuthzId) || UpdateAuthzId <- UpdateAuthzIds].
  +    [ok = oc_chef_authz_http:request(Path ++ binary_to_list(UpdateAuthzId), put, ?DEFAULT_HEADERS, [], AuthzId) || UpdateAuthzId <- UpdateAuthzIds].
       
   delete_authz_ids(Path, UpdateAuthzIds, AuthzId) ->
  -    [oc_chef_authz_http:request(Path ++ binary_to_list(UpdateAuthzId), delete, ?DEFAULT_HEADERS, [], AuthzId) || UpdateAuthzId <- UpdateAuthzIds].
  +    [ok = oc_chef_authz_http:request(Path ++ binary_to_list(UpdateAuthzId), delete, ?DEFAULT_HEADERS, [], AuthzId) || UpdateAuthzId <- UpdateAuthzIds].
       
   
   parse_binary_json(Bin) ->
       {ok, chef_json:decode_body(Bin)}.
   
   fetch(Record, CallbackFun) ->
  +    error_logger:info_msg({fetch, Record}),
       case chef_object:default_fetch(Record, CallbackFun) of
           #oc_chef_group{authz_id = GroupAuthzId, last_updated_by = LastUpdatedBy} = GroupRecord ->
               {ActorAuthzIds, GroupAuthzIds} = fetch_authz_ids(GroupAuthzId, LastUpdatedBy),
  +            error_logger:info_msg({actors_authz_ids, ActorAuthzIds}),
               {ClientNames, RemainingAuthzIds} = find_clients_names(ActorAuthzIds, CallbackFun),
  +            error_logger:info_msg({found_client_names, ClientNames}),
  +            error_logger:info_msg({remaining_authz_ids, RemainingAuthzIds}),
               {Usernames, DefunctAuthzIds} = find_users_names(RemainingAuthzIds, CallbackFun),
  +            error_logger:info_msg({defunct_authz_ids, DefunctAuthzIds}),
  +            error_logger:info_msg({name_search_results, ClientNames, Usernames}),
               {GroupNames, DefunctGroupAuthzIds} = find_groups_names(GroupAuthzIds, CallbackFun),
               extra_mile(DefunctAuthzIds ++ DefunctGroupAuthzIds),
  -            GroupRecord#oc_chef_group{clients = ClientNames, users =  Usernames, groups =  GroupNames, auth_side_actors = ActorAuthzIds, auth_side_groups = GroupAuthzIds};
  +            Result = GroupRecord#oc_chef_group{clients = ClientNames, users =  Usernames, groups =  GroupNames, auth_side_actors = ActorAuthzIds, auth_side_groups = GroupAuthzIds},
  +            error_logger:info_msg({fetch_found, Result}),
  +            Result;
           not_foud ->
               not_found;
           Other ->
  +            error_logger:info_msg({fetch_found_other, Other}),
               Other
       end.
   
  
positive.code: query_and_diff_authz_ids(QueryName, AuthzIds, Key, CallbackFun) ->
      case CallbackFun({QueryName, [AuthzIds]}) of
          not_found ->
              {[], []};
          Results when is_list(Results)->
              Flattened = lists:flatten(Results),
              ResultNames = proplists:get_all_values(Key, Flattened),
              FoundAuthzIds = proplists:get_all_values(<<"authz_id">>, Flattened),
              {ResultNames, sets:to_list(sets:subtract(sets:from_list(AuthzIds), sets:from_list(FoundAuthzIds)))};
          _Other ->
              {[], []}
      end.
  
negative.code:     ok.
  
  new_record(OrgId, AuthzId, GroupData) ->
      Name = ej:get({<<"groupname">>}, GroupData, ej:get({<<"id">>}, GroupData)),
      Id = chef_object_base:make_org_prefix_id(OrgId, Name),
      #oc_chef_group{id = Id,
                         authz_id = AuthzId,
  