from t1 join callnumbers on (callnumbers.callnumber = itemcallnumber)
where itemcallnumber rlike '^[ABCDEFMPS][A-Z]';
+-- A% D%
+insert into t2
+select
+ upper(substring(itemcallnumber,1,1)) as file,
+ regexp_replace( substring(itemcallnumber,2,2),'^[^0-9][^0-9]','other') as sheet,
+ count_biblio as br_primjeraka,
+ callnumbers.count as br_signatura,
+ itemcallnumber,
+ author as autor,
+ title as naslov,
+ publicationyear as godina,
+ number as svezak,
+ biblionumber,
+ copynumber
+
+from t1 join callnumbers on (callnumbers.callnumber = itemcallnumber)
+where itemcallnumber rlike '^[AD]';
+
+
+
-- cleanup seet names
update t2 set sheet='other' where sheet not rlike '^[0-9][0-9]' ;