CREATE OR REPLACE FUNCTION getMessages(begindate date,
enddate date) RETURNS table("outsms" bigint, "delivsms" bigint, "outemail" bigint, "delivemail" bigint)
LANGUAGE plpgsql
AS
$body$
begin
RETURN QUERY
select outsms.cnt as "outsms",
delivsms.cnt as "delivsms",
outemail.cnt as "outemail",
delivemail.cnt as "delivemail" from

(select count(a.*) as cnt from NTF_MESSAGE a /*всего отправлено смс*/
join NTF_MSG_TYPES_LINK b on b.ATTRA=a.A_OUID
where b.ATTRb=10322418 and a.a_createdate>=begindate and a.a_createdate<=enddate ) outsms

join

(select count(a.*) as cnt from NTF_MESSAGE a /*всего доставлено смс*/
join NTF_MSG_TYPES_LINK b on b.ATTRA=a.A_OUID
join NTF_MESSAGE_LOG c on c.a_message=a.A_OUID
where b.ATTRb=10322418 and a.a_createdate>=begindate and a.a_createdate<=enddate ) delivsms on 1=1

join

(select count(a.*) as cnt from NTF_MESSAGE a /*всего отправлено email*/
join NTF_MSG_TYPES_LINK b on b.ATTRA=a.A_OUID
where b.ATTRb=10322416 and a.a_createdate>=begindate and a.a_createdate<=enddate )outemail on 1=1

join

(select count(a.*) as cnt from NTF_MESSAGE a /*всего доставлено email*/
join NTF_MSG_TYPES_LINK b on b.ATTRA=a.A_OUID
join NTF_MESSAGE_LOG c on c.a_message=a.A_OUID
where b.ATTRb=10322416 and c.a_error is null and a.a_createdate>=begindate and a.a_createdate<=enddate ) delivemail on 1=1
;

end;
$body$;

Запрос выполняется очень долго, как его оптимизировать?