Этот простой запрос дает список таблиц вместе с именем ограничения PK (но не именем столбца):
select ut.table_name, uc.constraint_name
from user_tables ut
left join user_constraints uc
on ut.table_name = uc.table_name
and uc.constraint_type = 'P';
Если вам нужно имя столбца, помните, что у PK может быть несколько столбцов! Сначала нам нужно создать тип утилиты из-за агрегатной функции collect ():
create type ty_varchar_nt as table of varchar2(4000);
select ut.table_name, uc.constraint_name, cast(collect (uic.column_name) as ty_varchar_nt) as pk_cols
from user_tables ut
left join user_constraints uc
on ut.table_name = uc.table_name
and uc.constraint_type = 'P'
left join user_ind_columns uic
on uc.index_name = uic.index_name
group by ut.table_name, uc.constraint_name;
Если вам не нравится форматирование вложенной вкладки, вы можете написать служебную функцию, которая будет принимать NT в качестве входных данных и предоставлять объединенную строку с разделителями-запятыми в качестве выходных данных. Просто нет времени сделать это самому;)