430: where din.table_name = p_table_name
431: and din.table_owner = p_owner
432: and exists (
433: select 1
434: from dba_ind_columns dic
435: where din.index_name = dic.index_name
436: and dic.index_owner = p_owner
437: and dic.column_name = 'WORKER_ID'
438: and dic.column_position = 1 );
438: and dic.column_position = 1 );
439:
440: CURSOR column_name_c (p_index_name VARCHAR2, p_owner VARCHAR2) IS
441: select column_name, column_position
442: from dba_ind_columns
443: where index_name = p_index_name
444: and index_owner = p_owner
445: and column_position <> 1
446: order by column_position;
446: order by column_position;
447:
448: TYPE l_index_name_type IS TABLE OF dba_indexes.index_name%TYPE;
449: TYPE l_owner_type IS TABLE OF dba_indexes.owner%TYPE;
450: TYPE l_column_name_type IS TABLE OF dba_ind_columns.column_name%TYPE;
451: TYPE l_column_position_type IS TABLE OF dba_ind_columns.column_position%TYPE;
452:
453: l_index_name l_index_name_type;
454: l_owner l_owner_type;
447:
448: TYPE l_index_name_type IS TABLE OF dba_indexes.index_name%TYPE;
449: TYPE l_owner_type IS TABLE OF dba_indexes.owner%TYPE;
450: TYPE l_column_name_type IS TABLE OF dba_ind_columns.column_name%TYPE;
451: TYPE l_column_position_type IS TABLE OF dba_ind_columns.column_position%TYPE;
452:
453: l_index_name l_index_name_type;
454: l_owner l_owner_type;
455: l_column_name l_column_name_type;