R
Наверное будет логичнее как-то так
Select
e.fullname as Who,
d.fullname as action,
e1.fullname as Reciever
from People e, (select * ActionEvents where actionid = IdbyConst('kiss')) ae,Dicti d, People e1
Where e.id = ae.actionsender and d.id= ae.actionid and e1.id = ae.actionreciever