messages/3,
message_by_id/1,
messages_by_ids/1,
+ message_existe/1,
reponses/0,
repond_a/1,
nb_page/1,
end
end
)).
-
+
% Met à jour la date de la dernière connexion d'un utilisateur à maintenant
update_date_derniere_connexion(UserId) ->\r
%io:format("~s~n", [qlc:info(Query)]),
qlc:e(Query)
end
- )).\r
+ )).
+
+
+% Est-ce qu'un message existe ? Renvoie un boolean.
+% TODO : ya pas plus simple ?
+message_existe(Id) ->
+ resultat_transaction(mnesia:transaction(fun() ->
+ length(qlc:e(qlc:q([E#minichat.id || E <- mnesia:table(minichat), E#minichat.id =:= Id]))) =:= 1
+ end)).\r
% Renvoie le nombre de page total en fonction du nombre de message par page N