set autoddl off;
set list off;
set blob on;
set width dts 12;
set width mon_user 20;
set width remote_process 30;
set width sql_txt 50;
set width remote_ip 15;
set width rn 3;
set heading off;
select substring(cast(current_timestamp as varchar(25)) from 12 for 12) dts,'iter #'||1 msg from rdb$database;
set heading on;
commit;
select
     substring(cast(current_timestamp as varchar(25)) from 12 for 12) dts
     -- mon$attachments:
     ,cast(row_number()over(order by mon$attachment_id) as char(3)) rn
     ,a.mon$remote_address remote_IP
     ,a.mon$attachment_id attach_id
     ,a.mon$user mon_user
     ,a.mon$stat_id       stat_id
     ,a.mon$server_pid    server_PID
     ,a.mon$remote_pid    remote_PID
     -- mon$memory_usage:
     ,u.mon$memory_used used_memory
     ,u.mon$memory_allocated alloc_by_OS
     -- mon$io_stats:
     ,i.mon$page_reads reads
     ,i.mon$page_writes writes
     ,i.mon$page_fetches fetches
     ,i.mon$page_marks marks
     -- mon$record_stats:
     ,r.mon$record_seq_reads seq_reads
     ,r.mon$record_idx_reads idx_reads
     ,r.mon$record_inserts ins_cnt
     ,r.mon$record_updates upd_cnt
     ,r.mon$record_deletes del_cnt
     ,r.mon$record_backouts bk_outs
     ,r.mon$record_purges purges
     ,r.mon$record_expunges expunges
     -- aux info:
     ,right(a.mon$remote_process,30) remote_process
     -- mon$statements:
     --,left(cast(s.mon$sql_text as varchar(32760)),50) sql_txt
from mon$attachments a
      left join mon$memory_usage u on a.mon$stat_id=u.mon$stat_id
      left join mon$io_stats i on a.mon$stat_id=i.mon$stat_id
      left join mon$record_stats r on a.mon$stat_id=r.mon$stat_id
where
      a.mon$attachment_id<>current_connection
;
 shell sleep 1; 

set heading off;
select substring(cast(current_timestamp as varchar(25)) from 12 for 12) dts,'iter #'||2 msg from rdb$database;
 commit; 
select
     substring(cast(current_timestamp as varchar(25)) from 12 for 12) dts
     -- mon$attachments:
     ,cast(row_number()over(order by mon$attachment_id) as char(3)) rn
     ,a.mon$remote_address remote_IP
     ,a.mon$attachment_id attach_id
     ,a.mon$user mon_user
. . .
where
      a.mon$attachment_id<>current_connection
;
shell sleep 1;

. . . etc еще 7200 раз. . .