create cursor tt (id i autoinc, name v( 10 ), catname v( 10 ))
insert into tt (name, catname) values ('Вася', 'пионер')
insert into tt (name, catname) values ('Катя', 'доярка')
insert into tt (name, catname) values ('Миша', 'рабочий')
insert into tt (name, catname) values ('Аня',  'пионер')
insert into tt (name, catname) values ('Надя', 'доярка')

select catname, cnt(*) as cntCat ;
	from tt ;
	group by catname ;
	into cursor result

report form result ....

create cursor catNames (catid i autoinc, catname v( 10 ))
insert into catNames (catname) values ('пионер')
insert into catNames (catname) values ('рабочий')
insert into catNames (catname) values ('доярка')

create cursor tt (id i autoinc, name v( 10 ), catid i)
insert into tt (name, catid) values ('Вася',  1 )
insert into tt (name, catid) values ('Катя',  3 )
insert into tt (name, catid) values ('Миша',  2 )
insert into tt (name, catid) values ('Аня',   1 )
insert into tt (name, catid) values ('Надя',  3 )

select c.catname, cnt(*) as cntCat ;
	from tt t ;
		left join catNames c on c.catid =t.catid ;
	group by t.catid, c.catname ;
	into cursor result