DBA Data[Home] [Help]

APPS.AD_ZD_SEED dependencies on AD_ZD_TABLE

Line 94: l_table_name := ad_zd_table.ev_table(l_owner, l_view_name);

90: end;
91:
92: -- Get Table Name
93: begin
94: l_table_name := ad_zd_table.ev_table(l_owner, l_view_name);
95: exception when no_data_found then
96: if x_check_seed then
97: error(x_module, 'Synonym does not point to an editioning view: '||x_synonym_name);
98: else

Line 105: if ad_zd_table.is_seed(l_owner, l_table_name) = 'N' then

101: end;
102:
103: -- Validate that table suppports Editioned Data Storage
104: if x_check_seed then
105: if ad_zd_table.is_seed(l_owner, l_table_name) = 'N' then
106: error(x_module, 'Synonym does not point to a seed data table: '||x_synonym_name);
107: end if;
108: end if;
109:

Line 257: and table_name in (x_tab_name, ad_zd_table.ev_view(x_tab_name))

253: cursor C_TRIG_CUR(x_tab_owner varchar2, x_tab_name varchar2) is
254: select owner, trigger_name
255: from dba_triggers
256: where table_owner = x_tab_owner
257: and table_name in (x_tab_name, ad_zd_table.ev_view(x_tab_name))
258: and trigger_name <> ad_zd_seed.eds_trigger(x_tab_name)
259: and crossedition = 'NO';
260:
261: begin

Line 278: if ad_zd_table.is_seed(x_owner, x_table_name) = 'N' then

274: C_MODULE varchar2(80) := c_package||'create_zd_column';
275: L_STMT varchar2(2000);
276:
277: begin
278: if ad_zd_table.is_seed(x_owner, x_table_name) = 'N' then
279: log(c_module, 'EVENT', 'Creating EDS Striping Column on '||x_owner||'.'||x_table_name);
280: l_stmt := 'alter table '||x_owner||'."'||x_table_name||
281: '" add (ZD_EDITION_NAME varchar2(30) default '''||x_edition_name||''' not null)';
282: else

Line 403: L_EV_NAME varchar2(30) := ad_zd_table.ev_view(x_table_name);

399: X_EDITION_NAME in varchar2,
400: X_SAVE_BODY in out nocopy varchar2)
401: is
402: C_MODULE varchar2(80) := c_package||'create_guard';
403: L_EV_NAME varchar2(30) := ad_zd_table.ev_view(x_table_name);
404: L_TRIG_NAME varchar2(30) := ad_zd_seed.eds_trigger(x_table_name);
405: L_TRIG_BODY varchar2(32000);
406: L_TRIG_STMT varchar2(32000);
407:

Line 473: L_EV_NAME varchar2(30) := ad_zd_table.ev_view(x_table_name);

469: is
470: C_MODULE varchar2(80) := c_package||'create_policy';
471: L_CUR integer;
472: L_POLICY_NAME varchar2(30) := ad_zd_seed.eds_policy;
473: L_EV_NAME varchar2(30) := ad_zd_table.ev_view(x_table_name);
474: L_POLICY_FUNC varchar2(30) := ad_zd_seed.eds_function(x_table_name);
475: L_STMT varchar2(1000);
476: L_TEXT varchar2(4000);
477:

Line 482: and object_name = ad_zd_table.ev_view(x_tab_name)

478: cursor C_POLICY_CUR (x_tab_owner varchar2, x_tab_name varchar2) is
479: select policy_name
480: from dba_policies
481: where object_owner = x_tab_owner
482: and object_name = ad_zd_table.ev_view(x_tab_name)
483: and policy_name = ad_zd_seed.eds_policy;
484:
485: begin
486:

Line 624: exec('insert into "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||

620: if l_first then
621: log(c_module, 'WARNING', 'Table does not support Synchronization. No Primary Key or Unique Index defined');
622: if x_copy_data then
623: log(c_module, 'EVENT', 'Copy Seed Data using insert-select: '||x_table_name);
624: exec('insert into "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||
625: '" select * from "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||'"',
626: c_module);
627: end if;
628: return;

Line 625: '" select * from "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||'"',

621: log(c_module, 'WARNING', 'Table does not support Synchronization. No Primary Key or Unique Index defined');
622: if x_copy_data then
623: log(c_module, 'EVENT', 'Copy Seed Data using insert-select: '||x_table_name);
624: exec('insert into "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||
625: '" select * from "'||x_table_owner||'"."'||ad_zd_table.ev_view(x_table_name)||'"',
626: c_module);
627: end if;
628: return;
629: end if;

Line 653: -- The trigger is optimized for the initial data copy where a call to ad_zd_table.apply

649: --
650: -- Create statement
651: -- Note: Inserts are converted to update, in the "updating" section of the trigger,
652: -- this is intentional.
653: -- The trigger is optimized for the initial data copy where a call to ad_zd_table.apply
654: -- is used to copy the data. In this case a fake update is issues to every row in the
655: -- table.
656: -- It is understood that this is not optimal for propagating ongoing changes, but
657: -- is is expected that very few updates will be issued to seed data in the RUN edition

Line 739: ad_zd_table.apply(l_trig_name);

735: log(c_module, 'EVENT', 'Creating EDS Sync Trigger '||l_trig_name);
736: exec (l_stmt, c_module);
737:
738: if x_copy_data then
739: ad_zd_table.apply(l_trig_name);
740: end if;
741:
742: log(c_module, 'PROCEDURE', 'end');
743: end CREATE_SYNC;

Line 807: if ad_zd_table.ev_exists(l_table_owner, l_table_name) = 'N' then

803:
804: l_edition := ad_zd.get_edition;
805:
806: -- Table Must have EV
807: if ad_zd_table.ev_exists(l_table_owner, l_table_name) = 'N' then
808: error(c_module, 'Table must be upgraded for editioning first: '||x_table_name);
809: end if;
810:
811: -- In Patch Edition, table must be new (not visible in Run Edition)

Line 853: if (ad_zd_table.is_seed(l_table_owner, l_table_name) = 'Y') then

849: end;
850:
851: -- Cannot re-upgrade existing seed data table,
852: -- but ok to upgrade new table with only ZD_EDITION_NAME column
853: if (ad_zd_table.is_seed(l_table_owner, l_table_name) = 'Y') then
854: -- Check if guard trigger exists
855: begin
856: select 'Y' into l_exists
857: from user_triggers

Line 860: and table_name = ad_zd_table.ev_view(l_table_name);

856: select 'Y' into l_exists
857: from user_triggers
858: where trigger_name = ad_zd_seed.eds_trigger(l_table_name)
859: and table_owner = l_table_owner
860: and table_name = ad_zd_table.ev_view(l_table_name);
861:
862: log(c_module, 'WARNING', 'Cannot re-upgrade seed data table: '||x_table_name);
863: return;
864: exception

Line 879: ad_zd_table.patch(l_table_owner, l_table_name);

875: log(c_module, 'EVENT', 'Upgrade Table: '||l_table_owner||'.'||l_table_name);
876:
877: alter_triggers(l_table_owner, l_table_name, 'DISABLE');
878: create_zd_column(l_table_owner, l_table_name, l_edition);
879: ad_zd_table.patch(l_table_owner, l_table_name);
880: fix_indexes(l_table_owner, l_table_name);
881: create_guard(l_table_owner, l_table_name, l_edition, l_save_body);
882: create_policy(l_table_owner, l_table_name, l_edition);
883: alter_triggers(l_table_owner, l_table_name, 'ENABLE');

Line 910: ** 6) Call ad_zd_table.upgrade to refresh EV and synonyms

906: ** 2) Drop the VPD Policy and Function
907: ** 3) Drop the FCET for data synchronization
908: ** 4) Drop the Trigger to Populate ZD_EDITION_NAME
909: ** 5) Mark the ZD_EDITION_NAME column unused
910: ** 6) Call ad_zd_table.upgrade to refresh EV and synonyms
911: ** 7) Drop SV
912: */
913: procedure DOWNGRADE(X_TABLE_NAME in varchar2)
914: is

Line 963: and object_name in (x_tab_name, ad_zd_table.ev_view(x_tab_name))

959:
960: cursor C_POLICY_CUR (x_tab_owner varchar2, x_tab_name varchar2) is
961: select object_owner, object_name, policy_name, function from dba_policies
962: where object_owner = x_tab_owner
963: and object_name in (x_tab_name, ad_zd_table.ev_view(x_tab_name))
964: and upper(policy_name) like '%ZD_SEED';
965:
966: begin
967: log(c_module, 'PROCEDURE', 'begin: '||x_table_name);

Line 976: if ad_zd_table.is_seed(l_table_owner, l_table_name) = 'Y' then

972: log(c_module, 'EVENT', 'Downgrade Table: '||l_table_owner||'.'||l_table_name);
973:
974: -- Cleanup data copies
975: if (l_editions_enabled = 'Y') then
976: if ad_zd_table.is_seed(l_table_owner, l_table_name) = 'Y' then
977: ad_zd_seed.cleanup(l_table_name);
978: end if;
979: end if;
980:

Line 1072: ad_zd_table.patch(l_table_owner, l_table_name);

1068: exec(l_stmt, c_module, true);
1069:
1070: -- Regenerate editioning view
1071: if (l_editions_enabled = 'Y') then
1072: ad_zd_table.patch(l_table_owner, l_table_name);
1073: end if;
1074:
1075: -- Drop SV
1076: exec('drop view '||l_table_owner||'.'||substrb(x_table_name,1,29)||'$', c_module, true);

Line 1245: ' from '||x_table_owner||'.'||ad_zd_table.ev_view(x_table_name)||

1241: -- Get current edition of seed data
1242: begin
1243: l_stmt :=
1244: 'select zd_edition_name'||
1245: ' from '||x_table_owner||'.'||ad_zd_table.ev_view(x_table_name)||
1246: ' where rownum=1';
1247: execute immediate l_stmt into l_seed_edition;
1248: exception
1249: when no_data_found then