1 package AD_ZD_PREP authid current_user as
2 /* $Header: ADZDPRPS.pls 120.14.12020000.5 2013/03/04 11:14:33 sstomar ship $ */
3
4
5 C_PATCH_SERVICE constant varchar2(30) := 'ebs_patch';
6
7 /*---------------------------------------------------------------
8
9 Utility / Internal APIs
10 ---------------------------------------------------------------*/
11
12 function IS_TYPE_EVOLVED(
13 X_OWNER in varchar2,
14 X_NAME in varchar2 ) return varchar2 ;
15
16 function IS_TYPE_EXISTS(
17 X_OWNER in varchar2,
18 X_NAME in varchar2) return boolean ;
19
20
21 /*---------------------------------------------------------------
22
23 Public APIs
24
25 ---------------------------------------------------------------*/
26
27 -- Creates EBS_PATCH service
28 procedure CREATE_PATCH_SERVICE;
29
30 -- Moves XML schema referenced by E-business Suite tables
31 -- to Non_Editioned APPS schema.
32 procedure MOVE_XML_SCHEMAS;
33
34
35 -- Public API which is an entry point to
36 -- generate DDLs for Online-Enablement process.
37 procedure DO_PREP;
38
39 -- This procedure recompiles TYPES from source schema.
40 -- uses a global list of TYPES and calls ST API during DDL generation.
41 --
42 -- DEPENDENT ON:
43 -- COPY_TYPE
44 -- COPY_EVOLVED_TYPE
45 procedure RECOMPILE_TYPES;
46
47
48
49 -- Drop not-used queues
50 procedure DROP_TEMP_QUEUES;
51 procedure DROP_QUEUES(
52 X_OWNER in varchar2,
53 X_QUEUE_NAME in varchar2);
54 procedure STOP_QUEUE(X_QUEUE_NAME in varchar2);
55
56
57 procedure ENABLE_EDITIONS;
58 procedure ENABLE_USER_4EDITION(X_USERNAME in varchar2);
59
60 --
61 -- Produre to fix all the public and private synonyms in the system.
62 --
63 -- Desc :
64 -- PUBLIC Synonyms point to editioned EBS objects must be dropped,
65 -- PUBLIC Synonyms cannot be editioned so they should be replaced by
66 -- equivalent private synonyms.
67 --
68 --
69 -- 1. Query PUBLIC synonyms that point at "to be editioned" objects.
70 -- 2. For each PUBLIC synonym in step 1, query the oracle users that have code dependencies on that PUBLIC synonym.
71 -- 3. For each affected oracle user in step 2, create the equivalent private synonym.
72 -- 4. After all private replacement synonyms have been created, drop all PUBLIC synonyms from step 1.
73 PROCEDURE FIX_PUBLIC_SYNONYMS;
74 procedure FIX_PUBLIC_SYNONYM(
75 X_SYNONYM_NAME in varchar2,
76 X_TABLE_OWNER in varchar2,
77 X_TABLE_NAME in varchar2,
78 X_DB_LINK in varchar2);
79
80 -- COPY User-Defined-Types to APPS_NE schema
81 procedure COPY_TYPES;
82 procedure COPY_TYPE(
83 X_OWNER in varchar2,
84 X_NAME in varchar2,
85 X_NEW_OWNER in varchar2);
86
87 -- COPY User-Defined-Evolved-Types to APPS_NE schema
88 procedure COPY_EVOLVED_TYPES;
89 procedure COPY_EVOLVED_TYPE(
90 X_OWNER in varchar2,
91 X_NAME in varchar2,
92 X_NEW_OWNER in varchar2 );
93
94 -- Public API to change UDT reference at table-column level
95 --, this internally calls sys.dbms_objects_utils.update_types without
96 -- any specific TYPE name.
97 procedure FIX_TYPES(
98 X_SOURCE_SCHEMA in varchar2,
99 X_TARGET_SCHEMA in varchar2);
100
101 -- This internally calls sys.dbms_objects_utils.update_types with
102 -- specific TYPE name.
103 procedure FIX_TYPE (
104 X_TYPE_OWNER in varchar2,
105 X_TYPE_NAME in varchar2);
106
107 -- Re-create AQ objects like DEQUEUE view etc. after changing UDT reference
108 -- at table-column level
109 procedure RECREATE_AQ_OBJECT (
110 X_OWNER in varchar2,
111 X_TABLE in varchar2);
112
113
114 --
115 -- Problematic cases.
116 -- User Datastore procedures pre-process data to be indexed. Pre-10g, this code
117 -- had to be defined in the CTXSYS schema, and much of it is still there.
118 -- Post 10g, these procedures can and should be migrated back to the APPS schema. (Easy Fix)
119 --
120 PROCEDURE FIX_CTXSYS ;
121 PROCEDURE DROP_CTXSYS_PKG(X_PACKAGE_NAME in varchar2);
122 PROCEDURE DROP_CTXSYS_SYNONYM(X_SYNONYM_NAME in varchar2);
123
124 -- Internal APIs
125 procedure FIX_COLUMNS;
126 procedure FIX_QUEUE(
127 X_OWNER in varchar2,
128 X_TABLE in varchar2,
129 X_COLUMN in varchar2);
130 procedure FIX_COLUMN(
131 X_OWNER in varchar2,
132 X_TABLE in varchar2,
133 X_COLUMN in varchar2);
134
135
136
137 procedure REGISTER_CUSTOM_USER(X_USER in varchar2);
138 procedure ENABLE_CUSTOM_USER(X_USER in varchar2);
139 procedure FIX_CUSTOM_OBJECTS(X_USER in varchar2);
140
141 end AD_ZD_PREP;
[Home] [Help]