DBA Data[Home] [Help]

APPS.AD_ZD_TABLE dependencies on AD_ZD_TABLE

Line 1: package body AD_ZD_TABLE as

1: package body AD_ZD_TABLE as
2: /* $Header: ADZDTMB.pls 120.78.12020000.27 2013/06/21 13:24:42 rputchak ship $ */
3:
4: C_PACKAGE constant varchar2(80) := 'ad.plsql.ad_zd_table.';
5:

Line 4: C_PACKAGE constant varchar2(80) := 'ad.plsql.ad_zd_table.';

1: package body AD_ZD_TABLE as
2: /* $Header: ADZDTMB.pls 120.78.12020000.27 2013/06/21 13:24:42 rputchak ship $ */
3:
4: C_PACKAGE constant varchar2(80) := 'ad.plsql.ad_zd_table.';
5:
6: /*
7: ** --------------------------------------------------------------------
8: ** Internal

Line 129: and ev.view_name = ad_zd_table.ev_view(x_table_name);

125: select ev.view_name
126: into l_ev_name
127: from dba_editioning_views ev
128: where ev.owner = x_table_owner
129: and ev.view_name = ad_zd_table.ev_view(x_table_name);
130:
131: return 'Y';
132:
133: exception

Line 488: -- In ALL other cases raise error, so AD_ZD_TABLE.UPGRADE call will be marked as FAILED,

484: -- Can NOT DISABLE a trigger which has ORA-25006 issue.
485: --alter_trigger(x_trigger_owner, x_trigger_name, 'DISABLE');
486: return;
487: end if;
488: -- In ALL other cases raise error, so AD_ZD_TABLE.UPGRADE call will be marked as FAILED,
489: -- and worker would consider in next attempt.
490: log(c_module, 'ERROR', x_trigger_owner||'.'||x_trigger_name || ': '|| sqlerrm);
491: raise;
492: end;

Line 918: -- MV tables already will be excluded by AD_ZD_TABLE.UPGRADE API

914: is
915: c_module varchar2(127) := c_package||'fix_public_synonym';
916: l_sql varchar2(1024);
917:
918: -- MV tables already will be excluded by AD_ZD_TABLE.UPGRADE API
919: -- Check recursive dependency as well:
920: -- e.g: View --> synonym --> public-synonym
921: --
922: cursor c_dependents (p_synonym_name varchar2) is

Line 1021: ad_zd_table.ev_view_column(col.column_name) view_column_name

1017: L_EV_FIRST boolean;
1018:
1019: cursor C_EV_COLUMNS(X_TABLE_OWNER varchar2, X_TABLE_NAME varchar2) is
1020: select
1021: ad_zd_table.ev_view_column(col.column_name) view_column_name
1022: , max(col.column_name) table_column_name
1023: , min(nvl(evc.view_column_id, 1000+col.column_id)) view_column_id
1024: from dba_tab_columns col,
1025: dba_editioning_view_cols evc

Line 1029: and evc.view_name(+) = ad_zd_table.ev_view(col.table_name)

1025: dba_editioning_view_cols evc
1026: where col.owner = x_table_owner
1027: and col.table_name = x_table_name
1028: and evc.owner(+) = col.owner
1029: and evc.view_name(+) = ad_zd_table.ev_view(col.table_name)
1030: and evc.view_column_name(+) = ad_zd_table.ev_view_column(col.column_name)
1031: group by ad_zd_table.ev_view_column(col.column_name)
1032: order by view_column_id;
1033:

Line 1030: and evc.view_column_name(+) = ad_zd_table.ev_view_column(col.column_name)

1026: where col.owner = x_table_owner
1027: and col.table_name = x_table_name
1028: and evc.owner(+) = col.owner
1029: and evc.view_name(+) = ad_zd_table.ev_view(col.table_name)
1030: and evc.view_column_name(+) = ad_zd_table.ev_view_column(col.column_name)
1031: group by ad_zd_table.ev_view_column(col.column_name)
1032: order by view_column_id;
1033:
1034: begin

Line 1031: group by ad_zd_table.ev_view_column(col.column_name)

1027: and col.table_name = x_table_name
1028: and evc.owner(+) = col.owner
1029: and evc.view_name(+) = ad_zd_table.ev_view(col.table_name)
1030: and evc.view_column_name(+) = ad_zd_table.ev_view_column(col.column_name)
1031: group by ad_zd_table.ev_view_column(col.column_name)
1032: order by view_column_id;
1033:
1034: begin
1035:

Line 1212: move_triggers(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));

1208: -- Install Editioning View (handles synonyms, VPD policies)
1209: install_ev(x_table_owner, x_table_name);
1210:
1211: -- Move triggers to SYNONYM from table
1212: move_triggers(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));
1213:
1214: -- cleanup PUBLIC synonyms
1215: fix_public_synonyms(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));
1216:

Line 1215: fix_public_synonyms(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));

1211: -- Move triggers to SYNONYM from table
1212: move_triggers(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));
1213:
1214: -- cleanup PUBLIC synonyms
1215: fix_public_synonyms(x_table_owner, x_table_name, ad_zd_table.ev_view(x_table_name));
1216:
1217: -- upgrade seed data tables
1218: if is_seed(x_table_owner, x_table_name) = 'Y' then
1219: ad_zd_seed.upgrade(x_table_name);

Line 1355: x_sql => 'begin ad_zd_table.upgrade('''||tab_rec.table_owner ||''', '''|| tab_rec.table_name || '''); end;' ,

1351: for tab_rec in c_upgrade_tables loop
1352: log(c_module, 'STATEMENT', 'Store Upgrade action for table '||tab_rec.table_name );
1353: ad_zd_parallel_exec.load(
1354: x_phase => ad_zd_parallel_exec.c_phase_upgrade_table,
1355: x_sql => 'begin ad_zd_table.upgrade('''||tab_rec.table_owner ||''', '''|| tab_rec.table_name || '''); end;' ,
1356: x_unique => false );
1357: end loop;
1358:
1359: -- Process tables that need re-upgrade.

Line 1364: x_sql => 'begin ad_zd_table.upgrade('''||tab_rec.table_owner ||''', '''|| tab_rec.table_name || '''); end;' ,

1360: for tab_rec in c_reupgrade_tables loop
1361: log(c_module, 'STATEMENT', 'Store Re-Upgrade action for table '||tab_rec.table_name );
1362: ad_zd_parallel_exec.load(
1363: x_phase => ad_zd_parallel_exec.c_phase_upgrade_table,
1364: x_sql => 'begin ad_zd_table.upgrade('''||tab_rec.table_owner ||''', '''|| tab_rec.table_name || '''); end;' ,
1365: x_unique => false);
1366:
1367: end loop;
1368:

Line 1393: and syn.table_name = ad_zd_table.ev_view(x_table_name)

1389: cursor C_SYNONYMS(x_table_owner varchar2, x_table_name varchar2) is
1390: select syn.owner owner, syn.synonym_name name
1391: from dba_synonyms syn
1392: where syn.table_owner = x_table_owner
1393: and syn.table_name = ad_zd_table.ev_view(x_table_name)
1394: and syn.owner <> 'PUBLIC';
1395:
1396: begin
1397: log( c_module, 'PROCEDURE', 'begin: '||x_table_owner||'.'||x_table_name);

Line 1421: l_ev_name := ad_zd_table.ev_view(x_table_name);

1417: x_table_owner||'"."'||x_table_name||'"', c_module);
1418: end loop;
1419:
1420: -- Drop EV
1421: l_ev_name := ad_zd_table.ev_view(x_table_name);
1422: log(c_module, 'EVENT', 'Drop EV '||x_table_owner||'.'||l_ev_name);
1423: exec('drop view "'||x_table_owner||'"."'||l_ev_name ||'"', c_module, true);
1424:
1425: log( c_module, 'PROCEDURE', 'end');

Line 1713: l_upd_ev_name := ad_zd_table.ev_view(l_table_name);

1709: -- Any column will do, but should be least-indexed and smallest column for best performance
1710: if (x_cet_name = ad_zd_seed.eds_fcet(l_table_name)) then
1711:
1712: -- for seed data sync FCET, update least indexed smallest column in EV
1713: l_upd_ev_name := ad_zd_table.ev_view(l_table_name);
1714: select x.view_column_name into l_upd_column from
1715: ( select evc.view_column_name, count(idc.index_name), col.data_length
1716: from dba_tab_columns col, dba_ind_columns idc, dba_editioning_view_cols evc
1717: where col.owner = l_table_owner

Line 1756: ad_zd_table.update_4fcet(l_table_owner, l_table_name, l_upd_cet_name, l_upd_column, l_upd_ev_name);

1752: end loop;
1753:
1754: -- update table
1755: begin
1756: ad_zd_table.update_4fcet(l_table_owner, l_table_name, l_upd_cet_name, l_upd_column, l_upd_ev_name);
1757: exception
1758: when others then
1759: l_error := substrb(sqlerrm, 1, 2000);
1760: -- disable the trigger

Line 1843: and idx.index_name = ad_zd_table.revised_index_name(x_index_name);

1839: select idx.index_name
1840: into l_revised_name
1841: from dba_indexes idx
1842: where idx.owner = x_index_owner
1843: and idx.index_name = ad_zd_table.revised_index_name(x_index_name);
1844:
1845: exec('drop index "'||x_index_owner||'"."'||l_revised_name||'"', c_module);
1846: exception
1847: when no_data_found then

Line 1858: ' index "'||owner||'"."'||ad_zd_table.revised_index_name(index_name)||'"'||

1854: 'create '||
1855: decode(index_type,
1856: 'NORMAL', decode(uniqueness, 'UNIQUE', 'UNIQUE', ''),
1857: index_type)||
1858: ' index "'||owner||'"."'||ad_zd_table.revised_index_name(index_name)||'"'||
1859: ' on "'||table_owner||'"."'||table_name||'"' I_HEADER,
1860: decode(nvl(tablespace_name,'???'),'???','','tablespace '||tablespace_name)||
1861: ' storage (initial '||nvl(initial_extent, 128*1024)/1024||'K '||
1862: 'next '||nvl(next_extent, 128*1024)/1024||'K)'

Line 1941: and regexp_like(idx.index_name, ad_zd_table.original_index_regexp, 'c')

1937: where read_only_flag in ('A', 'B', 'E', 'U') )
1938: and idx.owner = idx.table_owner
1939: and idx.table_owner = x_table_owner
1940: and idx.table_name = x_table_name
1941: and regexp_like(idx.index_name, ad_zd_table.original_index_regexp, 'c')
1942: and (
1943: (
1944: /* Revised Index does not exist and Original Index is out of date */
1945: not exists

Line 1949: and idt.index_name = ad_zd_table.revised_index_name(idx.index_name) )

1945: not exists
1946: ( select idt.index_name
1947: from dba_indexes idt
1948: where idt.owner = idx.owner
1949: and idt.index_name = ad_zd_table.revised_index_name(idx.index_name) )
1950: and exists
1951: ( select col.column_name
1952: from dba_tab_columns col, dba_ind_columns idc
1953: where col.owner = idx.table_owner

Line 1957: and ad_zd_table.ev_view_column(idc.column_name)=ad_zd_table.ev_view_column(col.column_name)

1953: where col.owner = idx.table_owner
1954: and col.table_name = idx.table_name
1955: and idc.index_owner = idx.owner
1956: and idc.index_name = idx.index_name
1957: and ad_zd_table.ev_view_column(idc.column_name)=ad_zd_table.ev_view_column(col.column_name)
1958: and col.column_name > idc.column_name )
1959: )
1960: or
1961: (

Line 1967: and idt.index_name = ad_zd_table.revised_index_name(idx.index_name) )

1963: exists
1964: ( select idt.index_name
1965: from dba_indexes idt
1966: where idt.owner = idx.owner
1967: and idt.index_name = ad_zd_table.revised_index_name(idx.index_name) )
1968: and exists
1969: ( select col.column_name
1970: from dba_tab_columns col, dba_ind_columns idc
1971: where col.owner = idx.table_owner

Line 1974: and idc.index_name = ad_zd_table.revised_index_name(idx.index_name)

1970: from dba_tab_columns col, dba_ind_columns idc
1971: where col.owner = idx.table_owner
1972: and col.table_name = idx.table_name
1973: and idc.index_owner = idx.owner
1974: and idc.index_name = ad_zd_table.revised_index_name(idx.index_name)
1975: and ad_zd_table.ev_view_column(idc.column_name)=ad_zd_table.ev_view_column(col.column_name)
1976: and col.column_name > idc.column_name )
1977: )
1978: )

Line 1975: and ad_zd_table.ev_view_column(idc.column_name)=ad_zd_table.ev_view_column(col.column_name)

1971: where col.owner = idx.table_owner
1972: and col.table_name = idx.table_name
1973: and idc.index_owner = idx.owner
1974: and idc.index_name = ad_zd_table.revised_index_name(idx.index_name)
1975: and ad_zd_table.ev_view_column(idc.column_name)=ad_zd_table.ev_view_column(col.column_name)
1976: and col.column_name > idc.column_name )
1977: )
1978: )
1979: order by 1, 2;

Line 2035: and regexp_like(ridx.index_name, ad_zd_table.revised_index_regexp, 'c')

2031: ( select oracle_username from system.fnd_oracle_userid
2032: where read_only_flag in ('A', 'B', 'E', 'U') )
2033: and ridx.table_owner = x_table_owner
2034: and ridx.table_name = x_table_name
2035: and regexp_like(ridx.index_name, ad_zd_table.revised_index_regexp, 'c')
2036: and oidx.owner(+) = ridx.owner
2037: and oidx.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)
2038: and con.owner(+) = ridx.table_owner
2039: and con.table_name(+) = ridx.table_name

Line 2037: and oidx.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)

2033: and ridx.table_owner = x_table_owner
2034: and ridx.table_name = x_table_name
2035: and regexp_like(ridx.index_name, ad_zd_table.revised_index_regexp, 'c')
2036: and oidx.owner(+) = ridx.owner
2037: and oidx.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)
2038: and con.owner(+) = ridx.table_owner
2039: and con.table_name(+) = ridx.table_name
2040: and con.index_owner(+) = ridx.owner
2041: and con.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)

Line 2041: and con.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)

2037: and oidx.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)
2038: and con.owner(+) = ridx.table_owner
2039: and con.table_name(+) = ridx.table_name
2040: and con.index_owner(+) = ridx.owner
2041: and con.index_name(+) = ad_zd_table.original_index_name(ridx.index_name)
2042: order by 1, 2;
2043:
2044: begin
2045: log(c_module, 'PROCEDURE',

Line 2101: if ad_zd_table.ev_exists(x_table_owner, x_table_name) = 'Y' then

2097: begin
2098: log(c_module,'EVENT', 'Patch Table: '||x_table_owner||'.'||x_table_name);
2099:
2100: -- If there is an EV then do related processing
2101: if ad_zd_table.ev_exists(x_table_owner, x_table_name) = 'Y' then
2102:
2103: -- Cannot regenerate EV from RUN edition if PATCH edition exists
2104: if ad_zd.get_edition_type = 'RUN' and ad_zd.get_edition('PATCH') is not null then
2105: error(c_module, 'Cannot PATCH table from Run Edition while Patch Edition exists');

Line 2153: x_sql => 'begin ad_zd_table.cutover('||

2149: -- Store cutover action: Check for uniqueness also:22-Aug-2012
2150: if (tablerec.status = 'N') then
2151: ad_zd_parallel_exec.load(
2152: x_phase => ad_zd_parallel_exec.c_phase_cutover,
2153: x_sql => 'begin ad_zd_table.cutover('||
2154: ''''||tablerec.owner||''', '||
2155: ''''||tablerec.name||'''); end;',
2156: x_unique => true);
2157: end if;

Line 2403: and regexp_like(idx.index_name, ad_zd_table.revised_index_regexp, 'c')

2399: , dba_constraints con
2400: where idx.owner in
2401: ( select oracle_username from system.fnd_oracle_userid
2402: where read_only_flag in ('A', 'B', 'E', 'U') )
2403: and regexp_like(idx.index_name, ad_zd_table.revised_index_regexp, 'c')
2404: and con.owner(+) = idx.table_owner
2405: and con.table_name(+) = idx.table_name
2406: and con.index_name(+) = idx.index_name
2407: order by 1, 2;

Line 2515: l_ev_name := ad_zd_table.ev_view(x_table_name);

2511: exec(x_upd_stmt, c_module, true);
2512: end if;
2513: X_DROPPED := 'Y';
2514: else
2515: l_ev_name := ad_zd_table.ev_view(x_table_name);
2516:
2517: -- Drop synonyms pointing to EV
2518: for synrec in c_synonyms(l_table_owner, l_ev_name) loop
2519: log(c_module, 'EVENT', 'Dropping synonym '||synrec.owner||'.'||synrec.name);

Line 2582: end AD_ZD_TABLE;

2578: log( c_module, 'PROCEDURE', 'end');
2579: commit;
2580: end DROP_TABLE;
2581:
2582: end AD_ZD_TABLE;