connect 'd:\database\my_database.fdb' user 'SYSDBA' password 'masterkey';
-- drop user MY_USER;
drop database;
create database 'd:\database\my_database.fdb' user 'SYSDBA' password 'masterkey' page_size 8192 default character set UTF8;
-- create user MY_USER password 'MY_PASS' ;
set term ^;


create table my_table
( my_num integer
, my_data blob
) ^
commit work ^

insert into my_table(my_num , my_data) values (1, 'qwerty') ^


create or alter procedure my_proc_2(my_data blob)
as
    declare variable my_value blob;
begin
    my_value = my_data ;
end ^
-- grant select on table my_table to procedure my_proc_2 ^


create or alter procedure my_proc
-- returns ( my_data blob)
as
    declare variable my_data blob;
begin
    select my_data
      from my_table
     where my_num = 1
     into: my_data;

     execute procedure my_proc_2(my_data);

end ^
grant select on table my_table to procedure my_proc ^
grant execute on procedure my_proc_2 to procedure my_proc ^
grant execute on procedure my_proc to public ^

-- execute procedure my_proc ^

commit work ^
set term ;^

connect 'd:\database\my_database.fdb' user MY_USER password 'MY_PASS';
set term ^;


execute procedure my_proc ^ -- result of this execute id : 'no permission for SELECT access to TABLE MY_TABLE'


/*

C:\WINDOWS\system32>"C:\Program Files (x86)\Firebird\Firebird_3_0\isql" -i D:\source\NOTEMATRIX\FBSQL\test\script.sql
Use CONNECT or CREATE DATABASE to specify a database
Statement failed, SQLSTATE = 28000
no permission for SELECT access to TABLE MY_TABLE
-At procedure 'MY_PROC_2' line: 5, col: 5
At procedure 'MY_PROC' line: 11, col: 6
After line 53 in file D:\source\NOTEMATRIX\FBSQL\test\script.sql

*/