execute block as
begin
  . . .  DML-код, число строк выбирается из случайным образом, но из диапазона [ 20...200 ] . . .
end
commit;
-- пауза после коммита (типа имитация OLTP :))
shell take_some_sleep.bat;

-- file = `monstt1.sql`
set list off;
set blob all;
commit;
shell rm -f ./tmpmonstt1.tmp ./monstt1.log;
out tmpmonstt1.tmp;
select
   s.mon$attachment_id att
  ,s.stt_over_all_attachments
  ,count(iif(mon$state=1,1,null)) attach_stt_live
  ,count(iif(mon$state=0,1,null)) attach_stt_dead
  ,count(*) attach_stt_overall
  ,cast( replace(replace(left(list(iif(mon$state=1,mon$sql_text,'')), 200),ascii_char(10),' '), ascii_char(13),'') as varchar(200)) attach_SQL_live_sample
  ,cast( replace(replace(left(list(iif(mon$state=0,mon$sql_text,'')), 200),ascii_char(10),' '), ascii_char(13),'') as varchar(200)) attach_SQL_dead_sample
from (
  select s.*,count(*)over() stt_over_all_attachments from mon$statements s
) s
where mon$attachment_id<>current_connection
group by
   s.mon$attachment_id
  ,s.stt_over_all_attachments
;
out;
shell cat ./tmpmonstt1.tmp | sed -e "s/ \{1,\}$//" 1>./monstt1.log 2>&1;
shell rm -f ./tmpmonstt1.tmp;