eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

SYSTEM.AD_INVOKER dependencies on AD_APPS_PRIVATE

Line 119: ad_apps_private.error_buf := null;

115: is
116: found_authid varchar2(10);
117: invoker_flag varchar2(10);
118: begin
119: ad_apps_private.error_buf := null;
120: --
121: -- Insert rows into ad_invoker_tasks for all packages, procedures, and
122: -- functions that do not contain the 'AUTHID' keyword
123: --

Line 179: ad_apps_private.error_buf := 'get_rewrite_pkgs(): '||

175: end if;
176:
177: exception
178: when others then
179: ad_apps_private.error_buf := 'get_rewrite_pkgs(): '||
180: ad_apps_private.error_buf;
181: raise;
182: end get_rewrite_pkgs;
183:

Line 180: ad_apps_private.error_buf;

176:
177: exception
178: when others then
179: ad_apps_private.error_buf := 'get_rewrite_pkgs(): '||
180: ad_apps_private.error_buf;
181: raise;
182: end get_rewrite_pkgs;
183:
184:

Line 196: ad_apps_private.error_buf := null;

192: num_workers_local pls_integer;
193: counter pls_integer;
194: statement varchar2(300);
195: begin
196: ad_apps_private.error_buf := null;
197: --
198: -- Insert a phase boundary
199: -- (actually a new phase with one row per worker)
200: --

Line 221: ad_apps_private.error_buf := 'add_phase_boundary('||

217: end loop;
218:
219: exception
220: when others then
221: ad_apps_private.error_buf := 'add_phase_boundary('||
222: num_workers||'): '||
223: ad_apps_private.error_buf;
224: raise;
225: end add_phase_boundary;

Line 223: ad_apps_private.error_buf;

219: exception
220: when others then
221: ad_apps_private.error_buf := 'add_phase_boundary('||
222: num_workers||'): '||
223: ad_apps_private.error_buf;
224: raise;
225: end add_phase_boundary;
226:
227:

Line 249: ad_apps_private.error_buf := null;

245: -- (via adadmin "Compile APPS Schema(s)")
246: --
247: is
248: begin
249: ad_apps_private.error_buf := null;
250: --
251: -- Create rows for each grant task. Insert some data so later updates
252: -- can't cause row chaining.
253: --

Line 304: ad_apps_private.error_buf := 'get_grant_pkgs(): '||

300: end if;
301:
302: exception
303: when others then
304: ad_apps_private.error_buf := 'get_grant_pkgs(): '||
305: ad_apps_private.error_buf;
306: raise;
307: end get_grant_pkgs;
308:

Line 305: ad_apps_private.error_buf;

301:
302: exception
303: when others then
304: ad_apps_private.error_buf := 'get_grant_pkgs(): '||
305: ad_apps_private.error_buf;
306: raise;
307: end get_grant_pkgs;
308:
309:

Line 328: ad_apps_private.error_buf := null;

324: --
325: -- Clear error buffer
326: --
327:
328: ad_apps_private.error_buf := null;
329:
330: --
331: -- Run rewrite logic
332: --

Line 451: ad_apps_private.error_buf := 'invoker_maint_serial('||

447: update_timestamp('Invoker Maintenance','Last Run');
448:
449: exception
450: when others then
451: ad_apps_private.error_buf := 'invoker_maint_serial('||
452: is_incremental || '): '||
453: ad_apps_private.error_buf;
454: raise;
455: end invoker_maint_serial;

Line 453: ad_apps_private.error_buf;

449: exception
450: when others then
451: ad_apps_private.error_buf := 'invoker_maint_serial('||
452: is_incremental || '): '||
453: ad_apps_private.error_buf;
454: raise;
455: end invoker_maint_serial;
456:
457:

Line 484: ad_apps_private.error_buf := null;

480: --
481: -- Clear error buffer
482: --
483:
484: ad_apps_private.error_buf := null;
485:
486: -- set variables
487:
488: the_mrc_schema := upper(mrc_schema);

Line 568: ad_apps_private.error_buf := 'invoker_mrc_grants('||

564: -- end loop through PL/SQL specification objects in APPS schema
565:
566: exception
567: when others then
568: ad_apps_private.error_buf := 'invoker_mrc_grants('||
569: apps_schema ||', '|| mrc_schema || '): '||
570: ad_apps_private.error_buf;
571: raise;
572: end invoker_mrc_grants;

Line 570: ad_apps_private.error_buf;

566: exception
567: when others then
568: ad_apps_private.error_buf := 'invoker_mrc_grants('||
569: apps_schema ||', '|| mrc_schema || '): '||
570: ad_apps_private.error_buf;
571: raise;
572: end invoker_mrc_grants;
573:
574:

Line 623: ad_apps_private.error_buf := 'calculate_grant_types('||

619: -- end loop through grants that this worker will process
620:
621: exception
622: when others then
623: ad_apps_private.error_buf := 'calculate_grant_types('||
624: worker_num||'): '||
625: ad_apps_private.error_buf;
626: raise;
627: end calculate_grant_types;

Line 625: ad_apps_private.error_buf;

621: exception
622: when others then
623: ad_apps_private.error_buf := 'calculate_grant_types('||
624: worker_num||'): '||
625: ad_apps_private.error_buf;
626: raise;
627: end calculate_grant_types;
628:
629:

Line 645: ad_apps_private.error_buf := null;

641: where phase = phase_num;
642: counter pls_integer;
643: num_workers_local pls_integer;
644: begin
645: ad_apps_private.error_buf := null;
646: num_workers_local := num_workers;
647: --
648: -- Assign tasks for first phase (rewrite PL/SQL)
649: --

Line 692: ad_apps_private.error_buf := 'assign_tasks('||

688: end loop;
689:
690: exception
691: when others then
692: ad_apps_private.error_buf := 'assign_tasks('||
693: num_workers||'): '||
694: ad_apps_private.error_buf;
695: raise;
696: end assign_tasks;

Line 694: ad_apps_private.error_buf;

690: exception
691: when others then
692: ad_apps_private.error_buf := 'assign_tasks('||
693: num_workers||'): '||
694: ad_apps_private.error_buf;
695: raise;
696: end assign_tasks;
697:
698:

Line 750: ad_apps_private.check_for_apps_ddl(apps_rec.oracle_username);

746: -- Then verify that the APPS*DDL packages in the APPS schemas are OK
747:
748: for apps_rec in APPS_SCHEMAS loop
749:
750: ad_apps_private.check_for_apps_ddl(apps_rec.oracle_username);
751:
752: end loop;
753:
754: exception

Line 756: ad_apps_private.error_buf := 'apps_ddl_check(): '||

752: end loop;
753:
754: exception
755: when others then
756: ad_apps_private.error_buf := 'apps_ddl_check(): '||
757: ad_apps_private.error_buf;
758: raise;
759: end apps_ddl_check;
760:

Line 757: ad_apps_private.error_buf;

753:
754: exception
755: when others then
756: ad_apps_private.error_buf := 'apps_ddl_check(): '||
757: ad_apps_private.error_buf;
758: raise;
759: end apps_ddl_check;
760:
761:

Line 780: ad_apps_private.error_buf := 'update_done('||

776: commit;
777:
778: exception
779: when others then
780: ad_apps_private.error_buf := 'update_done('||
781: what_row||'): '||
782: ad_apps_private.error_buf;
783: raise;
784: end update_done;

Line 782: ad_apps_private.error_buf;

778: exception
779: when others then
780: ad_apps_private.error_buf := 'update_done('||
781: what_row||'): '||
782: ad_apps_private.error_buf;
783: raise;
784: end update_done;
785:
786:

Line 815: ad_apps_private.error_buf := null;

811: begin
812: --
813: -- clear error buffer
814: --
815: ad_apps_private.error_buf := null;
816:
817: --
818: -- select row set to process into rows_to_process
819: --

Line 859: ad_apps_private.error_buf := 'rewrite_pkgs('||

855: end loop;
856:
857: exception
858: when others then
859: ad_apps_private.error_buf := 'rewrite_pkgs('||
860: worker_num||'): '||
861: ad_apps_private.error_buf;
862: raise;
863: end rewrite_pkgs;

Line 861: ad_apps_private.error_buf;

857: exception
858: when others then
859: ad_apps_private.error_buf := 'rewrite_pkgs('||
860: worker_num||'): '||
861: ad_apps_private.error_buf;
862: raise;
863: end rewrite_pkgs;
864:
865:

Line 877: -- Got most of the logic from ad_apps_private.copy_code

873: -- Rewrites a specific package to use Invoker's Rights.
874: --
875: -- if log_to_table is 'TRUE', writes errors to ad_parallel_compile_errors
876: --
877: -- Got most of the logic from ad_apps_private.copy_code
878: --
879: is
880: success_with_comp_error exception;
881: PRAGMA EXCEPTION_INIT(success_with_comp_error, -24344);

Line 1091: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,

1087: --
1088: -- just add to array of source text lines
1089: --
1090:
1091: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,
1092: c1rec.text, row_count);
1093:
1094: end if;
1095: -- end if text <= 255 chars

Line 1182: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,

1178: return;
1179: end if;
1180: -- end if edited line is too long
1181:
1182: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,
1183: new_source_line, is_as_line+1);
1184:
1185: --
1186: -- once we have fetched and processed all source

Line 1196: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,

1192: pragma exception_init(name_already_used, -955);
1193: begin
1194: statement := 'create or replace ';
1195: -- build the first line of the array of sql statement
1196: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,
1197: statement, 1);
1198: -- execute the array of statement.
1199: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,
1200: 1, row_count);

Line 1199: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,

1195: -- build the first line of the array of sql statement
1196: ad_apps_private.do_array_assignment(rewrite_a_package.new_owner,
1197: statement, 1);
1198: -- execute the array of statement.
1199: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,
1200: 1, row_count);
1201: exception
1202: when name_already_used then
1203: --

Line 1208: ad_apps_private.error_buf := null;

1204: -- This should never happen, but it doesn't hurt to leave this
1205: -- code here
1206: --
1207: -- first reset error buf
1208: ad_apps_private.error_buf := null;
1209: -- drop any synonym by such name and retry
1210: ad_apps_private.drop_object(rewrite_a_package.new_owner,
1211: upper(rewrite_a_package.name), 'SYNONYM');
1212: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,

Line 1210: ad_apps_private.drop_object(rewrite_a_package.new_owner,

1206: --
1207: -- first reset error buf
1208: ad_apps_private.error_buf := null;
1209: -- drop any synonym by such name and retry
1210: ad_apps_private.drop_object(rewrite_a_package.new_owner,
1211: upper(rewrite_a_package.name), 'SYNONYM');
1212: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,
1213: 1, row_count);
1214: end;

Line 1212: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,

1208: ad_apps_private.error_buf := null;
1209: -- drop any synonym by such name and retry
1210: ad_apps_private.drop_object(rewrite_a_package.new_owner,
1211: upper(rewrite_a_package.name), 'SYNONYM');
1212: ad_apps_private.do_apps_array_ddl(rewrite_a_package.new_owner,
1213: 1, row_count);
1214: end;
1215:
1216: exception

Line 1223: ad_apps_private.error_buf := null;

1219: -- Trap and ignore ORA-24344: success with compilation error
1220: -- This only happens on ORACLE 8
1221: --
1222: -- reset main error buffer
1223: ad_apps_private.error_buf := null;
1224: when others then
1225: declare
1226: sql_error varchar2(1996);
1227: begin

Line 1254: if ad_apps_private.error_buf is not null then

1250: substr(upper(type)||' '||upper(owner)||'.'||upper(name)||
1251: ': '||sql_error,1,1996)
1252: from sys.dual;
1253:
1254: if ad_apps_private.error_buf is not null then
1255:
1256: insert into ad_parallel_compile_errors (
1257: owner, worker_number, timestamp, type, text)
1258: select upper(owner),

Line 1263: ': '||ad_apps_private.error_buf,1,1996)

1259: 0,
1260: timestamp,
1261: '1 REWRITE ERROR - C',
1262: substr(upper(type)||' '||upper(owner)||'.'||upper(name)||
1263: ': '||ad_apps_private.error_buf,1,1996)
1264: from sys.dual;
1265:
1266: end if;
1267: -- error buf contains information

Line 1270: ad_apps_private.error_buf := null;

1266: end if;
1267: -- error buf contains information
1268:
1269: -- clear error buf
1270: ad_apps_private.error_buf := null;
1271:
1272: else
1273: raise;
1274: end if;

Line 1279: ad_apps_private.error_buf := 'rewrite_a_package('

1275: -- end if log errors/messages to ad_parallel_compile_errors
1276: exception
1277: -- should only fire if we have errors writing to the log table
1278: when others then
1279: ad_apps_private.error_buf := 'rewrite_a_package('
1280: || owner ||', '|| name ||', '|| type ||', '
1281: || new_owner || ', '|| log_to_table ||'): '||
1282: ad_apps_private.error_buf;
1283: raise;

Line 1282: ad_apps_private.error_buf;

1278: when others then
1279: ad_apps_private.error_buf := 'rewrite_a_package('
1280: || owner ||', '|| name ||', '|| type ||', '
1281: || new_owner || ', '|| log_to_table ||'): '||
1282: ad_apps_private.error_buf;
1283: raise;
1284: end;
1285: end rewrite_a_package;
1286:

Line 1486: ad_apps_private.error_buf := 'rewrite_plsql_array('

1482: the_array(is_as_line) := new_source_line;
1483:
1484: exception
1485: when others then
1486: ad_apps_private.error_buf := 'rewrite_plsql_array('
1487: || ' , '|| lb ||', ' || ub ||', '
1488: || type || ' ): '||
1489: ad_apps_private.error_buf;
1490: raise;

Line 1489: ad_apps_private.error_buf;

1485: when others then
1486: ad_apps_private.error_buf := 'rewrite_plsql_array('
1487: || ' , '|| lb ||', ' || ub ||', '
1488: || type || ' ): '||
1489: ad_apps_private.error_buf;
1490: raise;
1491: end rewrite_plsql_array;
1492:
1493:

Line 1511: ad_apps_private.error_buf := null;

1507: begin
1508: --
1509: -- clear error buffer
1510: --
1511: ad_apps_private.error_buf := null;
1512:
1513: for c1_rec in c1(worker_num) loop
1514:
1515: if nvl(c1_rec.done_flag,'N') = 'N' then

Line 1534: ad_apps_private.error_buf := 'grant_pkgs('||

1530: end loop;
1531:
1532: exception
1533: when others then
1534: ad_apps_private.error_buf := 'grant_pkgs('||
1535: worker_num||'): '||
1536: ad_apps_private.error_buf;
1537: raise;
1538: end grant_pkgs;

Line 1536: ad_apps_private.error_buf;

1532: exception
1533: when others then
1534: ad_apps_private.error_buf := 'grant_pkgs('||
1535: worker_num||'): '||
1536: ad_apps_private.error_buf;
1537: raise;
1538: end grant_pkgs;
1539:
1540:

Line 1707: ad_apps_private.do_apps_ddl(upper(owner), statement);

1703:
1704: statement := 'grant all on "'||upper(name)||'" to '||upper(new_owner)||
1705: ' with grant option';
1706:
1707: ad_apps_private.do_apps_ddl(upper(owner), statement);
1708:
1709: --
1710: -- Check for correct synonym
1711: --

Line 1713: ad_apps_private.exact_synonym_match(upper(new_owner), upper(name),

1709: --
1710: -- Check for correct synonym
1711: --
1712:
1713: ad_apps_private.exact_synonym_match(upper(new_owner), upper(name),
1714: upper(owner), upper(name), synonym_ok, any_obj_w_name,
1715: type_of_object);
1716:
1717: if not synonym_ok then

Line 1730: ad_apps_private.drop_object(upper(new_owner), upper(name),

1726: or type_of_object = 'PACKAGE'
1727: or type_of_object = 'PACKAGE BODY' then
1728: -- existing object is package
1729:
1730: ad_apps_private.drop_object(upper(new_owner), upper(name),
1731: 'PACKAGE');
1732: else
1733: -- existing object not package
1734:

Line 1735: ad_apps_private.drop_object(upper(new_owner), upper(name),

1731: 'PACKAGE');
1732: else
1733: -- existing object not package
1734:
1735: ad_apps_private.drop_object(upper(new_owner), upper(name),
1736: type_of_object);
1737: end if;
1738: -- end if existing object is package
1739:

Line 1750: ad_apps_private.do_apps_ddl(upper(new_owner), statement);

1746:
1747: statement := 'create synonym '||upper(name)||' for '||upper(owner)||
1748: '.'||upper(name);
1749:
1750: ad_apps_private.do_apps_ddl(upper(new_owner), statement);
1751:
1752: end if;
1753: -- end if synonym was not exactly correct
1754:

Line 1762: ad_apps_private.exact_synonym_match(upper(new_owner), upper(name),

1758: -- Check to see if there is any object in the other schema
1759: -- with this name
1760: --
1761:
1762: ad_apps_private.exact_synonym_match(upper(new_owner), upper(name),
1763: upper(owner), upper(name), synonym_ok, any_obj_w_name,
1764: type_of_object);
1765:
1766: if any_obj_w_name then

Line 1786: ad_apps_private.drop_object(upper(new_owner), upper(name),

1782: or type_of_object = 'PACKAGE'
1783: or type_of_object = 'PACKAGE BODY' then
1784: -- existing object is package
1785:
1786: ad_apps_private.drop_object(upper(new_owner), upper(name),
1787: 'PACKAGE');
1788: else
1789: -- existing object not package
1790:

Line 1791: ad_apps_private.drop_object(upper(new_owner), upper(name),

1787: 'PACKAGE');
1788: else
1789: -- existing object not package
1790:
1791: ad_apps_private.drop_object(upper(new_owner), upper(name),
1792: type_of_object);
1793: end if;
1794: -- end if existing object is package
1795:

Line 1800: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),

1796: --
1797: -- Create a copy of this object in the other schema
1798: --
1799:
1800: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),
1801: upper(new_owner));
1802:
1803: --
1804: -- If object is a package and the package body exists

Line 1809: ad_apps_private.exact_synonym_match(upper(owner), upper(name),

1805: -- in the source schema, also copy the package body
1806: -- to the other schema
1807: --
1808:
1809: ad_apps_private.exact_synonym_match(upper(owner), upper(name),
1810: upper(owner), upper(name), synonym_ok, any_obj_w_name,
1811: type_of_object);
1812:
1813: if any_obj_w_name and type_of_object = 'PKG_S_AND_B' then

Line 1815: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY', upper(owner),

1811: type_of_object);
1812:
1813: if any_obj_w_name and type_of_object = 'PKG_S_AND_B' then
1814:
1815: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY', upper(owner),
1816: upper(new_owner));
1817:
1818: end if;
1819: -- end if object is package spec, and corresponding body exists

Line 1829: ad_apps_private.compare_code(upper(name), upper(type), upper(owner),

1825: -- Compare to validate that it exactly matches the object
1826: -- from the owner schema
1827: --
1828:
1829: ad_apps_private.compare_code(upper(name), upper(type), upper(owner),
1830: upper(new_owner), 'FULL', exact_code_match);
1831:
1832: --
1833: -- If code matches exactly, don't do anything

Line 1840: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),

1836: --
1837:
1838: if exact_code_match <> 'TRUE' then
1839:
1840: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),
1841: upper(new_owner));
1842:
1843: end if;
1844: -- end if code does not match exactly

Line 1858: ad_apps_private.exact_synonym_match(upper(owner), upper(name),

1854: obj_type_new := type_of_object;
1855:
1856: -- now find out if this is a package that also has a body
1857:
1858: ad_apps_private.exact_synonym_match(upper(owner), upper(name),
1859: upper(owner), upper(name), synonym_ok, any_obj_w_name,
1860: type_of_object);
1861:
1862: if any_obj_w_name and type_of_object = 'PKG_S_AND_B' then

Line 1874: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY',

1870: --
1871:
1872: if obj_type_new = 'PACKAGE' then
1873:
1874: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY',
1875: upper(owner), upper(new_owner));
1876:
1877: elsif obj_type_new = 'PKG_S_AND_B' then
1878:

Line 1883: ad_apps_private.compare_code(upper(name), 'PACKAGE BODY',

1879: --
1880: -- Compare pkg bodies
1881: --
1882:
1883: ad_apps_private.compare_code(upper(name), 'PACKAGE BODY',
1884: upper(owner), upper(new_owner), 'FULL', exact_code_match);
1885:
1886: --
1887: -- If code matches exactly, don't do anything

Line 1894: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY',

1890: --
1891:
1892: if exact_code_match <> 'TRUE' then
1893:
1894: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY',
1895: upper(owner), upper(new_owner));
1896:
1897: end if;
1898: -- end if code does not match exactly

Line 1942: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),

1938: --
1939: -- No object with this name. Copy object to other schema
1940: --
1941:
1942: ad_apps_private.copy_code(upper(name), upper(type), upper(owner),
1943: upper(new_owner));
1944:
1945: --
1946: -- If object is a package and the package body exists

Line 1951: ad_apps_private.exact_synonym_match(upper(owner), upper(name),

1947: -- in the source schema, also copy the package body
1948: -- to the other schema
1949: --
1950:
1951: ad_apps_private.exact_synonym_match(upper(owner), upper(name),
1952: upper(owner), upper(name), synonym_ok, any_obj_w_name,
1953: type_of_object);
1954:
1955: if any_obj_w_name and type_of_object = 'PKG_S_AND_B' then

Line 1957: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY', upper(owner),

1953: type_of_object);
1954:
1955: if any_obj_w_name and type_of_object = 'PKG_S_AND_B' then
1956:
1957: ad_apps_private.copy_code(upper(name), 'PACKAGE BODY', upper(owner),
1958: upper(new_owner));
1959:
1960: end if;
1961: -- end if object is package spec, and corresponding body exists

Line 2033: if ad_apps_private.error_buf is not null then

2029: substr(upper(type)||' '||upper(owner)||'.'||upper(name)||
2030: ': '||sql_error,1,1996)
2031: from sys.dual;
2032:
2033: if ad_apps_private.error_buf is not null then
2034:
2035: insert into ad_parallel_compile_errors (
2036: owner, worker_number, timestamp, type, text)
2037: select upper(owner),

Line 2042: ': '||ad_apps_private.error_buf,1,1996)

2038: 0,
2039: timestamp,
2040: '3 GRANT ERROR - C',
2041: substr(upper(type)||' '||upper(owner)||'.'||upper(name)||
2042: ': '||ad_apps_private.error_buf,1,1996)
2043: from sys.dual;
2044:
2045: end if;
2046: -- error buf contains information

Line 2049: ad_apps_private.error_buf := null;

2045: end if;
2046: -- error buf contains information
2047:
2048: -- clear error buf
2049: ad_apps_private.error_buf := null;
2050:
2051: else
2052: raise;
2053: end if;

Line 2058: ad_apps_private.error_buf := 'grant_a_package('

2054: -- end if log errors/messages to ad_parallel_compile_errors
2055: exception
2056: -- should only fire if we have errors writing to the log table
2057: when others then
2058: ad_apps_private.error_buf := 'grant_a_package('
2059: || owner ||', '|| name ||', '|| type ||', '|| new_owner
2060: || ', '|| authid_flag || ', '|| invoker_flag
2061: || ', '|| log_to_table ||'): '||
2062: ad_apps_private.error_buf;

Line 2062: ad_apps_private.error_buf;

2058: ad_apps_private.error_buf := 'grant_a_package('
2059: || owner ||', '|| name ||', '|| type ||', '|| new_owner
2060: || ', '|| authid_flag || ', '|| invoker_flag
2061: || ', '|| log_to_table ||'): '||
2062: ad_apps_private.error_buf;
2063: raise;
2064: end;
2065: end grant_a_package;
2066:

Line 2125: ad_apps_private.do_apps_ddl(upper(owner), statement);

2121:
2122: statement := 'grant all on "'||name||'" to '||upper(new_owner)||
2123: ' with grant option';
2124:
2125: ad_apps_private.do_apps_ddl(upper(owner), statement);
2126:
2127: --
2128: -- Check for correct synonym
2129: --

Line 2131: ad_apps_private.exact_synonym_match(upper(new_owner), name,

2127: --
2128: -- Check for correct synonym
2129: --
2130:
2131: ad_apps_private.exact_synonym_match(upper(new_owner), name,
2132: upper(owner), name, synonym_ok, any_obj_w_name,
2133: type_of_object);
2134:
2135: if not synonym_ok then

Line 2147: ad_apps_private.drop_object(upper(new_owner), name,

2143: if type_of_object = 'JAVA CLASS'
2144: or type_of_object = 'JAVA RESOURCE' then
2145: -- existing object is Java object
2146:
2147: ad_apps_private.drop_object(upper(new_owner), name,
2148: type_of_object);
2149: else
2150: -- existing object not Java object
2151:

Line 2153: ad_apps_private.drop_object(upper(new_owner), name,

2149: else
2150: -- existing object not Java object
2151:
2152:
2153: ad_apps_private.drop_object(upper(new_owner), name,
2154: type_of_object);
2155: end if;
2156: -- end if existing object is Java object
2157:

Line 2168: ad_apps_private.do_apps_ddl(upper(new_owner), statement);

2164:
2165: statement := 'create synonym "'||name||'" for '||upper(owner)||
2166: '."'||name||'"';
2167:
2168: ad_apps_private.do_apps_ddl(upper(new_owner), statement);
2169:
2170: end if;
2171: -- end if synonym was not exactly correct
2172:

Line 2206: if ad_apps_private.error_buf is not null then

2202: substr(upper(type)||' '||upper(owner)||'.'||name||
2203: ': '||sql_error,1,1996)
2204: from sys.dual;
2205:
2206: if ad_apps_private.error_buf is not null then
2207:
2208: insert into ad_parallel_compile_errors (
2209: owner, worker_number, timestamp, type, text)
2210: select upper(owner),

Line 2215: ': '||ad_apps_private.error_buf,1,1996)

2211: 0,
2212: timestamp,
2213: '3 GRANT ERROR - C',
2214: substr(upper(type)||' '||upper(owner)||'.'||name||
2215: ': '||ad_apps_private.error_buf,1,1996)
2216: from sys.dual;
2217:
2218: end if;
2219: -- error buf contains information

Line 2222: ad_apps_private.error_buf := null;

2218: end if;
2219: -- error buf contains information
2220:
2221: -- clear error buf
2222: ad_apps_private.error_buf := null;
2223:
2224: else
2225: raise;
2226: end if;

Line 2231: ad_apps_private.error_buf := 'grant_a_java_object('

2227: -- end if log errors/messages to ad_parallel_compile_errors
2228: exception
2229: -- should only fire if we have errors writing to the log table
2230: when others then
2231: ad_apps_private.error_buf := 'grant_a_java_object('
2232: || owner ||', '|| name ||', '|| type ||', '|| new_owner
2233: || ', '|| log_to_table ||'): '||
2234: ad_apps_private.error_buf;
2235: raise;

Line 2234: ad_apps_private.error_buf;

2230: when others then
2231: ad_apps_private.error_buf := 'grant_a_java_object('
2232: || owner ||', '|| name ||', '|| type ||', '|| new_owner
2233: || ', '|| log_to_table ||'): '||
2234: ad_apps_private.error_buf;
2235: raise;
2236: end;
2237: end grant_a_java_object;
2238:

Line 2288: ad_apps_private.error_buf := 'update_timestamp('

2284: values (in_type, in_attribute, in_timestamp);
2285:
2286: exception
2287: when others then
2288: ad_apps_private.error_buf := 'update_timestamp('
2289: || in_type ||', '|| in_attribute ||', '||
2290: to_char(in_timestamp,'YYYY-MM-DD:HH24:MI:SS') ||'): '||
2291: ad_apps_private.error_buf;
2292: raise;

Line 2291: ad_apps_private.error_buf;

2287: when others then
2288: ad_apps_private.error_buf := 'update_timestamp('
2289: || in_type ||', '|| in_attribute ||', '||
2290: to_char(in_timestamp,'YYYY-MM-DD:HH24:MI:SS') ||'): '||
2291: ad_apps_private.error_buf;
2292: raise;
2293: end update_timestamp;
2294:
2295:

Line 2431: ad_apps_private.error_buf := 'verify_token_location('

2427: end if;
2428:
2429: exception
2430: when others then
2431: ad_apps_private.error_buf := 'verify_token_location('
2432: || input_string ||', '|| input_token ||'): '||
2433: ad_apps_private.error_buf;
2434: raise;
2435: end verify_token_location;

Line 2433: ad_apps_private.error_buf;

2429: exception
2430: when others then
2431: ad_apps_private.error_buf := 'verify_token_location('
2432: || input_string ||', '|| input_token ||'): '||
2433: ad_apps_private.error_buf;
2434: raise;
2435: end verify_token_location;
2436:
2437:

Line 2826: ad_apps_private.error_buf := 'classify_plsql_object('

2822: -- end if found AUTHID keyword
2823:
2824: exception
2825: when others then
2826: ad_apps_private.error_buf := 'classify_plsql_object('
2827: || owner ||', '|| name ||', '|| type ||'): '||
2828: ad_apps_private.error_buf;
2829: raise;
2830: end classify_plsql_object;

Line 2828: ad_apps_private.error_buf;

2824: exception
2825: when others then
2826: ad_apps_private.error_buf := 'classify_plsql_object('
2827: || owner ||', '|| name ||', '|| type ||'): '||
2828: ad_apps_private.error_buf;
2829: raise;
2830: end classify_plsql_object;
2831:
2832:

Line 3167: ad_apps_private.error_buf := 'classify_plsql_array('

3163: -- end if found AUTHID keyword
3164:
3165: exception
3166: when others then
3167: ad_apps_private.error_buf := 'classify_plsql_array('
3168: || ' , '|| lb ||', '|| ub ||', '|| type ||'): '||
3169: ad_apps_private.error_buf;
3170: raise;
3171: end classify_plsql_array;

Line 3169: ad_apps_private.error_buf;

3165: exception
3166: when others then
3167: ad_apps_private.error_buf := 'classify_plsql_array('
3168: || ' , '|| lb ||', '|| ub ||', '|| type ||'): '||
3169: ad_apps_private.error_buf;
3170: raise;
3171: end classify_plsql_array;
3172:
3173: