gsec -display -database .\security3.fdb
Install incomplete, please read the Compatibility chapter in the release notes for this version

echo create user SYSDBA password 'masterkey'; show users; set list on; select * from sec$users; | isql -user sysdba .\security3.fdb
Users in the database
  2 #SYSDBA

SEC$USER_NAME                   SYSDBA
SEC$FIRST_NAME                  <null>
SEC$MIDDLE_NAME                 <null>
SEC$LAST_NAME                   <null>
SEC$ACTIVE                      <true>
SEC$ADMIN                       <true>
SEC$DESCRIPTION                 <null>
SEC$PLUGIN                      Srp

gsec -display -database .\security3.fdb
     user name                    uid   gid admin     full name
------------------------------------------------------------------------------------------------
SYSDBA                              0     0

create sequence g;
recreate table test(id int, x int);
commit;
insert into test select gen_id(g,1), 100 from rdb$types rows 8;
commit;

set term ^;
execute block as
begin
execute statement (
    'execute block( a int = ?, b int = ? ) as '
    || 'begin '
    || '  update test set x = x/2 '
    || '  where abs(id) between :a and :b; '
    || 'end')  (2, 5) ;
end
^
set term ;^
commit;
select * from test;

C:\MIX\firebird\QA\fbt-repo\tmp>isql /3333:e30
Database:  /3333:e30
SQL> create table test1(id int);
SQL> create role boss;
SQL> create role acnt;
SQL> create or alter user ozzy password '123' revoke admin role;
SQL> set wng off;
SQL> revoke all on all from public;
SQL> revoke all on all from boss;
SQL> revoke all on all from acnt;
SQL> revoke all on all from ozzy;
SQL> commit;
SQL> grant insert, select on test1 to boss;
SQL> grant select on test1 to acnt;
SQL> grant boss to ozzy;
SQL> grant acnt to ozzy;
SQL> commit;
SQL> show grants;

/* Grant permissions for this database */
GRANT SELECT ON TEST1 TO ROLE ACNT
GRANT INSERT, SELECT ON TEST1 TO ROLE BOSS
GRANT ACNT TO OZZY
GRANT BOSS TO OZZY
SQL> commit; connect '/3333:e30' user ozzy password '123';
Database:  '/3333:e30', User: ozzy
SQL> set role boss;
SQL> select current_role from rdb$database;

ROLE
===============================
BOSS

SQL> insert into test1 values(1);
SQL> set role acnt;
SQL> select current_role from rdb$database;

ROLE
===============================
ACNT

SQL> insert into test1 values(2);
Statement failed, SQLSTATE = 28000
no permission for INSERT access to TABLE TEST1
SQL> select * from test1;

          ID
============
           1

SQL> savepoint sp_acnt;
SQL> set role boss;
SQL> insert into test1 values(2);
SQL> insert into test1 values(3);
SQL> set role acnt;
SQL> select * from test1;

          ID
============
           1
           2
           3

SQL> rollback to sp_acnt;
SQL> select * from test1;

          ID
============
           1

SQL>

SQL> create exception ex1 'something wrong in @1 @2 @3 @4 @5 @6 @7 @8 @9 @10 @11';
SQL> -- А теперь вызовем это исключение, но не с 11 аргументами, а с 9:
SQL> execute block as
CON> begin
CON> exception ex1 using (' hvhvhv ','zxcv2','hgfd03','q04','q05','q06','bebebe7','gagaga8','mememe9');
CON> end^
Statement failed, SQLSTATE = HY000
exception 1
-EX1
-something wrong in  hvhvhv  zxcv2 hgfd03 q04 q05 q06 bebebe7 gagaga8 mememe9  hvhvhv 0  hvhvhv 1

SQL> create exception ex1 'something wrong in @1 @2 @3 @4 @5 @6 @7 @8 @9 @10 @11';
SQL> set term ^;
SQL> execute block as
CON> begin
CON> exception ex1 using ('q01','q02','q03','q04','q05','q06','q07','q08','q09','q10','q11');
CON> end^
Statement failed, SQLSTATE = 07002
Number of arguments (11) exceeds the maximum (9) number of EXCEPTION USING arguments
SQL>

SQL> create exception ex1 'something wrong in  @1 @2 @3 @4 @5 @6 @7 @8 @9 @10 @11 ';
SQL> set term ^;
SQL> execute block as
CON> begin
CON> exception ex1 using ( 'q01','q02','q03','q04','q05','q06','q07','q08','q09','q10','q11' );
CON> end^
Statement failed, SQLSTATE = 07002
Number of arguments (11) exceeds the maximum (9) number of EXCEPTION USING arguments

SQL> recreate table test(x smallint);
SQL> set sqlda_display on;

SQL> select sum( sum(x) )over() from test;
. . .
OUTPUT message field count: 1
01: sqltype: 580 INT64 Nullable scale: 0 subtype: 0 len: 8
. . .

SQL> select sum(x) from test;
. . .
01: sqltype: 580 INT64 Nullable scale: 0 subtype: 0 len: 8
. . .

SQL> select sum(x)over() from test;
. . .
01: sqltype: 580 INT64 Nullable scale: 0 subtype: 0 len: 8
. . .

SQL> recreate table test(id int primary key, x int, y int);
SQL> recreate sequence g;
SQL> insert into test values(gen_id(g,1), 1, 10);
SQL> insert into test values(gen_id(g,1), 1, 10);
SQL> insert into test values(gen_id(g,1), 1, 10);
SQL> insert into test values(gen_id(g,1), 1, 10);
SQL> insert into test values(gen_id(g,1), 1, 11);
SQL> insert into test values(gen_id(g,1), 1, 12);
SQL> insert into test values(gen_id(g,1), 2, 21);
SQL> insert into test values(gen_id(g,1), 2, 21);
SQL> insert into test values(gen_id(g,1), 2, 21);
SQL> insert into test values(gen_id(g,1), 3, 31);
SQL> insert into test values(gen_id(g,1), 3, 31);
SQL> insert into test values(gen_id(g,1), 3, 32);
SQL> insert into test values(gen_id(g,1), 3, 33);
SQL> insert into test values(gen_id(g,1), 3, 34);
SQL> select t.*,rank()over(partition by x order by y) from test t;

          ID            X            Y                  RANK
============ ============ ============ =====================
           1            1           10                     1
           2            1           10                     1
           3            1           10                     1
           4            1           10                     1
           5            1           11                     5
           6            1           12                     6
           7            2           21                     1
           8            2           21                     1
           9            2           21                     1
          10            3           31                     1
          11            3           31                     1
          12            3           32                     3
          13            3           33                     4
          14            3           34                     5

set term ^;
execute block returns(session_vars int, transaction_vars int)
as
  declare n int = 1000;
  declare i int;
  declare k int;
begin
  i = 1;
  while(i <= n) do
  begin
      execute statement 'select rdb$set_context(''USER_SESSION'',''VAR_ATT'||i||''', '||i||') from rdb$database' into k;
      i = i+1;
  end
  i = 1;
  while(i <= n) do
  begin
      execute statement 'select rdb$set_context(''USER_TRANSACTION'',''VAR_TX1_'||i||''', '||i||') from rdb$database' into k;
      i = i+1;
  end

  in autonomous transaction do
  begin
      i = 1;
      while(i <= n) do
      begin
          execute statement 'select rdb$set_context(''USER_TRANSACTION'',''VAR_TX2_'||i||''', '||i||') from rdb$database' into k;
          i = i+1;
      end

      in autonomous transaction do
      begin
          i = 1;
          while(i <= n) do
          begin
              execute statement 'select rdb$set_context(''USER_TRANSACTION'',''VAR_TX3_'||i||''', '||i||') from rdb$database' into k;
              i = i+1;
          end
          select 
               count( iif(c.mon$attachment_id is not null, mon$variable_value, null) )
              ,count( iif(c.mon$attachment_id is not null, null, mon$variable_value) )
          from mon$context_variables c
          into session_vars, transaction_vars;
      end
  end
  suspend;
end
^
set term ^;

SESSION_VARS TRANSACTION_VARS
============ ================
        1000             3000