Статистика для дашборда #7

src/core/core_ticket.erl

@@ -7,6 +7,7 @@
   stats/0,
   create_ticket/1,
   list_by_user/1]).
+-export([count_tickets_by_status/1, count_tickets_by_admin/2]).
 
 list_all() ->
   mnesia:dirty_match_object(#ticket{_ = '_'}).
@@ -83,4 +84,12 @@ apply_updates(Ticket, Updates) ->
               end, Ticket, maps:to_list(Updates)).
 
 count_by_status(Status, Tickets) ->
-  length([T || T <- Tickets, T#ticket.status =:= Status]).
+  length([T || T <- Tickets, T#ticket.status =:= Status]).
+
+count_tickets_by_status(Status) ->
+  Match = #ticket{status = Status, _ = '_'},
+  length(mnesia:dirty_match_object(Match)).
+
+count_tickets_by_admin(AdminId, Status) ->
+  Match = #ticket{assigned_to = AdminId, status = Status, _ = '_'},
+  length(mnesia:dirty_match_object(Match)).