1: package body ad_inst as
2: /* $Header: adinstb.pls 120.0 2005/05/25 11:45:37 appldev noship $ */
3:
4: --
5: -- PRIVATE VARIABLES
37: order by decode(object_type,'PACKAGE',1,'VIEW',2,'PACKAGE BODY',4,3);
38:
39: begin
40: -- initialize error buffers
41: ad_inst.error_buf := null;
42: ad_apps_private.error_buf := null;
43:
44: -- Check for APPS*DDL packages
45: ad_apps_private.check_for_apps_ddl(in_schema);
61: -- Trap and ignore ORA-24344: success with compilation error
62: -- This only happens on ORACLE 8
63: --
64: -- reset error buffer
65: ad_inst.error_buf := null;
66: end;
67: end loop; -- loop over all invalid packages
68: -- next compile all invalid views
69: for c2rec in c2 loop
81: -- Trap and ignore ORA-24344: success with compilation error
82: -- This only happens on ORACLE 8
83: --
84: -- reset error buffer
85: ad_inst.error_buf := null;
86: end;
87: end loop; -- loop over all invalid views
88: -- last, get all remaining invalid objects, which could be package bodies
89: -- unpackaged procedures or functions
111: -- Trap and ignore ORA-24344: success with compilation error
112: -- This only happens on ORACLE 8
113: --
114: -- reset error buffer
115: ad_inst.error_buf := null;
116: end;
117: end loop; -- loop over all remaining invalid objects
118:
119: exception
117: end loop; -- loop over all remaining invalid objects
118:
119: exception
120: when others then
121: ad_inst.error_buf := 'compile_schema('||in_schema||
122: '):'||ad_inst.error_buf||':'||ad_apps_private.error_buf;
123: raise;
124: end compile_schema;
125:
118:
119: exception
120: when others then
121: ad_inst.error_buf := 'compile_schema('||in_schema||
122: '):'||ad_inst.error_buf||':'||ad_apps_private.error_buf;
123: raise;
124: end compile_schema;
125:
126:
140: dbms_sql.close_cursor(c);
141: exception
142: when others then
143: dbms_sql.close_cursor(c);
144: ad_inst.error_buf := 'do_apps_ddl('||in_schema||','||ddl_text||
145: '):'||ad_inst.error_buf;
146: raise;
147: end do_apps_ddl;
148:
141: exception
142: when others then
143: dbms_sql.close_cursor(c);
144: ad_inst.error_buf := 'do_apps_ddl('||in_schema||','||ddl_text||
145: '):'||ad_inst.error_buf;
146: raise;
147: end do_apps_ddl;
148:
149:
146: raise;
147: end do_apps_ddl;
148:
149:
150: end ad_inst;