luisf
committed
on 08 Feb 06
grant logic moved to a procedure