create table ws_database(
	id         integer not null,

	constraint pk_ws_database_id primary key (id)
);

create table files(
	id            integer not null,
	db_id         integer,

	constraint pk_files_id    primary key (id),
	constraint fk_files_db_id foreign key (db_id) references ws_database(id)  on delete cascade
);


create table history_user (
	id_user integer not null,
	name    varchar(240),

	constraint pk_history_user     primary key (id_user),
	constraint u_history_user_name unique      (name)
);

create table history_comp (
	id_comp integer not null,
	name    varchar(240),

	constraint pk_history_comp     primary key (id_comp),
	constraint u_history_comp_name unique      (name)
);

create table table_names(
	id   integer not null,
	name varchar(128) not null,

	constraint pk_table_names_id  primary key (id),
	constraint u_table_names_name unique      (name)
);


create table history_table (
	id_table integer not null,
	id_file  integer not null,
	id_name  integer not null,

	constraint pk_history_table_id_table  primary key (id_table),
	constraint fk_history_table_id_file   foreign key (id_file) references files(id) on delete cascade,
	constraint fk_history_table_id_name   foreign key (id_name) references table_names(id),
	constraint u_history_table            unique      (id_file,id_name)
);

create table history_row (
	id_row   integer not null,
	id_table integer not null,
	keystr   varchar(2048),

	constraint pk_history_row_id_row   primary key (id_row),
	constraint fk_history_row_id_table foreign key (id_table) references history_table(id_table) on delete cascade
);

create table history (
	id_rec     integer default -1 not null,
	id_row     integer not null,
	id_module  integer not null,
	id_user    integer not null,
	id_comp    integer not null,
	id_array   integer not null,
	id_col     integer not null,
	modifytype integer not null,
	datetime   timestamp not null,

	constraint pk_history           primary key (id_rec),
	constraint fk_history_id_row    foreign key (id_row)    references history_row   (id_row) on delete cascade,
	constraint fk_history_id_user   foreign key (id_user)   references history_user  (id_user),
	constraint fk_history_id_comp   foreign key (id_comp)   references history_comp  (id_comp)
);

create table fast_history (
	db_id    integer not null,
	tname_id integer not null,
	id_user  integer not null,
	id_comp  integer not null,

	constraint fk_fast_history_dbid foreign key (db_id)   references ws_database  (id) on delete cascade,

	constraint fk_fast_history_tn   foreign key (tname_id) references table_names  (id),
	constraint fk_fast_history_user foreign key (id_user)  references history_user (id_user),
	constraint fk_fast_history_comp foreign key (id_comp)  references history_comp (id_comp),
	constraint u_fast_history       unique      (db_id,tname_id,id_user,id_comp)
);

commit;

delete from fast_history 
where not exists( 
	select 1 
	from history h 
	join history_row r on h.id_row = r.id_row 
	join history_table t on t.id_table = r.id_table 
	join files f on f.id = t.id_file 
	where f.db_id = fast_history.db_id 
	and t.id_name = fast_history.tname_id 
	and h.id_user = fast_history.id_user 
	and h.id_comp = fast_history.id_comp 
);

Database header page information:
	Flags			0
	Checksum		12345
	Generation		130468
	Page size		16384
	ODS version		11.2
	Oldest transaction	130452
	Oldest active		130453
	Oldest snapshot		130448
	Next transaction	130458
	Bumped transaction	1
	Sequence number		0
	Next attachment ID	111
	Implementation ID	26
	Shadow count		0
	Page buffers		0
	Next header page	0
	Database dialect	3
	Creation date		Feb 29, 2020 17:18:29
	Attributes		

    Variable header data:
	*END*


Database file sequence:
File E:\PrimeDbFirebirdDatabase\PRIME1.FBDB is the only file

Analyzing database pages ...
FAST_HISTORY (220)
    Primary pointer page: 613, Index root page: 614
    Average record length: 21.00, total records: 24945
    Average version length: 0.00, total versions: 0, max versions: 0
    Data pages: 95, data page slots: 95, average fill: 61%
    Fill distribution:
	 0 - 19% = 0
	20 - 39% = 1
	40 - 59% = 0
	60 - 79% = 94
	80 - 99% = 0

    Index FK_FASTHISTORY_DBID (0)
	Depth: 2, leaf buckets: 7, nodes: 24945
	Average data length: 0.00, total dup: 24929, max dup: 20405
	Fill distribution:
	     0 - 19% = 1
	    20 - 39% = 0
	    40 - 59% = 0
	    60 - 79% = 0
	    80 - 99% = 6

    Index FK_FASTHISTORY_IDCOMP (3)
	Depth: 2, leaf buckets: 10, nodes: 24945
	Average data length: 0.09, total dup: 23730, max dup: 295
	Fill distribution:
	     0 - 19% = 1
	    20 - 39% = 0
	    40 - 59% = 4
	    60 - 79% = 3
	    80 - 99% = 2

    Index FK_FASTHISTORY_IDUSER (2)
	Depth: 2, leaf buckets: 9, nodes: 24945
	Average data length: 0.07, total dup: 24018, max dup: 1375
	Fill distribution:
	     0 - 19% = 0
	    20 - 39% = 0
	    40 - 59% = 2
	    60 - 79% = 5
	    80 - 99% = 2

    Index FK_FASTHISTORY_TNAMEID (1)
	Depth: 2, leaf buckets: 8, nodes: 24945
	Average data length: 0.10, total dup: 23224, max dup: 1509
	Fill distribution:
	     0 - 19% = 0
	    20 - 39% = 0
	    40 - 59% = 0
	    60 - 79% = 5
	    80 - 99% = 3

    Index U_FASTHISTORY_DBID_IDCOMP_I (4)
	Depth: 2, leaf buckets: 17, nodes: 24945
	Average data length: 2.37, total dup: 0, max dup: 0
	Fill distribution:
	     0 - 19% = 0
	    20 - 39% = 0
	    40 - 59% = 8
	    60 - 79% = 8
	    80 - 99% = 1